提交 41f0aae6 编写于 作者: R Richard Levitte

Correct a potential bug.

上级 ee607d33
......@@ -28,9 +28,9 @@ $ backup/compare 'test' 'test'-clear
$ if $severity .ne. 1 then exit 3
$ delete 'test'-cipher;*,'test'-clear;*
$
$ define/user sys$output 'test'-cipher-commands
$ define/user sys$output 'test'-cipher-commands.
$ 'cmd' list-cipher-commands
$ open/read f 'test'-cipher-commands
$ open/read f 'test'-cipher-commands.
$ loop_cipher_commands:
$ read/end=loop_cipher_commands_end f i
$ write sys$output i
......@@ -56,5 +56,5 @@ $
$ goto loop_cipher_commands
$ loop_cipher_commands_end:
$ close f
$ delete 'test'-cipher-commands;*
$ delete 'test'-cipher-commands.;*
$ delete 'test';*
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册