diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2013-11-06 13:51:31 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2013-11-06 13:51:31 +0000 |
commit | f8202f62ed65d15738e0868005c856168a302696 (patch) | |
tree | d9a16b650e62be1c15830eb41f9339485e948bd8 /cfrontend/PrintClight.ml | |
parent | f9c799143067c3197dc925f7fd916206d075a25d (diff) | |
download | compcert-f8202f62ed65d15738e0868005c856168a302696.tar.gz compcert-f8202f62ed65d15738e0868005c856168a302696.zip |
- Recognize __builtin_fabs as an operator, not just a builtin,
enabling more aggressive optimizations.
- Less aggressive CSE for EF_builtin builtins, causes problems
for __builtin_write{16,32}_reversed.
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2363 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'cfrontend/PrintClight.ml')
-rw-r--r-- | cfrontend/PrintClight.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/cfrontend/PrintClight.ml b/cfrontend/PrintClight.ml index a8b2b98a..8f0bfbf3 100644 --- a/cfrontend/PrintClight.ml +++ b/cfrontend/PrintClight.ml @@ -82,6 +82,8 @@ let rec expr p (prec, e) = fprintf p "%F" (camlfloat_of_coqfloat f) | Econst_long(n, _) -> fprintf p "%LdLL" (camlint64_of_coqint n) + | Eunop(Oabsfloat, a1, _) -> + fprintf p "__builtin_fabs(%a)" expr (2, a1) | Eunop(op, a1, _) -> fprintf p "%s%a" (name_unop op) expr (prec', a1) | Eaddrof(a1, _) -> |