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

commented out mred stuff to allow nightly testing.

Browse Source 
svn: r7278
This commit is contained in:
John Clements 2007-09-05 00:35:25 +00:00
parent a3e9c55bb9
commit 64a31bb0b3
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/stepper/private/model.ss
View File

@ -49,7 +49,8 @@
"macro-unwind.ss" "macro-unwind.ss"
"lifting.ss" "lifting.ss"
;; for breakpoint display ;; for breakpoint display
"display-break-stuff.ss") ;; (commented out to allow nightly testing)
#;"display-break-stuff.ss")
(define program-expander-contract (define program-expander-contract
((-> void?) ; init ((-> void?) ; init
@ -154,7 +155,8 @@
(set! steps-received (+ steps-received 1)) (set! steps-received (+ steps-received 1))
;; have to be careful else this won't be looked up right away: ;; have to be careful else this won't be looked up right away:
(when (getenv "PLTSTEPPERUNSAFE") ;; (commented out to allow nightly tests to proceed, 2007-09-04
#;(when (getenv "PLTSTEPPERUNSAFE")
(let ([steps-received/current steps-received]) (let ([steps-received/current steps-received])
(run-on-drscheme-side (run-on-drscheme-side
(lambda () (lambda ()