diff options
author | Sverker Eriksson <[email protected]> | 2017-11-15 14:42:06 +0100 |
---|---|---|
committer | GitHub <[email protected]> | 2017-11-15 14:42:06 +0100 |
commit | 0d9d1f1915ac70ba00418fd24a4293bb22c4fade (patch) | |
tree | 49df7cdfbd1e211dc7aace5db5ce7e3af6e40909 /lib/hipe/icode/hipe_icode_pp.erl | |
parent | 1836281f02004db2cc0185b877552377cd436d9a (diff) | |
parent | 7503303b0cba1e02320bdf604e0d0997b7c2ff59 (diff) | |
download | otp-0d9d1f1915ac70ba00418fd24a4293bb22c4fade.tar.gz otp-0d9d1f1915ac70ba00418fd24a4293bb22c4fade.tar.bz2 otp-0d9d1f1915ac70ba00418fd24a4293bb22c4fade.zip |
Merge PR-1621 from margnus1/hipe-literal-tag
HiPE: Support for literal tag, tests and bugfixes
Diffstat (limited to 'lib/hipe/icode/hipe_icode_pp.erl')
-rw-r--r-- | lib/hipe/icode/hipe_icode_pp.erl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/hipe/icode/hipe_icode_pp.erl b/lib/hipe/icode/hipe_icode_pp.erl index 5b017dca32..33d1e62884 100644 --- a/lib/hipe/icode/hipe_icode_pp.erl +++ b/lib/hipe/icode/hipe_icode_pp.erl @@ -230,7 +230,10 @@ pp_arg(Dev, Arg) -> case hipe_icode:is_reg(Arg) of true -> N = hipe_icode:reg_name(Arg), - io:format(Dev, "r~p", [N]); + case hipe_icode:reg_is_gcsafe(Arg) of + true -> io:format(Dev, "rs~p", [N]); + false -> io:format(Dev, "r~p", [N]) + end; false -> N = hipe_icode:fvar_name(Arg), io:format(Dev, "fv~p", [N]) |