diff options
| -rw-r--r-- | arm/Asmexpand.ml | 2 | ||||
| -rw-r--r-- | doc/ccomp.1 | 2 | ||||
| -rw-r--r-- | powerpc/Asmexpand.ml | 8 |
3 files changed, 6 insertions, 6 deletions
diff --git a/arm/Asmexpand.ml b/arm/Asmexpand.ml index a4ec0c5d..89aab5c7 100644 --- a/arm/Asmexpand.ml +++ b/arm/Asmexpand.ml @@ -18,7 +18,7 @@ open Asm open Asmexpandaux open AST open Camlcoq -open Integers +open! Integers exception Error of string diff --git a/doc/ccomp.1 b/doc/ccomp.1 index f4919867..89e8c823 100644 --- a/doc/ccomp.1 +++ b/doc/ccomp.1 @@ -485,7 +485,7 @@ Disabled by default. .sp \fIunused\-variable\fP: Unused local variables. -Enabled by default. +Disabled by default. .sp \fIvarargs\fP: Promotable vararg arguments. diff --git a/powerpc/Asmexpand.ml b/powerpc/Asmexpand.ml index 5ca4c611..704b0aba 100644 --- a/powerpc/Asmexpand.ml +++ b/powerpc/Asmexpand.ml @@ -14,7 +14,7 @@ of the PPC assembly code. *) open Camlcoq -open Integers +open! Integers open AST open Asm open Asmexpandaux @@ -30,8 +30,8 @@ let eref = (* Useful constants and helper functions *) -let _0 = Integers.Int.zero -let _1 = Integers.Int.one +let _0 = Int.zero +let _1 = Int.one let _2 = coqint_of_camlint 2l let _4 = coqint_of_camlint 4l let _6 = coqint_of_camlint 6l @@ -45,7 +45,7 @@ let _m4 = coqint_of_camlint (-4l) let _m8 = coqint_of_camlint (-8l) let _m16 = coqint_of_camlint (-16l) -let _0L = Integers.Int64.zero +let _0L = Int64.zero let _32L = coqint_of_camlint64 32L let _64L = coqint_of_camlint64 64L let _m1L = coqint_of_camlint64 (-1L) |