function tst_debug_frame ()
  subfunction1 ();
  x = 1;
endfunction

function subfunction1 ()
  subfunction2 ();
  y = 2;
endfunction

function subfunction2 ()
  error ("Stop, and enter debugger");
  z = 3;
endfunction
