summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAdrian Thurston <thurston@complang.org>2015-03-30 17:35:50 -0400
committerAdrian Thurston <thurston@complang.org>2015-03-30 17:35:50 -0400
commit03e0f380a472db828c3bd5ae481a6b1c10fed3d0 (patch)
tree0ff917171b90a6287a2c506b6781f4927d04d715
parentf6d2805b11de9dc90577cdf5d6e4fc5486f66fbf (diff)
downloadcolm-03e0f380a472db828c3bd5ae481a6b1c10fed3d0.tar.gz
added some missing uses of vm_{g,s}et_local
-rw-r--r--src/bytecode.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/src/bytecode.c b/src/bytecode.c
index f0f20b64..eb46bc57 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -242,18 +242,18 @@ static long stream_push_stream( Program *prg, Tree **sp,
return -1;
}
-static void set_local( Tree **frame, long field, Tree *tree )
+static void set_local( Execution *exec, long field, Tree *tree )
{
if ( tree != 0 )
assert( tree->refs >= 1 );
- frame[field] = tree;
+ vm_set_local( exec, field, tree );
}
-static Tree *get_local_split( Program *prg, Tree **frame, long field )
+static Tree *get_local_split( Program *prg, Execution *exec, long field )
{
- Tree *val = frame[field];
+ Tree *val = vm_get_local( exec, field );
Tree *split = splitTree( prg, val );
- frame[field] = split;
+ vm_set_local( exec, field, split );
return split;
}
@@ -770,7 +770,7 @@ again:
mark[ca->mark_leave] - mark[ca->mark_enter] );
Tree *string = constructString( prg, data );
treeUpref( string );
- set_local( exec->framePtr, -1 - i, string );
+ set_local( exec, -1 - i, string );
}
break;
}
@@ -892,7 +892,7 @@ again:
debug( prg, REALM_BYTECODE, "IN_GET_LOCAL_WC %hd\n", field );
- Tree *split = get_local_split( prg, exec->framePtr, field );
+ Tree *split = get_local_split( prg, exec, field );
treeUpref( split );
vm_push_tree( split );
break;
@@ -904,7 +904,7 @@ again:
Tree *val = vm_pop_tree();
treeDownref( prg, sp, vm_get_local(exec, field) );
- set_local( exec->framePtr, field, val );
+ set_local( exec, field, val );
break;
}
case IN_GET_LOCAL_VAL_R: {