diff options
author | Adrian Thurston <thurston@complang.org> | 2015-03-30 17:35:50 -0400 |
---|---|---|
committer | Adrian Thurston <thurston@complang.org> | 2015-03-30 17:35:50 -0400 |
commit | 03e0f380a472db828c3bd5ae481a6b1c10fed3d0 (patch) | |
tree | 0ff917171b90a6287a2c506b6781f4927d04d715 | |
parent | f6d2805b11de9dc90577cdf5d6e4fc5486f66fbf (diff) | |
download | colm-03e0f380a472db828c3bd5ae481a6b1c10fed3d0.tar.gz |
added some missing uses of vm_{g,s}et_local
-rw-r--r-- | src/bytecode.c | 16 |
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: { |