diff options
Diffstat (limited to 'src/interp/br-search.boot')
| -rw-r--r-- | src/interp/br-search.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-search.boot b/src/interp/br-search.boot index 7ee5c8ca..026ff895 100644 --- a/src/interp/br-search.boot +++ b/src/interp/br-search.boot @@ -317,7 +317,7 @@ mkGrepPattern1(x,:options) == --called by mkGrepPattern (and grepConstructName?) conform2OutputForm(form) == [op,:args] := form null args => form - cosig := rest getDualSignatureFromDB op + cosig := rest getDualSignature op atypes := getConstructorModemap(op).mmSource sargl := [fn for x in args for atype in atypes for pred in cosig] where fn() == pp [x,atype,pred] |