fix a test

This commit is contained in:
Matthew Flatt 2013-06-22 06:27:47 -06:00
parent c8de8d3ae8
commit ede94761b3

View File

@ -488,7 +488,7 @@
(check '(relative-in (lib "racket/main.rkt") "string.rkt"))
(check '(relative-in (lib "racket") "string.rkt"))
(check '(relative-in (lib "main.rkt" "racket") "string.rkt"))
(check `(relative-in ,(collection-file-path "delay.rkt" "racket") "string.rkt"))
(check `(relative-in ,(collection-file-path "promise.rkt" "racket") "string.rkt"))
(check '(relative-in racket (relative-in "private/reqprov.rkt" "../string.rkt"))))
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;