view test/bug-53027/ntest53027a.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 2b040946dc69
children
line wrap: on
line source

function [m_exist, n_exist] = ntest53027a ()
  global x
  x = 3;
  n_exist = nest ();
  m_exist = exist ("x", 'var');
  function n_exist = nest ()
    x = 1;
    clear x
    n_exist = exist ("x", "var");
  endfunction
endfunction