view test/bug-53027/ntest53027b.m @ 31610:3b7852a822e8

maint: Merge stable to default.
author John W. Eaton <jwe@octave.org>
date Fri, 02 Dec 2022 10:12:40 -0500
parents c16ad80274c9
children
line wrap: on
line source

function [m_exist, n_exist] = ntest53027b ()
  global x
  x = 3;
  n_exist = nest ();
  m_exist = exist ("x", 'var');
  function n_exist = nest ()
    ## The clear statement should operate on the variable in the
    ## parent scope even though there is no explicit varabiable
    ## reference in the code (the clear function just sees a string
    ## containing the name of the variable and the parser (correctly)
    ## does not treat this as a special case.
    clear x
    n_exist = exist ("x", "var");
  endfunction
endfunction