Add simple tests for keywords
This commit is contained in:
parent
b014552d09
commit
63af87b9ca
1 changed files with 5 additions and 0 deletions
5
t/keyword.t
Normal file
5
t/keyword.t
Normal file
|
@ -0,0 +1,5 @@
|
||||||
|
(let ((a 'a)
|
||||||
|
(b 'b))
|
||||||
|
(expect "equal to itself" (equal a a))
|
||||||
|
(expect "equal to identical keyword" (equal a 'a))
|
||||||
|
(expect "not equal to different keyword" (not (equal a 'b))))
|
Loading…
Reference in a new issue