home
/
code
/
tiger.ml.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Sketch-out a dummy escape-finding module
[tiger.ml.git]
/
compiler
/
src
/
lib
/
tiger
/
tiger_semant.ml
diff --git
a/compiler/src/lib/tiger/tiger_semant.ml
b/compiler/src/lib/tiger/tiger_semant.ml
index
a6e4af6
..
25eb2ce
100644
(file)
--- a/
compiler/src/lib/tiger/tiger_semant.ml
+++ b/
compiler/src/lib/tiger/tiger_semant.ml
@@
-4,6
+4,7
@@
module A = Tiger_absyn
module Dag = Tiger_dag
module Env = Tiger_env
module E = Tiger_error
module Dag = Tiger_dag
module Env = Tiger_env
module E = Tiger_error
+module Escape = Tiger_semant_escape
module Pos = Tiger_position
module Sym = Tiger_symbol
module Translate = Tiger_translate
module Pos = Tiger_position
module Sym = Tiger_symbol
module Translate = Tiger_translate
@@
-403,5
+404,6
@@
end
open Semant
let transProg absyn =
open Semant
let transProg absyn =
+ Escape.find absyn;
let {exp = _; ty = _} = transExp absyn ~env:Env.base in
()
let {exp = _; ty = _} = transExp absyn ~env:Env.base in
()
This page took
0.019472 seconds
and
4
git commands to generate.