Fixing last dumb mistake?

This commit is contained in:
Jay McCarthy 2012-01-05 14:57:08 -07:00
parent 0bf92dbc29
commit 061007f30f

View File

@ -13,6 +13,10 @@
(define (gc:cons? loc) #f)
(define (gc:set-first! pr new) (void))
(define (gc:set-rest! pr new) (void))
(define (gc:closure code-ptr env) 0)
(define (gc:closure-code-ptr ptr) #f)
(define (gc:closure-env-ref ptr i) 0)
(define (gc:closure? ptr) #f)
(with-heap (vector 1 2 3)
(test (gc:deref 0) #f))