diff options
| author | Lars Thorsen <[email protected]> | 2014-03-18 14:37:40 +0100 |
|---|---|---|
| committer | Lars Thorsen <[email protected]> | 2014-03-28 10:21:06 +0100 |
| commit | ec9b79ee48192d3ec4e74ad0985182f9e01df48c (patch) | |
| tree | c55413407030ccb478e08c144978f1ed9bd618dd /lib/ic/src/ic_pp.erl | |
| parent | 6b1fb34e5d3dacf432fe6785c3455a363543574f (diff) | |
| download | otp-ec9b79ee48192d3ec4e74ad0985182f9e01df48c.tar.gz otp-ec9b79ee48192d3ec4e74ad0985182f9e01df48c.tar.bz2 otp-ec9b79ee48192d3ec4e74ad0985182f9e01df48c.zip | |
[ic] Fix unicode in erlang install path
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 |