From 6452db6388420880cf3b75ee2bf9c752ee494c40 Mon Sep 17 00:00:00 2001 From: Mark Allen Date: Mon, 23 Nov 2015 09:39:25 -0600 Subject: [PATCH] Forward port #292 to 3.x branch 255 is a valid ISO-8859-1 character. This was fixed on 2.x by #292. Forward port the fix into 3.x. --- src/lager_stdlib.erl | 2 +- test/trunc_io_eqc.erl | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/lager_stdlib.erl b/src/lager_stdlib.erl index a492f7e..a41846c 100644 --- a/src/lager_stdlib.erl +++ b/src/lager_stdlib.erl @@ -39,7 +39,7 @@ string_p([]) -> string_p(Term) -> string_p1(Term). -string_p1([H|T]) when is_integer(H), H >= $\s, H < 255 -> +string_p1([H|T]) when is_integer(H), H >= $\s, H < 256 -> string_p1(T); string_p1([$\n|T]) -> string_p1(T); string_p1([$\r|T]) -> string_p1(T); diff --git a/test/trunc_io_eqc.erl b/test/trunc_io_eqc.erl index 9eee35e..b8dd4e6 100644 --- a/test/trunc_io_eqc.erl +++ b/test/trunc_io_eqc.erl @@ -91,7 +91,7 @@ gen_fmt_args() -> %% Generates a printable string gen_print_str() -> - ?LET(Xs, list(char()), [X || X <- Xs, io_lib:printable_list([X]), X /= $~, X < 255]). + ?LET(Xs, list(char()), [X || X <- Xs, io_lib:printable_list([X]), X /= $~, X < 256]). gen_print_bin() -> ?LET(Xs, gen_print_str(), list_to_binary(Xs)).