diff options
author | Dan Gudmundsson <[email protected]> | 2018-12-03 10:39:52 +0100 |
---|---|---|
committer | Dan Gudmundsson <[email protected]> | 2018-12-03 10:39:52 +0100 |
commit | bb5192f36d1effdd03edf23df9e31ba12eef17d7 (patch) | |
tree | 066a03574c8098a1ec72152f131da31f43e261cd /lib/stdlib/uc_spec/gen_unicode_mod.escript | |
parent | 098c8f504c61646a73c5f0e3a4132c15fc6e8219 (diff) | |
parent | d00c1adf7e12f791781995c9469a1acf94ddfb93 (diff) | |
download | otp-bb5192f36d1effdd03edf23df9e31ba12eef17d7.tar.gz otp-bb5192f36d1effdd03edf23df9e31ba12eef17d7.tar.bz2 otp-bb5192f36d1effdd03edf23df9e31ba12eef17d7.zip |
Merge branch 'dgud/stdlib/unicode-binary-bug/ERL-777/OTP-15428' into maint
* dgud/stdlib/unicode-binary-bug/ERL-777/OTP-15428:
unicode_util did not handle binary input data correctly
Diffstat (limited to 'lib/stdlib/uc_spec/gen_unicode_mod.escript')
-rwxr-xr-x | lib/stdlib/uc_spec/gen_unicode_mod.escript | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/stdlib/uc_spec/gen_unicode_mod.escript b/lib/stdlib/uc_spec/gen_unicode_mod.escript index fe5a860d45..535f01a1c5 100755 --- a/lib/stdlib/uc_spec/gen_unicode_mod.escript +++ b/lib/stdlib/uc_spec/gen_unicode_mod.escript @@ -646,7 +646,7 @@ gen_gc(Fd, GBP) -> io:put_chars(Fd, "is_emodifier(_) -> false.\n\n"), io:put_chars(Fd, "gc_zwj(R0, Acc) ->\n case cp(R0) of\n"), - GenZWJGlue = fun(Range) -> io:format(Fd, "~8c~s gc_extend(R1, R0, [CP|Acc]);\n", + GenZWJGlue = fun(Range) -> io:format(Fd, "~8c~s gc_extend(cp(R1), R0, [CP|Acc]);\n", [$\s,gen_case_clause(Range)]) end, [GenZWJGlue(CP) || CP <- merge_ranges(maps:get(glue_after_zwj,GBP))], GenZWJEBG = fun(Range) -> io:format(Fd, "~8c~s gc_e_cont(R1, [CP|Acc]);\n", |