X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/a535feed31204e82c6443411d16a03958c3ca4d2..4b8e5c0347115ff30841f1d1e71afe59ecb6c82c:/src/parser/parser-expr-proto.lisp

diff --git a/src/parser/parser-expr-proto.lisp b/src/parser/parser-expr-proto.lisp
index 7fc2609..ec35445 100644
--- a/src/parser/parser-expr-proto.lisp
+++ b/src/parser/parser-expr-proto.lisp
@@ -154,7 +154,7 @@
 
 (export 'simple-operator)
 (defclass simple-operator ()
-  ((function :initarg :function :reader operator-function)
+  ((%function :initarg :function :reader operator-function)
    (name :initarg :name :initform "<unnamed operator>"
 	 :reader operator-name))
   (:documentation