suzanne.soy/whalesong
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

turning debug printing back on.

Browse Source
This commit is contained in:
Danny Yoo 2013-02-22 16:59:22 -07:00
parent de009f04d4
commit 2a133d4ad0
2 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
whalesong/compiler/compiler.rkt
View File

@ -263,9 +263,10 @@
(: compile-module-invoke (ModuleLocator -> InstructionSequence))
;; Generates code that will invoke a module (if it hasn't been invoked yet)
;; FIXME: assumes the module has already been linked. We should error out
;; if the module hasn't been linked yet.
;; Generates code that will invoke a module (if it hasn't been invoked
;; yet) FIXME: assumes the module has already been loaded/linked. We
;; should try to load the module, or error out if the module can't be
;; found.
(define (compile-module-invoke a-module-name)
(cond
[(kernel-module-name? a-module-name)

8
whalesong/compiler/optimize-il.rkt
View File

@ -188,8 +188,8 @@
(loop (rest stmts)))]
[(DebugPrint? a-stmt)
;(cons a-stmt (loop (rest stmts)))
(loop (rest stmts))
(cons a-stmt (loop (rest stmts)))
#;(loop (rest stmts))
]
[(Comment? a-stmt)
@ -344,8 +344,8 @@
#f]
[(DebugPrint? stmt)
;#f
#t]
#f
#;#t]
[(AssignImmediate? stmt)
(equal? (AssignImmediate-target stmt)