Ignore out-of-fuels with unknown provenance.

This commit is contained in:
Vincent St-Amour 2011-10-14 16:31:31 -04:00
parent 65dda11603
commit 8e580b5c6f

View File

@ -116,6 +116,7 @@
(and (equal? path where-path)
(= col where-col)
(= line where-line))]
[(hunoz #f) #t] ; we assume it is, to be conservative
[(hunoz hukairz) #f])]))
(define (inlining-event->forged-stx evt)