diff options
| author | Paul Guyot <[email protected]> | 2010-06-04 10:14:00 +0200 |
|---|---|---|
| committer | Raimo Niskanen <[email protected]> | 2010-06-07 13:46:33 +0200 |
| commit | 8215a7a3eea8f36532ceac31e48fbc6337cb9a8b (patch) | |
| tree | 385bbedff0000b5fec4a853e97a86c6669e257e5 /erts/emulator/test/nif_SUITE.erl | |
| parent | 707c6510597e5eb6e32b88412edd717e0e3c39ba (diff) | |
| download | otp-8215a7a3eea8f36532ceac31e48fbc6337cb9a8b.tar.gz otp-8215a7a3eea8f36532ceac31e48fbc6337cb9a8b.tar.bz2 otp-8215a7a3eea8f36532ceac31e48fbc6337cb9a8b.zip | |
Fix erts_bld_string_n (called by enif_make_string and erlang:decode_packet/3) to work with 8 bits characters
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 |