diff options
Diffstat (limited to 'src/interp/define.boot')
-rw-r--r-- | src/interp/define.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/define.boot b/src/interp/define.boot index 5b73b5d9..350a5eb9 100644 --- a/src/interp/define.boot +++ b/src/interp/define.boot @@ -884,7 +884,7 @@ genDomainViewList(id,catlist) == mkOpVec(dom,siglist) == dom:= getPrincipalView dom substargs:= [['$,:dom.0],:pairList($FormalMapVariableList,rest dom.0)] - oplist:= getOperationAlistFromLisplib opOf dom.0 + oplist:= getConstructorOperationsFromDB opOf dom.0 --new form is (<op> <signature> <slotNumber> <condition> <kind>) ops:= MAKE_-VEC (#siglist) for (opSig:= [op,sig]) in siglist for i in 0.. repeat |