maint: merge stable to default.
author |
John W. Eaton <jwe@octave.org> |
date |
Sat, 11 Apr 2020 08:26:09 -0400 |
parents |
b8384ed4d500
(current diff)
6c88000fed48
(diff) |
children |
1ef597f9b0bb |
files |
|
diffstat |
2 files changed, 15 insertions(+), 0 deletions(-)
[+]
|
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/test/nest/script_nest_2.m Sat Apr 11 08:26:09 2020 -0400
@@ -0,0 +1,7 @@
+# script_nest.m
+function r = script_nest_2 (x)
+ function r = nest_fun ()
+ r = 13;
+ endfunction
+ script_nest_script_2;
+endfunction
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/test/nest/script_nest_script_2.m Sat Apr 11 08:26:09 2020 -0400
@@ -0,0 +1,8 @@
+# script_nest_script.m
+if (x > 0)
+ r = x * 2;
+else
+ ## Expect error since nested function should not be
+ ## visible in this context.
+ r = nest_fun ();
+endif