diff options
author | dos-reis <gdr@axiomatics.org> | 2008-04-21 21:29:49 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2008-04-21 21:29:49 +0000 |
commit | d2883391871a704dd5c5d9a28c947d5a54784b48 (patch) | |
tree | b3969730da0138f07790fefeaffc6561051b707d /src | |
parent | e754f97a6955b705b422e3cfa50274560d746d65 (diff) | |
download | open-axiom-d2883391871a704dd5c5d9a28c947d5a54784b48.tar.gz |
Fix thinko
Diffstat (limited to 'src')
-rw-r--r-- | src/interp/compiler.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot index 877749d2..71dbf34b 100644 --- a/src/interp/compiler.boot +++ b/src/interp/compiler.boot @@ -529,7 +529,7 @@ getFormModemaps(form is [op,:argl],e) == ++ flag arguments, and negative entries for normal argument passing. checkCallingConvention: (%List,%Short) -> %SimpleArray %Short checkCallingConvention(sigs,nargs) == - v := makeFilledSimpleArray(%Short,nargs,0) + v := makeFilledSimpleArray("%Short",nargs,0) for sig in sigs repeat for t in rest sig for i in 0.. repeat |