aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib/test/io_SUITE.erl
diff options
context:
space:
mode:
authorHans Bolinder <[email protected]>2017-04-24 14:46:57 +0200
committerHans Bolinder <[email protected]>2017-04-24 14:51:03 +0200
commit4567b6afc41a5d18384916c171ae413112ee57cc (patch)
tree3b32f28efbec8e56bd95e3b390205836eb1b9375 /lib/stdlib/test/io_SUITE.erl
parentef0dbc4f2a43d629d086c3e2b9a762bbc00d034b (diff)
downloadotp-4567b6afc41a5d18384916c171ae413112ee57cc.tar.gz
otp-4567b6afc41a5d18384916c171ae413112ee57cc.tar.bz2
otp-4567b6afc41a5d18384916c171ae413112ee57cc.zip
stdlib: Add Unicode modifier t to control sequence a
The Unicode translation modifier 't' is added to the io:fread/2,3 control sequence 'a'.
Diffstat (limited to 'lib/stdlib/test/io_SUITE.erl')
-rw-r--r--lib/stdlib/test/io_SUITE.erl9
1 files changed, 9 insertions, 0 deletions
diff --git a/lib/stdlib/test/io_SUITE.erl b/lib/stdlib/test/io_SUITE.erl
index fb62e3aa3c..ef3f0be5d7 100644
--- a/lib/stdlib/test/io_SUITE.erl
+++ b/lib/stdlib/test/io_SUITE.erl
@@ -2359,6 +2359,15 @@ otp_14285(_Config) ->
"'кирилли́ческий атом'" = fmt("~tW", ['кирилли́ческий атом', 13]),
[$',16#10FFFF,$'] = fmt("~tW", ['\x{10FFFF}', 13]),
+ {ok, [an_atom],[]} = io_lib:fread("~a", "an_atom"),
+ {ok, [an_atom],[]} = io_lib:fread("~ta", "an_atom"),
+ Str = "\"ab" ++ [1089] ++ "cd\"",
+ {ok, ["\"ab"], [1089]++"cd\""} = io_lib:fread("~s", Str),
+ {ok, ['\"ab'], [1089]++"cd\""} = io_lib:fread("~a", Str),
+ {ok,[Str], []} = io_lib:fread("~ts", Str),
+ {ok,[Atom],[]} = io_lib:fread("~ta", Str),
+ Str = atom_to_list(Atom),
+
ok.
latin1_fmt(Fmt, Args) ->