summaryrefslogtreecommitdiff
path: root/backend/PrintCminor.ml
diff options
context:
space:
mode:
authorGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2012-12-29 16:55:38 +0000
committerGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2012-12-29 16:55:38 +0000
commit8539759095f95f2fbb680efc7633d868099114c8 (patch)
tree3401d7cd91686026090a21f600cf70ea4372ebf3 /backend/PrintCminor.ml
parent7e9c6fc9a51adc5e488c590d83c1e8ef5a256c9f (diff)
Merge of the clightgen branch:
- Alternate semantics for Clight where function parameters are temporaries, not variables - New pass SimplLocals that turns non-addressed local variables into temporaries - Simplified Csharpminor, Cshmgen and Cminorgen accordingly - SimplExpr starts its temporaries above variable names, therefoe Cminorgen no longer needs to encode variable names and temps names. - Simplified Cminor parser & printer, as well as Errors, accordingly. - New tool clightgen to produce Clight AST in Coq-parsable .v files. - Removed side condition "return type is void" on rules skip_seq in the semantics of CompCert C, Clight, C#minor, Cminor. - Adapted RTLgenproof accordingly (now uses a memory extension). git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2083 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'backend/PrintCminor.ml')
-rw-r--r--backend/PrintCminor.ml8
1 files changed, 2 insertions, 6 deletions
diff --git a/backend/PrintCminor.ml b/backend/PrintCminor.ml
index 8e49303..dfcabb3 100644
--- a/backend/PrintCminor.ml
+++ b/backend/PrintCminor.ml
@@ -41,13 +41,9 @@ let rec precedence = function
| Ebinop(Oor, _, _) -> (6, LtoR)
| Eload _ -> (15, RtoL)
-(* Naming idents. We assume idents are encoded as in Cminorgen. *)
+(* Naming idents. *)
-let ident_name id =
- match id with
- | Coq_xO n -> extern_atom n
- | Coq_xI n -> Printf.sprintf "$%ld" (camlint_of_positive n)
- | Coq_xH -> "$0"
+let ident_name = Camlcoq.extern_atom
(* Naming operators *)