diff options
| author | cvs2svn <admin@example.com> | 2014-04-13 15:16:39 +0000 |
|---|---|---|
| committer | cvs2svn <admin@example.com> | 2014-04-13 15:16:39 +0000 |
| commit | 0d46071f78b35b22b9bb6521e9535aaab853d8d8 (patch) | |
| tree | 5eeb72b2f65d8af14113c037fab4e843a1c5ec3d /src/lib/libssl/test/clean_test.com | |
| parent | 25175e3da5ec29dca5edfe32f588ea68b17071c9 (diff) | |
| download | openbsd-openssl_1_0_1_g.tar.gz openbsd-openssl_1_0_1_g.tar.bz2 openbsd-openssl_1_0_1_g.zip | |
This commit was manufactured by cvs2git to create tag 'openssl_1_0_1_g'.openssl_1_0_1_g
Diffstat (limited to 'src/lib/libssl/test/clean_test.com')
| -rwxr-xr-x | src/lib/libssl/test/clean_test.com | 35 |
1 files changed, 0 insertions, 35 deletions
diff --git a/src/lib/libssl/test/clean_test.com b/src/lib/libssl/test/clean_test.com deleted file mode 100755 index 7df633fbef..0000000000 --- a/src/lib/libssl/test/clean_test.com +++ /dev/null | |||
| @@ -1,35 +0,0 @@ | |||
| 1 | $! | ||
| 2 | $! Delete various test results files. | ||
| 3 | $! | ||
| 4 | $ def_orig = f$environment( "default") | ||
| 5 | $ proc = f$environment( "procedure") | ||
| 6 | $ proc_dev_dir = f$parse( "A.;", proc) - "A.;" | ||
| 7 | $! | ||
| 8 | $ on control_c then goto tidy | ||
| 9 | $ on error then goto tidy | ||
| 10 | $! | ||
| 11 | $ set default 'proc_dev_dir' | ||
| 12 | $! | ||
| 13 | $ files := *.cms;*, *.srl;*, *.ss;*, - | ||
| 14 | cms.err;*, cms.out;*, newreq.pem;*, - | ||
| 15 | p.txt-zlib-cipher;*, - | ||
| 16 | smtst.txt;*, testkey.pem;*, testreq.pem;*, - | ||
| 17 | test_*.err;*, test_*.out;*, - | ||
| 18 | .rnd;* | ||
| 19 | $! | ||
| 20 | $ delim = "," | ||
| 21 | $ i = 0 | ||
| 22 | $ loop: | ||
| 23 | $ file = f$edit( f$element( i, delim, files), "trim") | ||
| 24 | $ if (file .eqs. delim) then goto loop_end | ||
| 25 | $ if (f$search( file) .nes. "") then - | ||
| 26 | delete 'p1' 'file' | ||
| 27 | $ i = i+ 1 | ||
| 28 | $ goto loop | ||
| 29 | $ loop_end: | ||
| 30 | $! | ||
| 31 | $ tidy: | ||
| 32 | $ | ||
| 33 | $ if (f$type( def_orig) .nes. "") then - | ||
| 34 | set default 'def_orig' | ||
| 35 | $! | ||
