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

use code inspector

Browse Source 
svn: r858
This commit is contained in:
Matthew Flatt 2005-09-15 17:50:32 +00:00
parent c73537ff13
commit 8a35993125
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/errortrace/stacktrace.ss
View File

@ -258,7 +258,7 @@
bodys)]) bodys)])
(rebuild expr (map cons bodys bodyl)))) (rebuild expr (map cons bodys bodyl))))
(define orig-inspector (current-inspector)) (define orig-inspector (current-code-inspector))
(define (certify orig new) (define (certify orig new)
(syntax-recertify new orig orig-inspector #f)) (syntax-recertify new orig orig-inspector #f))