$!
$ on ERROR     then goto COM$Exit
$ on WARNING   then goto COM$Exit
$ on CONTROL_Y then goto COM$Exit
$ V ='F$VERIFY(0)
$ set verify
$!
$! Build the Alpha shareable image
$!
$ WRITE sys$output "Building the Alpha shareable image"
$ CC MYMATH/OBJ=AXP_MYMATH.OBJ
$ LINK/SHAREABLE=AXP_MYMATH AXP_MYMATH.OBJ, SYS$INPUT:/OPTIONS
SYMBOL_VECTOR=( myadd=PROCEDURE,-
mysub=PROCEDURE,-
mydiv=PROCEDURE,-
mymul=PROCEDURE)
GSMATCH=LEQUAL,2,0
$!
$! Build the Alpha application
$ WRITE sys$output "Building the Alpha application"
$ CC MYMAIN/OBJ=AXP_MYMAIN.OBJ
$ LINK AXP_MYMAIN.OBJ,SYS$INPUT:/OPTIONS
AXP_MYMATH/SHAREABLE
$! 
$!
$COM$Exit:
$ V = 'F$VERIFY(V)
$!