diff options
author | Vlad Dumitrescu <[email protected]> | 2011-11-13 14:58:06 +0100 |
---|---|---|
committer | Henrik Nord <[email protected]> | 2011-11-24 10:22:57 +0100 |
commit | e01d6f39b940d917ae445d8428b154de87888000 (patch) | |
tree | 1dc7feb83b8ec1c8df0600f4565b6018d6aaccb9 /lib/jinterface/test/nc_SUITE.erl | |
parent | a30445c2a40ebc0e449c7b7605fdc202c48e00d8 (diff) | |
download | otp-e01d6f39b940d917ae445d8428b154de87888000.tar.gz otp-e01d6f39b940d917ae445d8428b154de87888000.tar.bz2 otp-e01d6f39b940d917ae445d8428b154de87888000.zip |
add test for Java string bug
Diffstat (limited to 'lib/jinterface/test/nc_SUITE.erl')
-rw-r--r-- | lib/jinterface/test/nc_SUITE.erl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/jinterface/test/nc_SUITE.erl b/lib/jinterface/test/nc_SUITE.erl index da54f5bf51..9c88400c2a 100644 --- a/lib/jinterface/test/nc_SUITE.erl +++ b/lib/jinterface/test/nc_SUITE.erl @@ -296,7 +296,8 @@ lists_roundtrip_2(Config) when is_list(Config) -> {[z,23|24],tail3}, {[z|25],tail3}, {"abc123",sub3atom}, - {"abc",sub3atom} + {"abc",sub3atom}, + {"abcdefg",codepointBug} ], Trans = fun ([_|T], tail) -> @@ -308,7 +309,9 @@ lists_roundtrip_2(Config) when is_list(Config) -> (L, tail3) when is_list(L) -> null; ([_,_,_|L], sub3atom) -> - list_to_atom(L) + list_to_atom(L); + (L, codepointBug) -> + L end, OutTrans = fun ({L,Twist}) -> |