"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "common/core_globals.cc" between
free42-3.0.1.tar.gz and free42-3.0.2.tar.gz

About: Free42 is a re-implementation of the HP-42S scientific calculator and the HP-82240 printer.

core_globals.cc  (free42-3.0.1):core_globals.cc  (free42-3.0.2)
skipping to change at line 3127 skipping to change at line 3127
free_vartype(dups[j]); free_vartype(dups[j]);
return ERR_INSUFFICIENT_MEMORY; return ERR_INSUFFICIENT_MEMORY;
} }
vartype **st_data = ((vartype_list *) st)->array->data; vartype **st_data = ((vartype_list *) st)->array->data;
st_data[0] = new_string(flags.f.big_stack ? "1" : "0", 1); st_data[0] = new_string(flags.f.big_stack ? "1" : "0", 1);
if (st_data[0] == NULL) { if (st_data[0] == NULL) {
free_vartype(st); free_vartype(st);
goto nomem; goto nomem;
} }
memcpy(st_data + 1, stack, save_levels * sizeof(vartype *)); if (!flags.f.big_stack) {
memmove(stack + n_dups, stack + sp - 3 + n_dups, (sp + 1 - save_levels) * si memcpy(st_data + 1, stack, save_levels * sizeof(vartype *));
zeof(vartype *)); memmove(stack + n_dups, stack + sp - 3 + n_dups, (sp + 1 - save_levels)
memcpy(stack, dups, n_dups * sizeof(vartype *)); * sizeof(vartype *));
sp -= save_levels - n_dups; memcpy(stack, dups, n_dups * sizeof(vartype *));
sp -= save_levels - n_dups;
}
store_private_var("ST", 2, st); store_private_var("ST", 2, st);
flags.f.big_stack = big; flags.f.big_stack = big;
if (rtn_level == 0) if (rtn_level == 0)
rtn_level_0_has_func_state = true; rtn_level_0_has_func_state = true;
else else
rtn_stack[rtn_sp - 1].set_has_func(true); rtn_stack[rtn_sp - 1].set_has_func(true);
return ERR_NONE; return ERR_NONE;
} }
 End of changes. 1 change blocks. 
5 lines changed or deleted 7 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)