diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-08-04 13:56:52 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-08-04 13:56:52 +0000 |
| commit | 9a593e3b395c1ba0c6036760c12713d7485f8c54 (patch) | |
| tree | dd8eadbf07dde50ca15d6aa4181c902ad7b09d3c /src/boot/translator.boot | |
| parent | e77d30ccf1b663aaa6ec1e017fa8e31f3296afeb (diff) | |
| download | open-axiom-9a593e3b395c1ba0c6036760c12713d7485f8c54.tar.gz | |
cleanup
Diffstat (limited to 'src/boot/translator.boot')
| -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 bc445495..c939e52b 100644 --- a/src/boot/translator.boot +++ b/src/boot/translator.boot @@ -425,7 +425,7 @@ translateToplevel(b,export?) == b is ["TUPLE",:xs] => coreError '"invalid AST" case b of %Signature(op,t) => [genDeclaration(op,t)] - %Definition(op,args,body) => rest bfDef(op,args,body) + %Definition(op,args,body) => bfDef(op,args,body).args %Module(m,ns,ds) => $currentModuleName := m |