1$! Quick script to check how well including individual header files works 2$! on VMS, even when the VMS macro isn't defined. 3$ 4$ sav_def = f$env("DEFAULT") 5$ here = f$parse("A.;0",f$ENV("PROCEDURE")) - "A.;0" 6$ set default 'here' 7$ set default [-.include.openssl] 8$ define openssl 'f$env("DEFAULT")' 9$ set default [--] 10$ 11$ loop: 12$ f = f$search("openssl:*.h") 13$ if f .eqs. "" then goto loop_end 14$ write sys$output "Checking ",f 15$ open/write foo foo.c 16$ write foo "#undef VMS" 17$ write foo "#include <stdio.h>" 18$ write foo "#include <openssl/",f$parse(f,,,"NAME"),".h>" 19$ write foo "main()" 20$ write foo "{printf(""foo\n"");}" 21$ close foo 22$ cc/STANDARD=ANSI89/NOLIST/PREFIX=ALL foo.c 23$ delete foo.c; 24$ goto loop 25$ loop_end: 26$ set default 'save_def' 27$ exit 28 29
