diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-04-18 10:18:42 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-04-18 10:18:42 +0000 |
| commit | 18cdfe64dbe07358b58d06a70b8d6bc2c276769d (patch) | |
| tree | bd6067535d38995b2df9fcb62fc1cde3d4b98566 /src/interp/br-op2.boot | |
| parent | c552f9de83083a649b74510b522ceaebbbc0283b (diff) | |
| download | open-axiom-18cdfe64dbe07358b58d06a70b8d6bc2c276769d.tar.gz | |
cleanup
Diffstat (limited to 'src/interp/br-op2.boot')
| -rw-r--r-- | src/interp/br-op2.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-op2.boot b/src/interp/br-op2.boot index 84cb23c6..e6b3de61 100644 --- a/src/interp/br-op2.boot +++ b/src/interp/br-op2.boot @@ -176,7 +176,7 @@ dbChooseOperandName(typ) == kind := name = "$" => 'domain getConstructorKindFromDB name - s := PNAME opOf typ + s := symbolName opOf typ kind ~= 'category => anySubstring?('"Integer",s,0) or anySubstring?('"Number",s,0) => x := first $NumberList |