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

Renamed set? to generic-set? and set-immutable? to set? in tests.

Browse Source
This commit is contained in:
Carl Eastlund 2013-08-28 01:44:14 -04:00
parent ec5a9616e0
commit 01b753c1d5
1 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
pkgs/racket-pkgs/racket-test/tests/racket/set.rktl
View File

@ -5,33 +5,33 @@
;; ----------------------------------------
(test #t set? (set))
(test #t generic-set? (set))
(test #t set-empty? (set))
(test #t set? (set 1 2 3))
(test #t generic-set? (set 1 2 3))
(test #f set-empty? (set 1 2 3))
(test #t set? (seteq))
(test #t generic-set? (seteq))
(test #t set-empty? (seteq))
(test #t set? (seteq 1 2 3))
(test #t generic-set? (seteq 1 2 3))
(test #f set-empty? (seteq 1 2 3))
(test #t set? (seteqv))
(test #t generic-set? (seteqv))
(test #t set-empty? (seteqv))
(test #t set? (seteqv 1 2 3))
(test #t generic-set? (seteqv 1 2 3))
(test #f set-empty? (seteqv 1 2 3))
(test #t set? (mutable-set))
(test #t generic-set? (mutable-set))
(test #t set-empty? (mutable-set))
(test #t set? (mutable-set 1 2 3))
(test #t generic-set? (mutable-set 1 2 3))
(test #f set-empty? (mutable-set 1 2 3))
(test #t set? (mutable-seteq))
(test #t generic-set? (mutable-seteq))
(test #t set-empty? (mutable-seteq))
(test #t set? (mutable-seteq 1 2 3))
(test #t generic-set? (mutable-seteq 1 2 3))
(test #f set-empty? (mutable-seteq 1 2 3))
(test #t set? (mutable-seteqv))
(test #t generic-set? (mutable-seteqv))
(test #t set-empty? (mutable-seteqv))
(test #t set? (mutable-seteqv 1 2 3))
(test #t generic-set? (mutable-seteqv 1 2 3))
(test #f set-empty? (mutable-seteqv 1 2 3))
(test #t set? (list))
(test #t generic-set? (list))
(test #t set-empty? (list))
(test #t set? (list 1 2 3))
(test #t generic-set? (list 1 2 3))
(test #f set-empty? (list 1 2 3))
(test #f set-eq? (set 1 2 3))