diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-10-17 16:39:46 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-10-17 16:39:46 +0000 |
| commit | 3c30d3680a1310bf570c0ae65d5ff6c8d4b9e62e (patch) | |
| tree | 625d0962870b7b79056e4dc7a621ac5a0cdc6249 /src/interp | |
| parent | 609d4bee769c002962f07d350a37990de05948fc (diff) | |
| download | open-axiom-3c30d3680a1310bf570c0ae65d5ff6c8d4b9e62e.tar.gz | |
Fix AW/410
* interp/i-syscmd.boot (displaySpad2Cmd): Handle constructor
abbreviation.
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/i-syscmd.boot | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/interp/i-syscmd.boot b/src/interp/i-syscmd.boot index 21abc32b..b3fcd0e9 100644 --- a/src/interp/i-syscmd.boot +++ b/src/interp/i-syscmd.boot @@ -877,7 +877,12 @@ displaySpad2Cmd l == option = 'abbreviations => null vl => listConstructorAbbreviations() - for v in vl repeat abbQuery(opOf v) + for v in vl repeat + abbQuery + -- unbbeviate if necessary + v := opOf v + ctor:= abbreviation? v => ctor + v option = 'operations => displayOperations vl option = 'macros => displayMacros vl |
