diff options
-rw-r--r-- | vms/ChangeLog | 4 | ||||
-rw-r--r-- | vms/vmstest.com | 4 |
2 files changed, 7 insertions, 1 deletions
diff --git a/vms/ChangeLog b/vms/ChangeLog index 2b9deaa4..2268148c 100644 --- a/vms/ChangeLog +++ b/vms/ChangeLog @@ -1,3 +1,7 @@ +2017-03-25 John E. Malmberg <wb8tyw@qsl.net> + + * vmstest.com: Fix argarray teset. + 2016-11-24 John E. Malmberg <wb8tyw@qsl.net> * gawk_verb.com: correct location for gawk executable. diff --git a/vms/vmstest.com b/vms/vmstest.com index aa96ceba..a10cd3f5 100644 --- a/vms/vmstest.com +++ b/vms/vmstest.com @@ -920,8 +920,10 @@ $ return $ $argarray: echo "argarray" $ test_class = "basic" +$ copy sys$disk:[]argarray.in sys$disk:[]argarray.input +$ purge sys$disk:[]argarray.input $ define/User TEST "test" !this is useless... -$ gawk -f argarray.awk ./argarray.in - >_argarray.tmp +$ gawk -f argarray.awk ./argarray.input - >_argarray.tmp just a test $ if f$search("sys$disk:[]_''test'.tmp;2") .nes. "" $ then |