Trying to simplify env references.

2011-03-07 17:10:11 -05:00 · 2011-03-07 17:10:11 -05:00 · a34fc8b1a1
commit a34fc8b1a1
parent 82851496e2
1 changed files with 2 additions and 3 deletions
--- a/compile.rkt
+++ b/compile.rkt
@ -209,7 +209,7 @@
                             (map (lambda: ([var : Symbol])
                                           (find-variable var cenv))
                                  free-vars)]
-          [lexical-references : (Listof (U EnvLexicalReference EnvWholePrefixReference))
+          [lexical-references : (Listof EnvReference)
                              (collect-lexical-references lexical-addresses)])
         (append-instruction-sequences
          (end-with-linkage 
@ -230,8 +230,7 @@
  

 (: compile-lambda-body (Lam CompileTimeEnvironment 
-                            (Listof (U EnvLexicalReference
-                                       EnvWholePrefixReference))
+                            (Listof EnvReference)
                            Linkage 
                            -> 
                            InstructionSequence))