blob: c4f88f59f1349431db13289dbdf99e79ba67181b (
plain) (
tree)
|
|
$ v0 = 0
$ v = f$verify(v0)
$! BUILD-CHRTRANS.COM
$!
$! Command file to build MAKEUCTB.EXE on VMS systems
$! and then use it to create the chrtrans header files.
$!
$! 28-Jun-1997 F.Macrides macrides@sci.wfeb.edu
$! Initial version, for Lynx v2.7.1+fotemods
$!
$ ON CONTROL_Y THEN GOTO CLEANUP
$ ON ERROR THEN GOTO CLEANUP
$ CHRproc = f$environment("PROCEDURE")
$ CHRwhere = f$parse(CHRproc,,,"DEVICE") + f$parse(CHRproc,,,"DIRECTORY")
$!
$ if p1 .nes. ""
$ then
$ CHRcc_opts = "/DEBUG/NOOPT"
$ CHRlink_opts = "/DEBUG"
$ else
$ CHRcc_opts = ""
$ CHRlink_opts = ""
$ endif
$!
$ Compile_makeuctb:
$!================
$ v1 = f$verify(1)
$!
$! Compile the Lynx [.SRC.CHRTRANS]makeuctb module.
$!
$ v1 = f$verify(v0)
$ IF f$getsyi("ARCH_NAME") .eqs. "Alpha" .or. -
f$getsyi("ARCH_NAME") .eqs. "IA64" .or. -
f$trnlnm("VAXCMSG") .eqs. "DECC$MSG" .or. -
f$trnlnm("DECC$CC_DEFAULT") .eqs. "/DECC" .or. -
f$trnlnm("DECC$CC_DEFAULT") .eqs. "/VAXC"
$ THEN
$ CHRcompiler := "DECC"
$ v1 = f$verify(1)
$! DECC:
$ cc := cc/decc/prefix=all /nomember 'CHRcc_opts'-
/INCLUDE=([],[-],[--],[--.WWW.Library.Implementation])
$ v1 = f$verify(v0)
$ ELSE
$ IF f$search("gnu_cc:[000000]gcclib.olb") .nes. ""
$ THEN
$ CHRcompiler := "GNUC"
$ v1 = f$verify(1)
$! GNUC:
$ cc := gcc 'CHRcc_opts'/INCLUDE=([],[-],[--],[--.WWW.Library.Implementation])
$ v1 = f$verify(v0)
$ ELSE
$ CHRcompiler := "VAXC"
$ v1 = f$verify(1)
$! VAXC:
$ cc := cc 'CHRcc_opts'/INCLUDE=([],[-],[--],[--.WWW.Library.Implementation])
$ v1 = f$verify(v0)
$ ENDIF
$ ENDIF
$!
$ v1 = f$verify(1)
$ cc makeuctb
$ v1 = f$verify(v0)
$!
$ Link_makeuctb:
$!=============
$ v1 = f$verify(1)
$!
$! Link the Lynx [.SRC.CHRTRANS]makeuctb module.
$!
$ IF f$getsyi("ARCH_NAME") .eqs. "IA64"
$ THEN
$ optslibs=""
$ ELSE
$ optslibs=", sys$disk:[-]''CHRcompiler'.opt/opt"
$ ENDIF
$
$ link/exe=makeuctb.exe'CHRlink_opts' makeuctb 'optslibs
$ v1 = f$verify(v0)
$!
$ Create_headers:
$!==============
$ v1 = f$verify(1)
$!
$! Create the Lynx [.SRC.CHRTRANS] header files.
$!
$ makeuctb := $'CHRwhere'makeuctb
$ makeuctb cp1250_uni.tbl
$ makeuctb cp1251_uni.tbl
$ makeuctb cp1252_uni.tbl
$ makeuctb cp1253_uni.tbl
$ makeuctb cp1255_uni.tbl
$ makeuctb cp1256_uni.tbl
$ makeuctb cp1257_uni.tbl
$ makeuctb cp437_uni.tbl
$ makeuctb cp737_uni.tbl
$ makeuctb cp775_uni.tbl
$ makeuctb cp850_uni.tbl
$ makeuctb cp852_uni.tbl
$ makeuctb cp857_uni.tbl
$ makeuctb cp862_uni.tbl
$ makeuctb cp864_uni.tbl
$ makeuctb cp866_uni.tbl
$ makeuctb cp866u_uni.tbl
$ makeuctb cp869_uni.tbl
$ makeuctb def7_uni.tbl
$ makeuctb dmcs_uni.tbl
$ makeuctb hp_uni.tbl
$ makeuctb iso01_uni.tbl
$ makeuctb iso02_uni.tbl
$ makeuctb iso03_uni.tbl
$ makeuctb iso04_uni.tbl
$ makeuctb iso05_uni.tbl
$ makeuctb iso06_uni.tbl
$ makeuctb iso07_uni.tbl
$ makeuctb iso08_uni.tbl
$ makeuctb iso09_uni.tbl
$ makeuctb iso10_uni.tbl
$ makeuctb iso13_uni.tbl
$ makeuctb iso14_uni.tbl
$ makeuctb iso15_uni.tbl
$ makeuctb koi8r_uni.tbl
$ makeuctb koi8u_uni.tbl
$ makeuctb mac_uni.tbl
$ makeuctb mnem_suni.tbl
$ makeuctb mnem2_suni.tbl
$ makeuctb mnem_suni.tbl
$ makeuctb next_uni.tbl
$ makeuctb pt154_uni.tbl
$ makeuctb rfc_suni.tbl
$ makeuctb utf8_uni.tbl
$ makeuctb viscii_uni.tbl
$ v1 = f$verify(v0)
$ exit
$!
$ CLEANUP:
$ v1 = f$verify(0)
$ write sys$output "Default directory:"
$ show default
$ v1 = f$verify(v)
$ exit
|