oops committed a bogus change, so rolling it back
svn: r16608 original commit: ab78a3ec0c7a47bb20bc8dd41f6e978fcb4d8408
This commit is contained in:
parent
e6f4b091b3
commit
8e9da1f1ed
|
@ -200,7 +200,6 @@
|
|||
(if (or (getenv "PLTDRCM")
|
||||
(getenv "PLTDRDEBUG"))
|
||||
(parameterize ([current-namespace (make-base-namespace)])
|
||||
(printf "hello?\n")
|
||||
(values
|
||||
(dynamic-require 'compiler/cm 'make-compilation-manager-load/use-compiled-handler)
|
||||
(dynamic-require 'compiler/cm 'manager-trace-handler)))
|
||||
|
@ -210,8 +209,7 @@
|
|||
(let ([old-load (current-load)])
|
||||
(λ (f expected)
|
||||
(splash-load-handler old-load f expected))))
|
||||
(printf ">> ~s\n" (list make-compilation-manager-load/use-compiled-handler
|
||||
manager-trace-handler))
|
||||
|
||||
(when (and make-compilation-manager-load/use-compiled-handler
|
||||
manager-trace-handler)
|
||||
(printf "PLTDRCM/PLTDRDEBUG: reinstalling CM load handler after setting splash load handler\n")
|
||||
|
|
Loading…
Reference in New Issue
Block a user