summaryrefslogtreecommitdiff
path: root/src/compiler.cc
diff options
context:
space:
mode:
authorAdrian Thurston <thurston@complang.org>2015-04-03 10:58:38 -0400
committerAdrian Thurston <thurston@complang.org>2015-04-03 10:58:38 -0400
commit1e4058617a988cc7474bb3f1c7e12e5d62f94072 (patch)
tree3be333b8575ce6704d51732574582d6a2c2c8ff5 /src/compiler.cc
parent6bdea623f33a6e11e263b9983f6863b54023e399 (diff)
downloadcolm-1e4058617a988cc7474bb3f1c7e12e5d62f94072.tar.gz
added stack pointer to the extension func arg list
Diffstat (limited to 'src/compiler.cc')
-rw-r--r--src/compiler.cc4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/compiler.cc b/src/compiler.cc
index 5a5bf71e..b7714a92 100644
--- a/src/compiler.cc
+++ b/src/compiler.cc
@@ -1099,7 +1099,7 @@ void Compiler::generateOutput( long activeRealm )
*/
for ( FunctionList::Iter hc = inHostList; hc.lte(); hc++ ) {
*outStream <<
- "Value " << hc->hostCall << "( Program *prg";
+ "Value " << hc->hostCall << "( Program *prg, Tree **sp";
for ( ParameterList::Iter p = *hc->paramList; p.lte(); p++ ) {
*outStream <<
", Value";
@@ -1124,7 +1124,7 @@ void Compiler::generateOutput( long activeRealm )
}
*outStream <<
- " rtn = " << hc->hostCall << "( prg";
+ " rtn = " << hc->hostCall << "( prg, sp";
pos = 0;
for ( ParameterList::Iter p = *hc->paramList; p.lte(); p++, pos++ ) {