generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Correct a potential bug.

Browse Source
This commit is contained in:
Richard Levitte 2000-03-13 18:59:11 +00:00
parent ee607d338a
commit 41f0aae69b
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
test/testenc.com
View File

@ -28,9 +28,9 @@ $ backup/compare 'test' 'test'-clear
$ if $severity .ne. 1 then exit 3 $ if $severity .ne. 1 then exit 3
$ delete 'test'-cipher;*,'test'-clear;* $ delete 'test'-cipher;*,'test'-clear;*
$ $
$ define/user sys$output 'test'-cipher-commands $ define/user sys$output 'test'-cipher-commands.
$ 'cmd' list-cipher-commands $ 'cmd' list-cipher-commands
$ open/read f 'test'-cipher-commands $ open/read f 'test'-cipher-commands.
$ loop_cipher_commands: $ loop_cipher_commands:
$ read/end=loop_cipher_commands_end f i $ read/end=loop_cipher_commands_end f i
$ write sys$output i $ write sys$output i
@ -56,5 +56,5 @@ $
$ goto loop_cipher_commands $ goto loop_cipher_commands
$ loop_cipher_commands_end: $ loop_cipher_commands_end:
$ close f $ close f
$ delete 'test'-cipher-commands;* $ delete 'test'-cipher-commands.;*
$ delete 'test';* $ delete 'test';*