From b6e17910ddf7874e2d6d02623414674a654f9fcc Mon Sep 17 00:00:00 2001 From: xleroy Date: Thu, 9 Mar 2006 09:38:44 +0000 Subject: Renommage List -> CList lors de l'extraction git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@8 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- caml/CMparser.mly | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'caml/CMparser.mly') diff --git a/caml/CMparser.mly b/caml/CMparser.mly index 0b19bce9..99e2a6c3 100644 --- a/caml/CMparser.mly +++ b/caml/CMparser.mly @@ -2,7 +2,7 @@ %{ open Datatypes -open List +open CList open Camlcoq open BinPos open BinInt @@ -134,9 +134,9 @@ let orbool e1 e2 = prog: global_declarations proc_list EOF - { { prog_funct = List.rev $2; + { { prog_funct = CList.rev $2; prog_main = intern_string "main"; - prog_vars = List.rev $1; } } + prog_vars = CList.rev $1; } } ; global_declarations: @@ -164,8 +164,8 @@ proc: RBRACE { Coq_pair($1, { fn_sig = $6; - fn_params = List.rev $3; - fn_vars = List.rev $9; + fn_params = CList.rev $3; + fn_vars = CList.rev $9; fn_stackspace = $8; fn_body = $10 }) } ; @@ -196,7 +196,7 @@ stack_declaration: var_declarations: /* empty */ { Coq_nil } - | var_declarations var_declaration { List.app $2 $1 } + | var_declarations var_declaration { CList.app $2 $1 } ; var_declaration: -- cgit