[Octave-bug-tracker] [bug #64778] VM: test anovan crashes octave

[Arun Giridhar]

Follow-up Comment #5, bug #64778 (project octave):

A simpler code with a nested function and a local function both work, so there
seems to be something specific to mDesignMatrix that is tripping up the VM.

This was the simpler code:

function retval = testnested (in1, in2)

  nested
  Y = local (X);
  for i = 1:numel(X)
    fprintf (1, "%d %s\n", X(i), in2{i});
  endfor
  Y

  function nested()
    clear in1
    X = (1:numel(in2)) * 10;
  endfunction

endfunction

function Y = local (X)
  Y = sin (X.^2 + X'.^2);
endfunction


And it works properly (the VM is enabled for this):

>> testnested (1:10, cellstr ("pqrst"'))
10 p
20 q
30 r
40 s
50 t
Y =
  -0.8733  -0.4678   0.8269  -0.3879  -0.9454
  -0.4678   0.8940  -0.5805   0.9300  -0.3050
   0.8269  -0.5805   0.1322  -0.6501   0.7151
  -0.3879   0.9300  -0.6501   0.9588  -0.2198
  -0.9454  -0.3050   0.7151  -0.2198  -0.9880




    _______________________________________________________

Reply to this item at:

  <https://savannah.gnu.org/bugs/?64778>

_______________________________________________
Message sent via Savannah
https://savannah.gnu.org/