File: test-includes.com

package info (click to toggle)
openssl 0.9.8c-4etch3%2Bm68k1
  • links: PTS
  • area: main
  • in suites: etch-m68k
  • size: 19,320 kB
  • ctags: 26,390
  • sloc: ansic: 203,562; perl: 18,445; makefile: 10,732; asm: 10,675; cpp: 4,379; sh: 2,925; lisp: 23
file content (28 lines) | stat: -rw-r--r-- 752 bytes parent folder | download | duplicates (34)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
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