aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-op2.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/br-op2.boot')
-rw-r--r--src/interp/br-op2.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-op2.boot b/src/interp/br-op2.boot
index 3d576881..9c279f8e 100644
--- a/src/interp/br-op2.boot
+++ b/src/interp/br-op2.boot
@@ -544,7 +544,7 @@ opPageFastPath opstring ==
mmList := getAllModemapsFromDatabase(op,nil) or return nil
opAlist := [[op,:[item for mm in mmList]]] where item() ==
[predList, origin, sig] := modemap2Sig(op, mm)
- predicate := predList and MKPF(predList,'AND)
+ predicate := predList and mkpf(predList,'AND)
exposed? := isExposedConstructor opOf origin
[sig, predicate, origin, exposed?]
opAlist