diff options
author | Michael Schmidt <github@mschmidt.me> | 2016-06-07 15:28:35 +0200 |
---|---|---|
committer | Michael Schmidt <github@mschmidt.me> | 2016-06-07 15:28:35 +0200 |
commit | 3c4f1377395494e8f706b829d0b69e9c33b6a5b8 (patch) | |
tree | 21aa0ada3d340a868a20388a6d7863464145fbd0 /ia32/Asmexpand.ml | |
parent | 35041fb0949304dcdb6d82687adbaa71bf8224ab (diff) | |
download | compcert-3c4f1377395494e8f706b829d0b69e9c33b6a5b8.tar.gz compcert-3c4f1377395494e8f706b829d0b69e9c33b6a5b8.zip |
fix '__builtin_annot_val' to '__builtin_annot_intval', such that CompCert can parse its own .compcert.c output, bug 18060
Diffstat (limited to 'ia32/Asmexpand.ml')
-rw-r--r-- | ia32/Asmexpand.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ia32/Asmexpand.ml b/ia32/Asmexpand.ml index 5e5bbb3e..6a64221e 100644 --- a/ia32/Asmexpand.ml +++ b/ia32/Asmexpand.ml @@ -67,7 +67,7 @@ let expand_annot_val txt targ args res = | [BA(FR src)], BR(FR dst) -> if dst <> src then emit (Pmovsd_ff (dst,src)) | _, _ -> - raise (Error "ill-formed __builtin_annot_val") + raise (Error "ill-formed __builtin_annot_intval") (* Translate a builtin argument into an addressing mode *) |