diff options
| author | Xavier Leroy <xavier.leroy@college-de-france.fr> | 2019-07-06 09:36:01 +0200 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@college-de-france.fr> | 2019-07-06 09:36:01 +0200 |
| commit | 39c55cc00a35af8677ce3e0661e053e57081b183 (patch) | |
| tree | 1babdf8007d978d8143fef80435d388b22afc0b1 | |
| parent | 68e22ac70b911047e01f9917a343b7f402a0791f (diff) | |
| download | compcert-no-pervasives.tar.gz compcert-no-pervasives.zip | |
Clarify "open" statementsno-pervasives
OCaml 4.08.0 has stricter warnings concerning open statements that
shadow module names.
| -rw-r--r-- | backend/PrintAsm.ml | 3 | ||||
| -rw-r--r-- | backend/PrintCminor.ml | 2 | ||||
| -rw-r--r-- | driver/Interp.ml | 2 |
3 files changed, 3 insertions, 4 deletions
diff --git a/backend/PrintAsm.ml b/backend/PrintAsm.ml index dd428808..155f5e55 100644 --- a/backend/PrintAsm.ml +++ b/backend/PrintAsm.ml @@ -13,7 +13,6 @@ open AST open Camlcoq -open DwarfPrinter open PrintAsmaux open Printf open Sections @@ -177,7 +176,7 @@ module Printer(Target:TARGET) = let address = Target.address end - module DebugPrinter = DwarfPrinter (DwarfTarget) + module DebugPrinter = DwarfPrinter.DwarfPrinter (DwarfTarget) end let print_program oc p = diff --git a/backend/PrintCminor.ml b/backend/PrintCminor.ml index f68c1267..8c255a65 100644 --- a/backend/PrintCminor.ml +++ b/backend/PrintCminor.ml @@ -16,7 +16,7 @@ (** Pretty-printer for Cminor *) open Format -open Camlcoq +open !Camlcoq open Integers open AST open PrintAST diff --git a/driver/Interp.ml b/driver/Interp.ml index 2c0867e3..a6841460 100644 --- a/driver/Interp.ml +++ b/driver/Interp.ml @@ -15,7 +15,7 @@ open Format open Camlcoq open AST -open Integers +open !Integers open Values open Memory open Globalenvs |