diff options
Diffstat (limited to 'src/interp/spad.lisp')
| -rw-r--r-- | src/interp/spad.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/spad.lisp b/src/interp/spad.lisp index 7761a1ef..3565ee15 100644 --- a/src/interp/spad.lisp +++ b/src/interp/spad.lisp @@ -456,7 +456,7 @@ (defun |knownEqualPred| (dom) (let ((fun (|compiledLookup| '= '((|Boolean|) $ $) dom))) - (if fun (get (bpiname (car fun)) '|SPADreplace|) + (if fun (|getFunctionReplacement| (bpiname (car fun))) nil))) (defun |hashable| (dom) |