cur/cur-test/cur/tests/stdlib/bool.rkt
2016-01-09 22:06:21 -05:00

16 lines
391 B
Racket

#lang cur
(require rackunit)
(check-equal? (not true) false)
(check-equal? (not false) true)
(check-equal? (and true false) false)
(check-equal? (and false false) true)
(check-equal? (and false true) false)
(check-equal? (and true true) true)
(check-equal? (or true false) true)
(check-equal? (or false false) false)
(check-equal? (or false true) true)
(check-equal? (or true true) true)