diff options
Diffstat (limited to 'VMS/test-includes.com')
| -rw-r--r-- | VMS/test-includes.com | 28 |
1 files changed, 28 insertions, 0 deletions
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 <stdio.h>" +$ write foo "#include <openssl/",f$parse(f,,,"NAME"),".h>" +$ 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 + |