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

Remove dependency on compatibility/mlist.

Browse Source
This commit is contained in:
Sam Tobin-Hochstadt 2014-12-18 14:38:21 -05:00
parent 95617a200b
commit 37daa2bf65
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pkgs/racket-test-core/tests/racket/for.rktl
View File

@ -3,8 +3,7 @@
(Section 'for)
(require compatibility/mlist
"for-util.rkt")
(require "for-util.rkt")
(test-sequence [(0 1 2)] 3)
(test-sequence [(0 1 2)] (in-range 3))
@ -16,8 +15,8 @@
(test-sequence [(a b c)] '(a b c))
(test-sequence [(a b c)] (in-list '(a b c)))
(test-sequence [(a b c)] (mlist 'a 'b 'c))
(test-sequence [(a b c)] (in-mlist (mlist 'a 'b 'c)))
(test-sequence [(a b c)] (mcons 'a (mcons 'b (mcons 'c empty))))
(test-sequence [(a b c)] (in-mlist (mcons 'a (mcons 'b (mcons 'c empty)))))
(test-sequence [(a b c)] #(a b c))
(test-sequence [(a b c)] (in-vector #(a b c)))
(test-sequence [(a b c)] (in-vector (chaperone-vector #(a b c) (lambda (vec i val) val) (lambda (vec i val) val))))