diff options
Diffstat (limited to 'src/interp/br-con.boot')
-rw-r--r-- | src/interp/br-con.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-con.boot b/src/interp/br-con.boot index d1c1911c..d8499ed6 100644 --- a/src/interp/br-con.boot +++ b/src/interp/br-con.boot @@ -273,7 +273,7 @@ domainDescendantsOf(conform,domform) == main where --called by kargPage for x in r repeat x isnt [op1,:.] and MEMQ(op1,'(ATTRIBUTE SIGNATURE)) => systemError x alist := [[item,:npred] for [item,:pred] in alist | - (pred1 := simpHasPred ['has,item,x]) and (npred := quickAnd(pred1,pred))] + (pred1 := simpHasPred ["has",item,x]) and (npred := quickAnd(pred1,pred))] alist --======================================================================= |