Better stop condition parsing hashtable literals.

2015-04-05 22:36:26 -07:00 · 2015-04-05 22:36:26 -07:00 · 55aeec08d3
parent ac9064bb54
commit 55aeec08d3
1 changed files with 2 additions and 1 deletions
--- a/kutils.lisp
+++ b/kutils.lisp
@ -39,7 +39,8 @@
 	    (if key-p
 		(push prev k)
 		(push prev v))))
-      (if key-p
+      (if (and (null k)
+	       (null v))
 	  (error "Mismatched key value pairs.")
 	  (progn 
 	    (finalise-kv-pair)