1$! 2$! This file configures the opcodes library for use with openVMS. 3$! 4$! We do not use the configure script, since we do not have /bin/sh 5$! to execute it. 6$! 7$! Written by Tristan Gingold (gingold@adacore.com) 8$! 9$ arch=F$GETSYI("ARCH_NAME") 10$ arch=F$EDIT(arch,"LOWERCASE") 11 12$! 13$ write sys$output "Generate opcodes/build.com" 14$! 15$ if arch.eqs."ia64" 16$ then 17$ create build.com 18$DECK 19$ FILES="ia64-dis,ia64-opc" 20$ DEFS="""ARCH_ia64""" 21$EOD 22$ endif 23$ if arch.eqs."alpha" 24$ then 25$ create build.com 26$DECK 27$ FILES="alpha-dis,alpha-opc" 28$ DEFS="""ARCH_alpha""" 29$EOD 30$ endif 31$! 32$ append sys$input build.com 33$DECK 34$ FILES=FILES + ",dis-init,dis-buf,disassemble" 35$ OPT="/noopt/debug" 36$ CFLAGS=OPT + "/include=([],""../include"",[-.bfd])/name=(as_is,shortened)" + - 37 "/define=(" + DEFS + ")" 38$ write sys$output "CFLAGS=",CFLAGS 39$ NUM = 0 40$ LOOP: 41$ F = F$ELEMENT(NUM,",",FILES) 42$ IF F.EQS."," THEN GOTO END 43$ write sys$output "Compiling ", F, ".c" 44$ cc 'CFLAGS 'F.c 45$ NUM = NUM + 1 46$ GOTO LOOP 47$ END: 48$ purge 49$ lib/create libopcodes 'FILES 50$EOD 51$exit 52