aboutsummaryrefslogtreecommitdiffstats
path: root/cparser/SimplExpr.ml
diff options
context:
space:
mode:
authorxleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2011-08-22 08:25:44 +0000
committerxleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2011-08-22 08:25:44 +0000
commit6ceceaed3d71a785fa1cccc1059c9a141e99eee1 (patch)
treec01abed3ac160a4a6481aa49ecce8382b19d7819 /cparser/SimplExpr.ml
parent3334dc4b5bcc6f58e2c487a7f6d7c2aa6e09e797 (diff)
downloadcompcert-6ceceaed3d71a785fa1cccc1059c9a141e99eee1.tar.gz
compcert-6ceceaed3d71a785fa1cccc1059c9a141e99eee1.zip
arm/PrintAsm: don't generate "vfd" directive, useless?
cparser: distinguish more carefully between lvalues and modifiable lvalues. git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1722 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'cparser/SimplExpr.ml')
-rw-r--r--cparser/SimplExpr.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/cparser/SimplExpr.ml b/cparser/SimplExpr.ml
index 330b1841..4184d954 100644
--- a/cparser/SimplExpr.ml
+++ b/cparser/SimplExpr.ml
@@ -106,7 +106,7 @@ let simpl_expr loc env e act =
let is_volatile_read e =
!volatilize
&& List.mem AVolatile (attributes_of_type env e.etyp)
- && is_lvalue env e in
+ && is_lvalue e in
let lhs_to_rhs e =
if is_volatile_read e