Documentation of pop_temp

Global Index (short | long) | Local contents | Local Index (short | long)

Function Synopsis

var = pop_temp ( arg1 ) ;

Help text

 function var = pop_temp ( arg1 ) ;

Listing of function pop_temp

function var = pop_temp ( arg1 ) ;

  global TEMP_STACK

  if exist('arg1');
    if strcmp(lower(arg1),'all');
      TEMP_STACK = [];
    else
      error('POP_TEMP: invalid argument');
    end
  else
    m = TEMP_STACK(1); n = TEMP_STACK(2);
    var = TEMP_STACK((1:m*n)+2);
    if m<0; var = setstr(var); end;
    var = reshape(var,abs(m),abs(n));
    TEMP_STACK = TEMP_STACK(3+m*n:length(TEMP_STACK));
  end