aboutsummaryrefslogtreecommitdiff
path: root/src/boot/ast.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/boot/ast.boot')
-rw-r--r--src/boot/ast.boot2
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