diff options
| author | Hans Bolinder <[email protected]> | 2012-10-04 15:58:26 +0200 |
|---|---|---|
| committer | Hans Bolinder <[email protected]> | 2013-01-02 10:15:17 +0100 |
| commit | 300c5466a7c9cfe3ed22bba2a88ba21058406402 (patch) | |
| tree | b8c30800b17d5ae98255de2fd2818d8b5d4d6eba /lib/kernel/src/file.erl | |
| parent | 7a884a31cfcaaf23f7920ba1a006aa2855529030 (diff) | |
| download | otp-300c5466a7c9cfe3ed22bba2a88ba21058406402.tar.gz otp-300c5466a7c9cfe3ed22bba2a88ba21058406402.tar.bz2 otp-300c5466a7c9cfe3ed22bba2a88ba21058406402.zip | |
[stdlib, kernel] Introduce Unicode support for Erlang source files
Expect modifications, additions and corrections.
There is a kludge in file_io_server and
erl_scan:continuation_location() that's not so pleasing.
Diffstat (limited to 'lib/kernel/src/file.erl')
| -rw-r--r-- | lib/kernel/src/file.erl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/kernel/src/file.erl b/lib/kernel/src/file.erl index 4f7c984b11..de3eaad5a1 100644 --- a/lib/kernel/src/file.erl +++ b/lib/kernel/src/file.erl @@ -1315,6 +1315,7 @@ sendfile_send(Sock, Data, Old) -> %%% Helpers consult_stream(Fd) -> + _ = epp:set_encoding(Fd), consult_stream(Fd, 1, []). consult_stream(Fd, Line, Acc) -> @@ -1328,6 +1329,7 @@ consult_stream(Fd, Line, Acc) -> end. eval_stream(Fd, Handling, Bs) -> + _ = epp:set_encoding(Fd), eval_stream(Fd, Handling, 1, undefined, [], Bs). eval_stream(Fd, H, Line, Last, E, Bs) -> |