$! File name:	SYSINFO.COM
$! Product:	TCPware for OpenVMS
$! Version:	V4.0
$!
$!	Build file for SYSINFO sample programs
$!
$! Copyright (c) 1993, by
$! Process Software Corporation
$! Framingham, Massachusetts
$!
$!
$! Get the current directory
$ PD = F$ENVIRONMENT( "DEFAULT")
$!
$!-----	List source files
$!
$ WRITE SYS$OUTPUT "Compiling SYSINFO.C"
$ CC/NOMEMBER_ALIGN/ASSUME=NOALIGNED/STANDARD=VAXC/OBJ='PD' -
	TCPWARE_ROOT:[TCPWARE.EXAMPLES.RPC]SYSINFO.C
$!
$ WRITE SYS$OUTPUT "Compiling SYSINFO_SVC.C"
$ CC/NOMEMBER_ALIGN/ASSUME=NOALIGNED/STANDARD=VAXC/OBJ='PD' -
	TCPWARE_ROOT:[TCPWARE.EXAMPLES.RPC]SYSINFO_SVC.C
$!
$ WRITE SYS$OUTPUT "Compiling SYSINFO_XDR.C"
$ CC/NOMEMBER_ALIGN/ASSUME=NOALIGNED/STANDARD=VAXC/OBJ='PD' -
	TCPWARE_ROOT:[TCPWARE.EXAMPLES.RPC]SYSINFO_XDR.C
$!
$!
$!----- List object modules
$!
$ WRITE SYS$OUTPUT "Linking the client"
$ LINK SYSINFO, SYSINFO_XDR, SYS$INPUT/OPTIONS
	SYS$SHARE:TCPWARE_RPCLIB_SHR/SHARE
	SYS$SHARE:TCPWARE_SOCKLIB_SHR/SHARE
$!
$ WRITE SYS$OUTPUT "Linking the server"
$ LINK SYSINFO_SVC, SYSINFO_XDR, SYS$INPUT/OPTIONS
	SYS$SHARE:TCPWARE_RPCLIB_SHR/SHARE
	SYS$SHARE:TCPWARE_SOCKLIB_SHR/SHARE
$!
$ EXIT