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