$! This file compiles SUBFONT program on VMS system.
$ arch = f$getsy("ARCH_NAME")
$ if ( arch .eqs. "Alpha" )
$ then
$    cc subfont
$    link/exe=subfont.exe-Alpha subfont
$ else
$    cc subfont
$    link/exe=subfont.exe-vax subfont,sys$library:vaxcrtl/lib
$ endif
$ exit