Renamed Scoping and Parsetree

This commit is contained in:
Cédric Pasteur 2010-07-05 16:05:43 +02:00
parent 7ed81a8950
commit 2fd0860ba8
5 changed files with 5 additions and 5 deletions

View File

@ -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;

View File

@ -3,7 +3,7 @@
open Signature
open Location
open Names
open Parsetree
open Hept_parsetree
%}

View File

@ -2,7 +2,7 @@
names by qualified names *)
open Location
open Parsetree
open Hept_parsetree
open Names
open Ident
open Format

View File

@ -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 *)