diff options
Diffstat (limited to 'vms')
| -rw-r--r-- | vms/ChangeLog | 7 | ||||
| -rw-r--r-- | vms/vmstest.com | 11 |
2 files changed, 16 insertions, 2 deletions
diff --git a/vms/ChangeLog b/vms/ChangeLog index c3780cf3..94bc9f1a 100644 --- a/vms/ChangeLog +++ b/vms/ChangeLog @@ -1,3 +1,8 @@ +2014-02-12 John E. Malmberg <wb8tyw@qsl.net> + + * vmstest.com: (strftime) requires GNV Coreutils date command to run + (readdir) fix file cleanup to not generate warnings. + 2014-01-21 John E. Malmberg <wb8tyw@qsl.net> * generate_config_vms_h_gawk.com: upate copyright and fix exit status. @@ -9,7 +14,7 @@ 2014-01-03 John E. Malmberg <wb8tyw@qsl.net> * config_h.com, generate_config_vms_h_gawk.com, - vms_args.c, vms_cli.c, vms_fwrite.c, vms_gawk.c, vms_misc.c, + vms_args.c, vms_cli.c, vms_fwrite.c, vms_gawk.c, vms_misc.c, vms_popen.c: Update copyright to 2014. * descrip.mms: Improve spotless cleanup. * vmstest.com: Improve test cleanup. diff --git a/vms/vmstest.com b/vms/vmstest.com index 4b5e2d5c..30bdbf22 100644 --- a/vms/vmstest.com +++ b/vms/vmstest.com @@ -606,6 +606,14 @@ $ ! this test could fail on slow machines or on a second boundary, $ ! so if it does, double check the actual results $ ! This test needs SYS$TIMEZONE_NAME and SYS$TIMEZONE_RULE $ ! to be properly defined. +$ ! This test now needs GNV Corutils to work +$ date_bin = "gnv$gnu:[bin]gnv$date.exe" +$ if f$search(date_bin) .eqs. "" +$ then +$ echo "''test' skipped" +$ return +$ endif +$ date := $'date_bin' $!! date | gawk -v "OUTPUT"=_strftime.tmp -f strftime.awk $ now = f$time() $ wkd = f$extract(0,3,f$cvtime(now,,"WEEKDAY")) @@ -1902,7 +1910,8 @@ $ then $ call exit_code '$status' _'test'.tmp $ write sys$output _'test'.tmp $ else -$ rm _'test'.tmp;*,_'test'.;* +$ if f$search("_''test'.tmp") .nes. "" then rm _'test'.tmp;* +$ if f$search("_''test'.") .nes. "" then rm _'test'.;* $ endif $ set On $ return |