diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-08-22 02:09:12 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-08-22 02:09:12 +0000 |
| commit | c1bf697ff6bf2b914a40b3e867a84762cf214cf1 (patch) | |
| tree | dabb4e77ac5f6549e7c26bef740ae34b4ba9fdc6 /src/interp/br-search.boot | |
| parent | 01d00dd8cc892cd2666297557dd3dc68c0f273c8 (diff) | |
| download | open-axiom-c1bf697ff6bf2b914a40b3e867a84762cf214cf1.tar.gz | |
* interp/database.boot (getConstructorModemap): Rename from
getConstructorModemapFromDB. Adjust callers.
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 aa1d3cbe..7ee5c8ca 100644 --- a/src/interp/br-search.boot +++ b/src/interp/br-search.boot @@ -318,7 +318,7 @@ conform2OutputForm(form) == [op,:args] := form null args => form cosig := rest getDualSignatureFromDB op - atypes := getConstructorModemapFromDB(op).mmSource + atypes := getConstructorModemap(op).mmSource sargl := [fn for x in args for atype in atypes for pred in cosig] where fn() == pp [x,atype,pred] pred => conform2OutputForm x |