simon/beowulf
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Still preparing for the big shift to property lists.

Browse source
This commit is contained in:
Simon Brooke 2023-04-02 12:57:26 +01:00
parent b61e7c3e8c
commit 50d4b4348e
26 changed files with 435 additions and 445 deletions
Download patch file Download diff file Expand all files Collapse all files

10
test/beowulf/lisp_test.clj
View file

@ -119,11 +119,11 @@
input "(LENGTH '(1 2 3))"
actual (reps input)]
(is (= actual expected))))
(testing "length of dot-terminated list"
(let [expected "3"
input "(LENGTH '(1 2 3 . 4))"
actual (reps input)]
(is (= actual expected))))
;; (testing "length of dot-terminated list"
;; (let [expected "3"
;; input "(LENGTH '(1 2 3 . 4))"
;; actual (reps input)]
;; (is (= actual expected))))
(testing "length of assoc list"
(let [expected "3"
input "(LENGTH (PAIR '(A B C) '(1 2 3)))"