diff options
Diffstat (limited to 'cfrontend/C2C.ml')
| -rw-r--r-- | cfrontend/C2C.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/cfrontend/C2C.ml b/cfrontend/C2C.ml index c9beaf7..9a93017 100644 --- a/cfrontend/C2C.ml +++ b/cfrontend/C2C.ml @@ -22,6 +22,8 @@ open Builtins open Camlcoq open AST open Values +open Ctypes +open Cop open Csyntax open Initializers @@ -723,7 +725,7 @@ let convertGlobvar env (sto, id, ty, optinit) = let init' = match optinit with | None -> - if sto = C.Storage_extern then [] else [Init_space(Csyntax.sizeof ty')] + if sto = C.Storage_extern then [] else [Init_space(Ctypes.sizeof ty')] | Some i -> convertInitializer env ty i in let align = |