File otp_src_18.0-io_lib-printable.patch of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File otp_src_18.0-io_lib-printable.patch of Package erlang (Revision 763e2d450db5d33c0191c4affa3cbd94)

Currently displaying revision 763e2d450db5d33c0191c4affa3cbd94 , Show latest

diff -Ndur otp_src_18.0/lib/stdlib/src/erl_scan.erl otp_src_18.0-io_lib-printable/lib/stdlib/src/erl_scan.erl
--- otp_src_18.0/lib/stdlib/src/erl_scan.erl	2015-06-23 11:24:27.000000000 +0300
+++ otp_src_18.0-io_lib-printable/lib/stdlib/src/erl_scan.erl	2015-06-26 01:05:09.330860040 +0300
@@ -415,7 +415,7 @@
 
 -define(WHITE_SPACE(C),
         is_integer(C) andalso
-         (C >= $\000 andalso C =< $\s orelse C >= $\200 andalso C =< $\240)).
+         (C >= $\000 andalso C =< $\s)).
 -define(DIGIT(C), C >= $0, C =< $9).
 -define(CHAR(C), is_integer(C), C >= 0).
 -define(UNICODE(C),
diff -Ndur otp_src_18.0/lib/stdlib/src/io_lib.erl otp_src_18.0-io_lib-printable/lib/stdlib/src/io_lib.erl
--- otp_src_18.0/lib/stdlib/src/io_lib.erl	2015-06-23 11:24:27.000000000 +0300
+++ otp_src_18.0-io_lib-printable/lib/stdlib/src/io_lib.erl	2015-06-26 01:05:09.331860040 +0300
@@ -448,11 +448,11 @@
 string_char(_,$\\, _, Tail) -> [$\\,$\\|Tail];
 string_char(_,C, _, Tail) when C >= $\s, C =< $~ ->
     [C|Tail];
-string_char(latin1,C, _, Tail) when C >= $\240, C =< $\377 ->
+string_char(latin1,C, _, Tail) when C >= $\200, C =< $\377 ->
     [C|Tail];
-string_char(unicode_as_unicode,C, _, Tail) when C >= $\240 ->
+string_char(unicode_as_unicode,C, _, Tail) when C >= $\200 ->
     [C|Tail];
-string_char(unicode_as_latin1,C, _, Tail) when C >= $\240, C =< $\377 ->
+string_char(unicode_as_latin1,C, _, Tail) when C >= $\200, C =< $\377 ->
     [C|Tail];
 string_char(unicode_as_latin1,C, _, Tail) when C >= $\377 ->
     "\\x{"++erlang:integer_to_list(C, 16)++"}"++Tail;
@@ -464,7 +464,7 @@
 string_char(_,$\f, _, Tail) -> [$\\,$f|Tail];	%\f = FF
 string_char(_,$\e, _, Tail) -> [$\\,$e|Tail];	%\e = ESC
 string_char(_,$\d, _, Tail) -> [$\\,$d|Tail];	%\d = DEL
-string_char(_,C, _, Tail) when C < $\240->	%Other control characters.
+string_char(_,C, _, Tail) when C < $\200->	%Other control characters.
     C1 = (C bsr 6) + $0,
     C2 = ((C bsr 3) band 7) + $0,
     C3 = (C band 7) + $0,
@@ -572,7 +572,7 @@
 
 printable_latin1_list([C|Cs]) when is_integer(C), C >= $\040, C =< $\176 ->
     printable_latin1_list(Cs);
-printable_latin1_list([C|Cs]) when is_integer(C), C >= $\240, C =< $\377 ->
+printable_latin1_list([C|Cs]) when is_integer(C), C >= $\200, C =< $\377 ->
     printable_latin1_list(Cs);
 printable_latin1_list([$\n|Cs]) -> printable_latin1_list(Cs);
 printable_latin1_list([$\r|Cs]) -> printable_latin1_list(Cs);
diff -Ndur otp_src_18.0/lib/stdlib/src/io_lib_pretty.erl otp_src_18.0-io_lib-printable/lib/stdlib/src/io_lib_pretty.erl
--- otp_src_18.0/lib/stdlib/src/io_lib_pretty.erl	2015-06-23 11:24:27.000000000 +0300
+++ otp_src_18.0-io_lib-printable/lib/stdlib/src/io_lib_pretty.erl	2015-06-26 01:05:09.332860040 +0300
@@ -548,7 +548,7 @@
 % printable_latin1_list([_ | _], 0) -> 0;
 printable_latin1_list([C | Cs], N) when C >= $\s, C =< $~ ->
     printable_latin1_list(Cs, N - 1);
-printable_latin1_list([C | Cs], N) when C >= $\240, C =< $\377 ->
+printable_latin1_list([C | Cs], N) when C >= $\200, C =< $\377 ->
     printable_latin1_list(Cs, N - 1);
 printable_latin1_list([$\n | Cs], N) -> printable_latin1_list(Cs, N - 1);
 printable_latin1_list([$\r | Cs], N) -> printable_latin1_list(Cs, N - 1);

Places

File otp_src_18.0-io_lib-printable.patch of Package erlang (Revision 763e2d450db5d33c0191c4affa3cbd94)

Places