From 2073d95fb48268187a554ae8c77aee189a29e193 Mon Sep 17 00:00:00 2001 From: Richard Levitte Date: Wed, 8 Jun 2005 21:59:47 +0000 Subject: [PATCH] Avoid endless loops. Really, we were using the same variable for two different conditions... --- test/tverify.com | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/test/tverify.com b/test/tverify.com index 2060184d1e..021d701d79 100644 --- a/test/tverify.com +++ b/test/tverify.com @@ -8,22 +8,22 @@ $ copy/concatenate [-.certs]*.pem certs.tmp $ $ old_f := $ loop_certs: -$ c := NO +$ verify := NO +$ more := YES $ certs := $ loop_certs2: $ f = f$search("[-.certs]*.pem") $ if f .nes. "" .and. f .nes. old_f $ then $ certs = certs + " [-.certs]" + f$parse(f,,,"NAME") + ".pem" -$ c := YES +$ verify := YES $ if f$length(certs) .lt. 180 then goto loop_certs2 +$ else +$ more := NO $ endif $ certs = certs - " " $ -$ if c -$ then -$ mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs' -$ goto loop_certs -$ endif +$ if verify then mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs' +$ if more then goto loop_certs $ $ delete certs.tmp;* -- 2.34.1