# HG changeset patch # User Steve Losh # Date 1458861227 0 # Node ID 49f24c78ecb34302e16739041e160b7378124287 # Parent 2eac9e1aed6d03bf1f8b75914e3519e534c49bc1 Grammaaeareraer diff -r 2eac9e1aed6d -r 49f24c78ecb3 src/wam.lisp --- a/src/wam.lisp Thu Mar 24 23:13:11 2016 +0000 +++ b/src/wam.lisp Thu Mar 24 23:13:47 2016 +0000 @@ -180,7 +180,7 @@ (keywordp term)) (parse-variable (var registers) - ;; If we've already seen this variable, just return it's position, + ;; If we've already seen this variable, just return its position, ;; otherwise allocate a register for it. (or (position var registers) (vector-push-extend var registers)))