From 790c187f338303d3b9a47cd3e08ba34d8cc75191 Mon Sep 17 00:00:00 2001 From: xleroy Date: Wed, 18 Aug 2010 09:10:05 +0000 Subject: Renamed C2Clight into C2C git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1468 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- arm/PrintAsm.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'arm') diff --git a/arm/PrintAsm.ml b/arm/PrintAsm.ml index b3f49cd6..c2fc8a9e 100644 --- a/arm/PrintAsm.ml +++ b/arm/PrintAsm.ml @@ -523,7 +523,7 @@ let print_function oc name code = currpos := 0; fprintf oc " .text\n"; fprintf oc " .align 2\n"; - if not (C2Clight.atom_is_static name) then + if not (C2C.atom_is_static name) then fprintf oc " .global %a\n" print_symb name; fprintf oc " .type %a, %%function\n" print_symb name; fprintf oc "%a:\n" print_symb name; @@ -616,7 +616,7 @@ let print_var oc (Coq_pair(name, v)) = then fprintf oc " .const\n" else fprintf oc " .data\n"; fprintf oc " .align 2\n"; - if not (C2Clight.atom_is_static name) then + if not (C2C.atom_is_static name) then fprintf oc " .global %a\n" print_symb name; fprintf oc " .type %a, %%object\n" print_symb name; fprintf oc "%a:\n" print_symb name; -- cgit