|
|
1.1 ! root 1: #! /bin/csh ! 2: #$Header: lispconf,v 1.18 87/12/11 16:41:21 sklower Exp $ ! 3: # ! 4: # csh script to configure lisp ! 5: # use: ! 6: # lispconf type ! 7: # where type is one of ! 8: # vax_4_1 vax_4_1a vax_4_1c vax_eunice_vms ! 9: # tahoe_4_3 ! 10: # sun_4_1c sun_unisoft dual_unisoft pixel_unisoft lisa_uniplus3 ! 11: # sun_4_2 sun_4_2beta mc500_2_0 ! 12: # ! 13: if ($#argv == 1) then ! 14: set argument = $argv[1] ! 15: else ! 16: set argument = junk ! 17: endif ! 18: ! 19: #fix makefile ! 20: sed "s%^RootDir = .*%RootDir = `pwd`%" Makefile > Make$$ ! 21: mv Make$$ Makefile < /dev/null ! 22: ! 23: switch ($argument) ! 24: case vax_eunice_vms: ! 25: mv franz/vax/{Makefile,Make.unix} ! 26: mv franz/vax/{Make.vms,Makefile} ! 27: case vax_4_1: ! 28: case vax_4_1a: ! 29: case vax_4_1c: ! 30: case vax_4_2: ! 31: case vax_4_3: ! 32: case sun_4_1c: ! 33: case sun_4_2: ! 34: case sun_4_2beta: ! 35: case mc500_2_0: ! 36: case tahoe_4_3: ! 37: case sun_unisoft: ! 38: case dual_unisoft: ! 39: case pixel_unisoft: ! 40: case lisa_unisys3: ! 41: echo "/* this file created by ../../lispconf */" >! franz/h/lconf.h ! 42: echo "#define $argv[1] 1" >>! franz/h/lconf.h ! 43: rm -f franz/h/{aout,lispo}.h ! 44: cp /usr/include/a.out.h franz/h/aout.h ! 45: cp /usr/include/a.out.h franz/h/lispo.h ! 46: breaksw ! 47: default: ! 48: echo "use: lispconf type" ! 49: echo " where type is one of " ! 50: echo " vax_4_1 vax_4_1a vax_4_1c vax_4_2 vax_4_3" ! 51: echo " vax_eunice_vms tahoe_4_3" ! 52: echo " sun_4_1c sun_unisoft dual_unisoft pixel_unisoft " ! 53: echo " sun_4_2beta lisa_unisys3 mc500_2_0" ! 54: exit 1 ! 55: endsw ! 56: ! 57: set ifusft="" ! 58: set ifsys3="" ! 59: switch ($argument) ! 60: case vax_*: ! 61: set VAX mach="vax" ! 62: (echo vax ucbstd; cat Makefile) | awk -f cvt.awk > Make$$ ! 63: mv Make$$ Makefile < /dev/null ! 64: breaksw ! 65: case tahoe_*: ! 66: set TAHOE mach="tahoe" ! 67: (echo tahoe ucbstd; cat Makefile) | awk -f cvt.awk >Make$$ ! 68: mv Make$$ Makefile </dev/null ! 69: breaksw ! 70: case *_unisys3: ! 71: set ifsys3="unisys3botch" ! 72: case *_unisoft: ! 73: set ifusft="unisoft" ! 74: case sun_4_*: ! 75: case mc500_2_*: ! 76: set M68K mach="68k" ! 77: (echo 68k ucbstd $ifusft; cat Makefile)| awk -f cvt.awk>Make$$ ! 78: mv Make$$ Makefile < /dev/null ! 79: breaksw ! 80: endsw ! 81: ! 82: # for the 68k version of the lisp compiler ! 83: # The type of makefile built depends of the type of 68k ! 84: # system you have. We assume that sun's and mc500's have virtual ! 85: # memory and that dual/unisoft's have no vm (thus, define swapper). ! 86: # As long as we are checking to see if we are dealing with ! 87: # a 68000 unisoft machine; make some patches to the C part as well. ! 88: set ifsunII="" ! 89: if ($?M68K) then ! 90: switch ($argument) ! 91: case *_unisys3: ! 92: case *_unisoft: ! 93: (echo swapper unisoft;\ ! 94: cat liszt/68k/Makefile) |awk -f cvt.awk > Make$$ ! 95: (echo unisoft $ifsys3;\ ! 96: cat franz/68k/Makefile) |awk -f cvt.awk > franz/68k/Make$$ ! 97: rm -f franz/h/{lispo,aout}.h ! 98: cp franz/h/duallispo.h franz/h/lispo.h ! 99: cp franz/h/dualaout.h franz/h/aout.h ! 100: cp franz/h/hpagsiz.h franz/h/pagsiz.h ! 101: cp lisplib/autorun/unisoft lisplib/autorun/68k ! 102: breaksw ! 103: case sun_4_2beta: ! 104: case sun_4_2: ! 105: set ifsunII=sunII ! 106: case sun_4_1c: ! 107: (echo sun; cat liszt/68k/Makefile) | awk -f cvt.awk > Make$$ ! 108: (echo sun $ifsunII; cat franz/68k/Makefile)\ ! 109: | awk -f cvt.awk > franz/68k/Make$$ ! 110: cp lisplib/autorun/sun4.2 lisplib/autorun/68k ! 111: breaksw ! 112: case mc500_2_*: ! 113: (echo mc500; cat liszt/68k/Makefile) | awk -f cvt.awk > Make$$ ! 114: (echo mc500; cat franz/68k/Makefile)\ ! 115: | awk -f cvt.awk > franz/68k/Make$$ ! 116: cp lisplib/autorun/mc500 lisplib/autorun/68k ! 117: breaksw ! 118: endsw ! 119: rm -f liszt/68k/Makefile ! 120: sed "s%^RootDir = .*%RootDir = `pwd`%" Make$$ > liszt/68k/Makefile ! 121: rm -f Make$$ ! 122: rm -f franz/68k/Makefile ! 123: mv franz/68k/Make$$ franz/68k/Makefile ! 124: ! 125: if ($ifusft/x == unisoft/x) then ! 126: switch ($argument) ! 127: case sun_unisoft: ! 128: set OFFSET=0x40000 ! 129: breaksw ! 130: case dual_unisoft: ! 131: set OFFSET=0x800000 ! 132: breaksw ! 133: case pixel_unisoft: ! 134: case lisa_unisys3: ! 135: set OFFSET=0x20000 ! 136: breaksw ! 137: endsw ! 138: sed "s%^OFFSET = .*%OFFSET = $OFFSET%"\ ! 139: lisplib/autorun/68k > temp$$ ! 140: mv temp$$ lisplib/autorun/68k </dev/null ! 141: endif ! 142: endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.