blob: 139d21f509e6193a8e12a0e63fb2c0f32312935a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
$ 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
|