Commit 375d3168 authored by pfdietz's avatar pfdietz
Browse files

Added test suggested by Peter Graves.

parent 1f08608d
......@@ -40,6 +40,14 @@
;;; Test suggested by Peter Graves
(deftest append.7
(let ((x (list 'a 'b 'c 'd)))
(eq (append x nil) x))
;;; Order of evaluation tests
(deftest append.order.1
(let ((i 0) x y z)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment