LVAL iview_scaled_range() { LVAL object = xlgaobject(), result; int set = (xlargc > 1) ? TRUE : FALSE, draw; wind = get_iview_address(object); draw = draw_key_arg(TRUE); range_type = 'S'; result = range(); if (set) check_redraw(object, draw, FALSE); return(result); }
LVAL iview_range(V) { LVAL object = xlgaobject(), result, *oldargv = NULL; int set = (xlargc > 1) ? TRUE : FALSE, draw, oldargc = 0; wind = (IVIEW_WINDOW) get_iview_address(object); draw = draw_key_arg(TRUE); range_type = 'N'; if (set) { oldargc = xlargc; oldargv = xlargv; } result = range(); if (set) { xlargc = oldargc - 3; xlargv = oldargv + 3; check_redraw(object, draw, FALSE); } return(result); }