diff options
| author | Sverker Eriksson <[email protected]> | 2011-12-01 20:13:57 +0100 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2012-02-09 17:07:05 +0100 |
| commit | a17eaa7e2cc2f68fbc9bf5c924c5a230d650b9f1 (patch) | |
| tree | d14848a8a9967fb0838c83635871778c8d2545c3 /lib/hipe/rtl/hipe_rtl_primops.erl | |
| parent | 49c136df375a5c9a831f044eb2e3fb3352429cee (diff) | |
| download | otp-a17eaa7e2cc2f68fbc9bf5c924c5a230d650b9f1.tar.gz otp-a17eaa7e2cc2f68fbc9bf5c924c5a230d650b9f1.tar.bz2 otp-a17eaa7e2cc2f68fbc9bf5c924c5a230d650b9f1.zip | |
hipe,erts: Debug support for native call trace
Diffstat (limited to 'lib/hipe/rtl/hipe_rtl_primops.erl')
| -rw-r--r-- | lib/hipe/rtl/hipe_rtl_primops.erl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/hipe/rtl/hipe_rtl_primops.erl b/lib/hipe/rtl/hipe_rtl_primops.erl index 5f273d8251..53aaa72aa6 100644 --- a/lib/hipe/rtl/hipe_rtl_primops.erl +++ b/lib/hipe/rtl/hipe_rtl_primops.erl @@ -396,6 +396,8 @@ gen_primop({Op,Dst,Args,Cont,Fail}, IsGuard, ConstTab) -> [Dst1]-> hipe_tagscheme:unsafe_tag_float(Dst1, Arg) end; + debug_native_called -> + [hipe_rtl:mk_call(Dst, Op, Args, Cont, Fail, not_remote)]; %% Only names listed above are accepted! MFA:s are not primops! _ -> |