aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBernhard Schommer <bernhardschommer@gmail.com>2019-08-27 12:08:03 +0200
committerXavier Leroy <xavierleroy@users.noreply.github.com>2019-09-05 09:02:22 +0200
commitd3eba50731c23546c6e9ccb14230460fc1da592e (patch)
treeeb195a93fd9b51d881a2355faf81f06f71c31ec9
parente00cd179a4e76d2283580270a722b35d798ed07f (diff)
downloadcompcert-kvx-d3eba50731c23546c6e9ccb14230460fc1da592e.tar.gz
compcert-kvx-d3eba50731c23546c6e9ccb14230460fc1da592e.zip
Compatibility for OCaml 4.08.1
-rw-r--r--arm/Asmexpand.ml2
-rw-r--r--powerpc/Asmexpand.ml8
2 files changed, 5 insertions, 5 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/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)