This commit is contained in:
John Kerl 2017-02-06 20:51:38 -05:00
parent 10dfef30cb
commit 5cfc976101

View file

@ -215,6 +215,7 @@ static void handle_for_map_aux(
for (mlhmmv_level_entry_t* pe = psubmap->pnext_level->phead; pe != NULL; pe = pe->pnext) {
// Bind the k-name to the entry-key mlrval:
local_stack_frame_t* pframe = local_stack_get_top_frame(pvars->plocal_stack);
// xxx note copy/ref semantics
local_stack_frame_define_terminal(pframe, prest_for_k_variable_names[0], prest_for_k_frame_relative_indices[0],
prest_for_k_type_masks[0], mv_copy(&pe->level_key));
// Recurse into the next-level submap:
@ -239,6 +240,7 @@ static void handle_for_map_aux(
} else {
// Bind the v-name to the terminal mlrval:
local_stack_frame_t* pframe = local_stack_get_top_frame(pvars->plocal_stack);
// xxx note copy/ref semantics
local_stack_frame_define_terminal(pframe, pstate->v_variable_name, pstate->v_frame_relative_index,
pstate->v_type_mask, mv_copy(&psubmap->terminal_mlrval));
// Execute the loop-body statements: