diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-03-05 16:46:00 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-03-05 16:46:00 +0000 |
| commit | 382517ec42b83bef4bb6effa31b2e8cc70dada5d (patch) | |
| tree | facc962192caedbe0af083a768fdee3c0dd6df8c /src/interp/functor.boot | |
| parent | b751bf4b87bb5f784e3a08185e69a43efac23e48 (diff) | |
| download | open-axiom-382517ec42b83bef4bb6effa31b2e8cc70dada5d.tar.gz | |
* interp/as.boot: Use getConstructorAbbreviationFromDB.
* interp/br-con.boot: Likewise.
* interp/br-data.boot: Likewise.
* interp/br-prof.boot: Likewise.
* interp/br-util.boot: Likewise.
* interp/c-doc.boot: Likewise.
* interp/clammed.boot: Likewise.
* interp/database.boot: Likewise.
* interp/define.boot: Likewise.
* interp/format.boot: Likewise.
* interp/functor.boot: Likewise.
* interp/g-cndata.boot: Likewise.
* interp/i-funsel.boot: Likewise.
* interp/i-output.boot: Likewise.
* interp/lisplib.boot: Likewise.
* interp/pspad1.boot: Likewise.
Diffstat (limited to 'src/interp/functor.boot')
| -rw-r--r-- | src/interp/functor.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/functor.boot b/src/interp/functor.boot index cc6e9611..9f78f0c9 100644 --- a/src/interp/functor.boot +++ b/src/interp/functor.boot @@ -906,7 +906,7 @@ getCaps x == getAbbreviation(name,c) == --returns abbreviation of name with c arguments - x := constructor? name + x := getConstructorAbbreviationFromDB name X := ASSQ(x,$abbreviationTable) => N:= ASSQ(name,rest X) => C:= ASSQ(c,rest N) => rest C --already there |