diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-10-31 20:39:01 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-10-31 20:39:01 +0000 |
| commit | ad6ac4dc3c9662098ad38ca99cbf46d6315af52b (patch) | |
| tree | c1d7e39c42275df67b63d44e7153625253cf3b39 /src/boot/ast.boot | |
| parent | a91178099e67db918d6da5c03c3c2564363c55f1 (diff) | |
| download | open-axiom-ad6ac4dc3c9662098ad38ca99cbf46d6315af52b.tar.gz | |
* boot/ast.boot (genECLnativeTranslation): Fix thinko.
Diffstat (limited to 'src/boot/ast.boot')
| -rw-r--r-- | src/boot/ast.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/ast.boot b/src/boot/ast.boot index d461bcd3..f9246218 100644 --- a/src/boot/ast.boot +++ b/src/boot/ast.boot @@ -1409,7 +1409,7 @@ genECLnativeTranslation(op,s,t,op') == args := nil argtypes := nil for x in s repeat - argtypes := [nativeReturnType x,:argtypes] + argtypes := [nativeArgumentType x,:argtypes] args := [GENSYM(),:args] argtypes := nreverse argtypes args := nreverse args |