# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1458861191 0
# Node ID 2eac9e1aed6d03bf1f8b75914e3519e534c49bc1
# Parent  ab4655b23ced08d83f46a8b3e74f13419db7e4d5
Remove unused function

diff -r ab4655b23ced -r 2eac9e1aed6d src/wam.lisp
--- a/src/wam.lisp	Thu Mar 24 23:08:43 2016 +0000
+++ b/src/wam.lisp	Thu Mar 24 23:13:11 2016 +0000
@@ -173,9 +173,6 @@
       (f :w)))
 
 
-(defun variable-p (term)
-  (keywordp term))
-
 (defun parse-term (term)
   "Parse a term into a series of register assignments."
   (labels ((variable-p