aboutsummaryrefslogtreecommitdiffstats
path: root/arm/Unusedglob1.ml
diff options
context:
space:
mode:
authorxleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2012-05-26 07:32:01 +0000
committerxleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2012-05-26 07:32:01 +0000
commit132e36fa0be63eb5672eda9168403d3fb74af2fa (patch)
tree33955e0ccb4210271c82326b941523e6e4b2c289 /arm/Unusedglob1.ml
parent9ea00d39bb32c1f188f1af2745c3368da6a349c1 (diff)
downloadcompcert-132e36fa0be63eb5672eda9168403d3fb74af2fa.tar.gz
compcert-132e36fa0be63eb5672eda9168403d3fb74af2fa.zip
CSE: add recognition of some combined operators, conditions, and addressing modes (cf. CombineOp.v)
Memory model: cleaning up Memdata Inlining and new Constprop: updated for ARM. git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1902 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'arm/Unusedglob1.ml')
-rw-r--r--arm/Unusedglob1.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/arm/Unusedglob1.ml b/arm/Unusedglob1.ml
index 04ef89a6..33a9bf8d 100644
--- a/arm/Unusedglob1.ml
+++ b/arm/Unusedglob1.ml
@@ -26,7 +26,7 @@ let referenced_instr = function
| Pbsymb(s, _) -> [s]
| Pblsymb(s, _) -> [s]
| Ploadsymbol(_, s, _) -> [s]
- | Pbuiltin ef -> referenced_builtin ef
+ | Pbuiltin(ef, _, _) -> referenced_builtin ef
| _ -> []
let code_of_function f = f.fn_code