diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2009-01-11 12:07:11 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2009-01-11 12:07:11 +0000 |
commit | f6ecbb948ccf7f8a4e156eb29e3a41e7f2953407 (patch) | |
tree | ad958b2313ad00c2fdde49bd5f243f82d1e3ea58 /backend/Linearizeaux.ml | |
parent | bb9d14a3f95fc0e3c8cad10d8ea8e2b2738da7fc (diff) | |
download | compcert-f6ecbb948ccf7f8a4e156eb29e3a41e7f2953407.tar.gz compcert-f6ecbb948ccf7f8a4e156eb29e3a41e7f2953407.zip |
Elimination of "alloc" instruction in Caml files and test files.
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@946 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'backend/Linearizeaux.ml')
-rw-r--r-- | backend/Linearizeaux.ml | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/backend/Linearizeaux.ml b/backend/Linearizeaux.ml index 2f2333fb..d2d2f24a 100644 --- a/backend/Linearizeaux.ml +++ b/backend/Linearizeaux.ml @@ -70,7 +70,6 @@ let enumerate_aux f reach = | Lstore (chunk, addr, args, src, s) -> emit_block pending s | Lcall (sig0, ros, args, res, s) -> emit_block pending s | Ltailcall (sig0, ros, args) -> emit_restart pending - | Lalloc (arg, res, s) -> emit_block pending s | Lcond (cond, args, ifso, ifnot) -> emit_restart (IntSet.add (int_of_pos ifso) (IntSet.add (int_of_pos ifnot) pending)) |