$!
$! TOOL.COM parameters
$!	Build the tool.  the parameters are passed to build.
$!
$	if p1 .eqs. "" then inquire p1 "Enter file to build"
$	no_bin = 0
$	if "''f$logical("BIN")'" .eqs. "" then no_bin = 1
$	if no_bin then assign "''f$logical("SYS$DISK")'''f$directory()'" bin:
$	build -o toolbuild.tmp 'p1 'p2 'p3 'p4 'p5 'p6 'p7 'p8 'p9
$	@toolbuild.tmp
$	if no_bin then deassign bin:
$	delete toolbuild.tmp;
$	exit