diff options
| author |  xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-07-14 08:05:36 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-07-14 08:05:36 +0000 |
| commit | bd85aba84475dd956af21c461c44a584958099d1 (patch) | |
| tree | bab1cefe9f84210559a4716a070d79967b60f2b5 /ia32/SelectOp.vp | |
| parent | 48b839d15e69c3c9995ca3c25e6a7c4730224292 (diff) | |
Support for indirect symbols under MacOS X (final).
Remove stdio hack in runtime/
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1979 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'ia32/SelectOp.vp')
| -rw-r--r-- | ia32/SelectOp.vp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ia32/SelectOp.vp b/ia32/SelectOp.vp index 19e64cc..6d44cf5 100644 --- a/ia32/SelectOp.vp +++ b/ia32/SelectOp.vp @@ -62,8 +62,8 @@ Parameter symbol_is_external: ident -> bool. Definition addrsymbol (id: ident) (ofs: int) := if symbol_is_external id then if Int.eq ofs Int.zero - then Eop (Oaddrsymbol id) Enil - else Eop (Olea (Aindexed ofs)) (Eop (Oaddrsymbol id) Enil ::: Enil) + then Eop (Oindirectsymbol id) Enil + else Eop (Olea (Aindexed ofs)) (Eop (Oindirectsymbol id) Enil ::: Enil) else Eop (Olea (Aglobal id ofs)) Enil. |