Fix a small typo.

The documentation claims LIST-STRUCTURE returns the keyword :CIRCULAR, while it actually returns :CIRCULAT.
s-expressionists · Jun 3, 2018 · 6caccd3 · 6caccd3
1 parent b447d12
commit 6caccd3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/list-structure.lisp b/list-structure.lisp
@@ -38,7 +38,7 @@
 	  finally (return (values (hash-table-count table)
                                   (cond ((null remaining) :proper)
                                         ((atom remaining) :dotted)
-                                        (t :circulat)))))))
+                                        (t :circular)))))))
 
 (defun proper-list-p (cst)
   (eq (nth-value 1 (list-structure cst)) :proper))