diff --git a/t/lists.t b/t/lists.t
new file mode 100644
index 0000000..80d9194
--- /dev/null
+++ b/t/lists.t
@@ -0,0 +1,7 @@
+(let ((lst (list 1 2 3)))
+  (write "# lst = ") (write-line lst)
+  (expect "Length of list is 3" (= (length lst) 3))
+  (expect "First element is 1" (= (first lst) 1))
+  (expect "Second element is 2" (= (second lst) 2))
+  (expect "Third element is 3" (= (nth 2 lst) 3))
+  )