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