From: Richard Levitte Date: Tue, 18 Jan 2000 08:10:28 +0000 (+0000) Subject: A test script to check on the header files X-Git-Tag: OpenSSL_0_9_5beta1~253 X-Git-Url: https://git.openssl.org/?p=openssl.git;a=commitdiff_plain;h=c89cb36dbf9f1ed49884cc773c8d4ac2358dfcb1 A test script to check on the header files --- diff --git a/VMS/test-includes.com b/VMS/test-includes.com new file mode 100644 index 0000000000..c1d7ccd0ee --- /dev/null +++ b/VMS/test-includes.com @@ -0,0 +1,28 @@ +$! Quick script to check how well including individual header files works +$! on VMS, even when the VMS macro isn't defined. +$ +$ sav_def = f$env("DEFAULT") +$ here = f$parse("A.;0",f$ENV("PROCEDURE")) - "A.;0" +$ set default 'here' +$ set default [-.include.openssl] +$ define openssl 'f$env("DEFAULT")' +$ set default [--] +$ +$ loop: +$ f = f$search("openssl:*.h") +$ if f .eqs. "" then goto loop_end +$ write sys$output "Checking ",f +$ open/write foo foo.c +$ write foo "#undef VMS" +$ write foo "#include " +$ write foo "#include " +$ write foo "main()" +$ write foo "{printf(""foo\n"");}" +$ close foo +$ cc/STANDARD=ANSI89/NOLIST/PREFIX=ALL foo.c +$ delete foo.c; +$ goto loop +$ loop_end: +$ set default 'save_def' +$ exit +