diff options
Diffstat (limited to 'src/interp/nruncomp.boot')
| -rw-r--r-- | src/interp/nruncomp.boot | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/interp/nruncomp.boot b/src/interp/nruncomp.boot index 33539fa0..0c60a502 100644 --- a/src/interp/nruncomp.boot +++ b/src/interp/nruncomp.boot @@ -466,7 +466,8 @@ buildFunctor(db,sig,code,$locals,$e) == catvecListMaker := removeDuplicates [comp($catsig,$EmptyMode,$e).expr, :[compCategories(u,$e) for [u,:.] in categoryAncestors dbDomainShell db]] - condCats := InvestigateConditions(db,[$catsig,:rest catvecListMaker],$e) + tbl := makeTable function valueEq? + condCats := InvestigateConditions(db,[$catsig,:rest catvecListMaker],tbl,$e) -- a list, one %for each element of catvecListMaker -- indicating under what conditions this -- category should be present. true => always |