$ on error then goto exit $ on control_y then goto exit $ old_verify = f$verify (1) $ if f$getsyi("HW_MODEL") .ge. 1024 $ then $ arch_name = "Alpha" $ ARCH_PREF = "AXP_" $ else $ arch_name = "VAX" $ ARCH_PREF = "VAX_" $ endif $! $! (Re)compile the internal command table $! $ set command/object=.'ARCH_PREF'obj bibtex_cli.cld $! $! Link $! $ link /exe=.'ARCH_PREF'exe bibtex.'ARCH_PREF'obj,bibtex_cli.'ARCH_PREF'obj $! $! Do not keep the compiled command table: $! $ delete/noconfirm/nolog bibtex_cli.'ARCH_PREF'obj;* $! $! Clean up environment, and exit $! $exit: $ dummy=f$verify ('old_verify') $ exit