diff options
| author | Xavier Leroy <xavier.leroy@college-de-france.fr> | 2020-07-25 10:37:05 +0200 |
|---|---|---|
| committer | Xavier Leroy <xavierleroy@users.noreply.github.com> | 2020-07-27 16:29:38 +0200 |
| commit | 465f6b4120bb38d2ef2871de4972df92ee935ed6 (patch) | |
| tree | 1b012cd6a662c0f6b21c8dc2be0ac0bb4a0ee49a /x86 | |
| parent | 907a9042ffb8d21fece6fc8e663ce23d32aa8fa1 (diff) | |
| download | compcert-kvx-465f6b4120bb38d2ef2871de4972df92ee935ed6.tar.gz compcert-kvx-465f6b4120bb38d2ef2871de4972df92ee935ed6.zip | |
No need to process __builtin_fabs in $ARCH/Asmexpand.ml
__builtin_fabs has already been expanded in backend/Selection.v .
Diffstat (limited to 'x86')
| -rw-r--r-- | x86/Asmexpand.ml | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/x86/Asmexpand.ml b/x86/Asmexpand.ml index b8353046..e4cf028f 100644 --- a/x86/Asmexpand.ml +++ b/x86/Asmexpand.ml @@ -378,10 +378,6 @@ let expand_builtin_inline name args res = emit (Paddl_ri(res, coqint_of_camlint 32l)); emit (Plabel lbl2) (* Float arithmetic *) - | "__builtin_fabs", [BA(FR a1)], BR(FR res) -> - if a1 <> res then - emit (Pmovsd_ff (res,a1)); - emit (Pabsd res) (* This ensures that need_masks is set to true *) | "__builtin_fsqrt", [BA(FR a1)], BR(FR res) -> emit (Psqrtsd (res,a1)) | "__builtin_fmax", [BA(FR a1); BA(FR a2)], BR(FR res) -> |