diff options
| author | Erlang/OTP <[email protected]> | 2010-06-08 10:04:13 +0000 |
|---|---|---|
| committer | Erlang/OTP <[email protected]> | 2010-06-08 10:04:13 +0000 |
| commit | b10f0358c5286300dc9c861c6d45a10222bba3c2 (patch) | |
| tree | 3b33280f378b2378aee633a85dad17ce530c91b3 /erts/emulator/test/nif_SUITE.erl | |
| parent | 5a5a5013c1a8a53955f6d6bca2daf36838099b6a (diff) | |
| parent | 8215a7a3eea8f36532ceac31e48fbc6337cb9a8b (diff) | |
| download | otp-b10f0358c5286300dc9c861c6d45a10222bba3c2.tar.gz otp-b10f0358c5286300dc9c861c6d45a10222bba3c2.tar.bz2 otp-b10f0358c5286300dc9c861c6d45a10222bba3c2.zip | |
Merge branch 'pg/fix_erts_bld_string_n' into dev
* pg/fix_erts_bld_string_n:
Fix erts_bld_string_n (called by enif_make_string and erlang:decode_packet/3) to work with 8 bits characters
OTP-8685 pg/fix_erts_bld_string_n
Fix bug causing erlang:decode_packet and enif_make_string to generate
faulty strings with negative character values for ascii values larger than
127. (Thanks to Paul Guyot)
Diffstat (limited to 'erts/emulator/test/nif_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/nif_SUITE.erl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/erts/emulator/test/nif_SUITE.erl b/erts/emulator/test/nif_SUITE.erl index a1f61dad67..888bf582d8 100644 --- a/erts/emulator/test/nif_SUITE.erl +++ b/erts/emulator/test/nif_SUITE.erl @@ -967,10 +967,11 @@ make_atom(Config) when is_list(Config) -> make_string(Config) when is_list(Config) -> ?line ensure_lib_loaded(Config, 1), ?line Strings = make_strings(), - ?line 4 = size(Strings), + ?line 5 = size(Strings), A0String = "a0string", A0String0 = [$a,0,$s,$t,$r,$i,$n,$g,0], - ?line Strings = {A0String,A0String,A0String,A0String0}. + AStringWithAccents = [$E,$r,$l,$a,$n,$g,$ ,16#e4,$r,$ ,$e,$t,$t,$ ,$g,$e,$n,$e,$r,$e,$l,$l,$t,$ ,$p,$r,$o,$g,$r,$a,$m,$s,$p,$r,16#e5,$k], + ?line Strings = {A0String,A0String,A0String,A0String0, AStringWithAccents}. tmpmem() -> case erlang:system_info({allocator,temp_alloc}) of |