Renamed Scoping and Parsetree
This commit is contained in:
parent
7ed81a8950
commit
2fd0860ba8
5 changed files with 5 additions and 5 deletions
compiler
|
@ -32,7 +32,7 @@ let check_implementation modname filename =
|
|||
let p = parse_implementation lexbuf in
|
||||
|
||||
(* Convert the parse tree to Heptagon AST *)
|
||||
let p = Scoping.translate_program p in
|
||||
let p = Hept_scoping.translate_program p in
|
||||
comment "Parsing";
|
||||
pp p;
|
||||
|
||||
|
|
|
@ -3,7 +3,7 @@
|
|||
open Signature
|
||||
open Location
|
||||
open Names
|
||||
open Parsetree
|
||||
open Hept_parsetree
|
||||
|
||||
%}
|
||||
|
||||
|
|
|
@ -2,7 +2,7 @@
|
|||
names by qualified names *)
|
||||
|
||||
open Location
|
||||
open Parsetree
|
||||
open Hept_parsetree
|
||||
open Names
|
||||
open Ident
|
||||
open Format
|
|
@ -44,7 +44,7 @@ let compile_impl modname filename =
|
|||
let p = parse_implementation lexbuf in
|
||||
|
||||
(* Convert the parse tree to Heptagon AST *)
|
||||
let p = Scoping.translate_program p in
|
||||
let p = Hept_scoping.translate_program p in
|
||||
comment "Parsing";
|
||||
|
||||
pp p;
|
||||
|
@ -68,7 +68,7 @@ let compile_impl modname filename =
|
|||
comment "Translation into Obc";
|
||||
Obc_printer.print obc o;
|
||||
|
||||
let pp = Obc.Printer.print stdout in
|
||||
let pp = Obc_printer.print stdout in
|
||||
if !verbose then pp o;
|
||||
|
||||
(* Translation into dataflow and sequential languages *)
|
||||
|
|
Loading…
Reference in a new issue