whalesong/tests/more-tests/booleans-cs019.rkt
2011-10-03 16:00:16 -04:00

23 lines
277 B
Racket

#lang planet dyoo/whalesong/cs019
(boolean? "t")
(boolean? #t)
(boolean? 0)
(boolean? #\t)
(char? "t")
(char? #t)
(char? 0)
(char? #\t)
(char=? #\a #\b)
(char=? #\a #\a)
(char=? #\a #\a #\b)
(char=? #\a #\b #\a)
(char=? #\a #\a #\a)
true
false
(false? true)
(false? false)