git: 9front

ref: 6cf11029ee696d8d2dc4d5bf48438c80e912f428
dir: /sys/src/cmd/gs/src/rm_one.com/

View raw version 
$ Verif = F$Verify(0)
$ ! OpenVMS command file to emulate behavior of:
$ !
$ !     Define the command for deleting (a) file(s) (including wild cards)
$ !
$ DELETE="DELETE$$$/LOG"
$ FILE = F$SEARCH("''P1'")
$ IF "''FILE'" .NES. "" THEN DELETE 'FILE'
$ xxx = F$Verify(Verif)