diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-05-14 17:17:16 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-05-14 17:17:16 +0000 |
| commit | 41799861da0bd4f8a68acb2634e2ecb3e9038fc4 (patch) | |
| tree | 89940ddf132e2253a1c18b3406619e858eb459d9 /src | |
| parent | 81c55a49db8873b2a67f3c7c8ffe3786731e81bd (diff) | |
| download | open-axiom-41799861da0bd4f8a68acb2634e2ecb3e9038fc4.tar.gz | |
cleanup
Diffstat (limited to 'src')
| -rw-r--r-- | src/boot/translator.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/translator.boot b/src/boot/translator.boot index 6dba8a2f..84eebde8 100644 --- a/src/boot/translator.boot +++ b/src/boot/translator.boot @@ -671,7 +671,7 @@ shoeItem (str)== stripm (x,pk,bt)== atom x => symbol? x => - SYMBOL_-PACKAGE x = bt => makeSymbol(symbolName x,pk) + symbolScope x = bt => makeSymbol(symbolName x,pk) x x [stripm(first x,pk,bt),:stripm(rest x,pk,bt)] |