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_codegen.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_codegen.erl')
-rw-r--r-- | lib/ic/src/ic_codegen.erl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/ic/src/ic_codegen.erl b/lib/ic/src/ic_codegen.erl index f611c69bea..82431b79a2 100644 --- a/lib/ic/src/ic_codegen.erl +++ b/lib/ic/src/ic_codegen.erl @@ -216,12 +216,14 @@ exp_to_string({F,N}) -> io_lib:format("~p/~p", [ic_util:to_atom(F), N]). %%-------------------------------------------------------------------- emit_stub_head(_G, ignore, _Name, _) -> ignore; emit_stub_head(G, F1, Name, erlang) -> + comment(F1, " coding: latin-1", []), mcomment(F1, stub_header(G, Name)), nl(F1), emit(F1, "-module(~p).\n", [list_to_atom(Name)]), emit(F1, "-ic_compiled(~p).\n", [compiler_vsn(?COMPILERVSN)]), emit(F1, "\n\n"), F1; emit_stub_head(G, F1, Name, erlang_template) -> + comment(F1, " coding: latin-1", []), ic_erl_template:emit_header(G, F1, Name), F1; emit_stub_head(_G, F1, _Name, erlang_template_no_gen) -> @@ -259,6 +261,7 @@ compiler_vsn(Vsn) -> %% Name is Fully scoped (undescore) name of interface or module emit_hrl_head(_G, ignore, _Name, _) -> ignore; emit_hrl_head(G, Fd, Name, erlang) -> + comment(Fd, " coding: latin-1", []), mcomment(Fd, ["Erlang header file" | hrl_header(G, Name)]), nl(Fd), |