diff options
author | Lars Thorsen <[email protected]> | 2014-03-28 10:21:45 +0100 |
---|---|---|
committer | Lars Thorsen <[email protected]> | 2014-03-28 10:21:45 +0100 |
commit | f558e4a3744333507a92fb8fbbf8dc58a254f05f (patch) | |
tree | d91bc5806e1cc071226e7630845a246218dc622f /lib/ic/src/ic_pp.erl | |
parent | 7811310ee2c72173824007d3db73ae2b62a725d9 (diff) | |
parent | e10e918f3c08245949297e5ff1483752dd196e88 (diff) | |
download | otp-f558e4a3744333507a92fb8fbbf8dc58a254f05f.tar.gz otp-f558e4a3744333507a92fb8fbbf8dc58a254f05f.tar.bz2 otp-f558e4a3744333507a92fb8fbbf8dc58a254f05f.zip |
Merge branch 'lars/ic/unicode/OTP-11783'
* lars/ic/unicode/OTP-11783:
Remove orber/cos*/ic files from encoding test
[ic] Fix unicode option to io:format in java test
[ic] Fix unicode in erlang install path
[ic] Fix latin-1 characters in generated erl file
Diffstat (limited to 'lib/ic/src/ic_pp.erl')
-rw-r--r-- | lib/ic/src/ic_pp.erl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/ic/src/ic_pp.erl b/lib/ic/src/ic_pp.erl index 54701f7438..e54304ebaa 100644 --- a/lib/ic/src/ic_pp.erl +++ b/lib/ic/src/ic_pp.erl @@ -257,15 +257,15 @@ run_include(FileName, FileList, _Out, Defs, Err, War, IncLine, IncFile, IncDir, tokenise(File, FileName) -> {Result, _L} = token(File, 2, [], not_set, 0), - FI_start = lists:reverse(lists:flatten(io_lib:format("# 1 ~p~n",[FileName]))), + FI_start = lists:reverse(lists:flatten(io_lib:format("# 1 \"~ts\"~n",[FileName]))), FileInfoStart = {file_info, FI_start}, [FileInfoStart | Result]. tokenise(File, FileName, IncLine, PrevFile) -> {Result, _L} = token(File, 2, [], not_set, 0), - FI_start = lists:reverse(lists:flatten(io_lib:format("# 1 ~p 1~n",[FileName]))), + FI_start = lists:reverse(lists:flatten(io_lib:format("# 1 \"~ts\" 1~n",[FileName]))), FileInfoStart = {file_info, FI_start}, - FI_end = lists:reverse(lists:flatten(io_lib:format("# ~p ~p 2~n~n",[IncLine-1,PrevFile]))), + FI_end = lists:reverse(lists:flatten(io_lib:format("# ~p \"~ts\" 2~n~n",[IncLine-1,PrevFile]))), FileInfoEnd = [{file_info, FI_end}], {Result, FileInfoStart, FileInfoEnd}. % [FileInfoStart | Result] ++ FileInfoEnd. @@ -1942,7 +1942,7 @@ read_inc_file(FileName, IncDir, Mio) -> FileList = binary_to_list(Bin), {ok, AbsFile, FileList}; {error, Text} -> - {error, Text} + {error, Text} end; true -> skip |