Return to lispconf CVS log

Up to [CSRG BSD Unix] / 42BSD / ucb / lisp

Annotation of 42BSD/ucb/lisp/lispconf, revision 1.1

1.1     ! root        1: #!/bin/csh 
        !             2: #$Header: lispconf,v 1.14 83/09/12 15:20:50 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: #    sun_4_1c sun_unisoft dual_unisoft pixel_unisoft
        !            10: #
        !            11: if ($#argv == 1) then
        !            12:   set argument = $argv[1]
        !            13: else  
        !            14:   set argument = junk
        !            15: endif
        !            16: 
        !            17: #fix makefile
        !            18: sed "s%^RootDir = .*%RootDir = `pwd`%" Makefile > Make$$
        !            19: mv Make$$ Makefile < /dev/null
        !            20: 
        !            21: switch ($argument)
        !            22:  case vax_eunice_vms:
        !            23:        mv franz/vax/{Makefile,Make.unix}
        !            24:        mv franz/vax/{Make.vms,Makefile}
        !            25:  case vax_4_1:
        !            26:  case vax_4_1a:
        !            27:  case vax_4_1c:
        !            28:  case vax_4_2:
        !            29:  case sun_4_1c: 
        !            30:  case sun_unisoft:
        !            31:  case dual_unisoft:
        !            32:  case pixel_unisoft:
        !            33:        echo "/* this file created by ../../lispconf */" > franz/h/lconf.h
        !            34:        echo "#define $argv[1] 1" >> franz/h/lconf.h
        !            35:        rm -f franz/h/{aout,lispo}.h
        !            36:        cp /usr/include/a.out.h franz/h/aout.h
        !            37:        cp /usr/include/a.out.h franz/h/lispo.h
        !            38:        breaksw
        !            39:  default:
        !            40:   echo "use: lispconf type"
        !            41:   echo "  where type is one of "
        !            42:   echo "  vax_4_1 vax_4_1a vax_4_1c vax_4_2"
        !            43:   echo "  vax_eunice_vms"
        !            44:   echo "  sun_4_1c sun_unisoft dual_unisoft pixel_unisoft"
        !            45:   exit 1
        !            46: endsw 
        !            47: 
        !            48: set ifusft=""
        !            49: switch ($argument)
        !            50:  case vax_*:
        !            51:        set VAX mach="vax"
        !            52:        (echo vax ucbstd; cat Makefile) | awk -f cvt.awk > Make$$
        !            53:        mv Make$$ Makefile < /dev/null
        !            54:        breaksw
        !            55:  case *_unisoft:
        !            56:        set ifusft="unisoft"
        !            57:  case sun_4_*: 
        !            58:        set M68K mach="68k"
        !            59:        (echo 68k $ifusft; cat Makefile) | awk -f cvt.awk > Make$$
        !            60:        mv Make$$ Makefile < /dev/null
        !            61:        breaksw
        !            62: endsw 
        !            63: 
        !            64: # for the 68k version of the lisp compiler
        !            65: # The type of makefile built depends of the type of 68k
        !            66: #  system you have.  We assume that sun's have virtual memory
        !            67: #  and that dual/unisoft's have no vm (thus, define swapper).
        !            68: # As long as we are checking to see if we are dealing with
        !            69: # a 68000 unisoft machine; make some patches to the C part as well.
        !            70: if ($?M68K) then
        !            71:        switch ($argument)
        !            72:         case *_unisoft:
        !            73:                (echo swapper unisoft;\
        !            74:                    cat liszt/68k/Makefile) |awk -f cvt.awk > Make$$
        !            75:                (echo unisoft;\
        !            76:                    cat franz/68k/Makefile) |awk -f cvt.awk > franz/68k/Make$$
        !            77:                rm -f franz/h/{lispo,aout}.h
        !            78:                cp franz/h/duallispo.h franz/h/lispo.h
        !            79:                cp franz/h/dualaout.h franz/h/aout.h
        !            80:                cp franz/h/hpagsiz.h franz/h/pagsiz.h
        !            81:                cp lisplib/autorun/unisoft lisplib/autorun/68k
        !            82:                breaksw
        !            83:         case sun_4_1c:
        !            84:                (echo sun; cat liszt/68k/Makefile) | awk -f cvt.awk > Make$$
        !            85:                (echo sun; cat franz/68k/Makefile)\
        !            86:                                | awk -f cvt.awk > franz/68k/Make$$
        !            87:                cp lisplib/autorun/sun4.2 lisplib/autorun/68k
        !            88:                breaksw
        !            89:        endsw
        !            90:        rm -f liszt/68k/Makefile
        !            91:        sed "s%^RootDir = .*%RootDir = `pwd`%" Make$$ > liszt/68k/Makefile
        !            92:        rm -f Make$$
        !            93:        rm -f franz/68k/Makefile
        !            94:        mv franz/68k/Make$$ franz/68k/Makefile
        !            95: 
        !            96:        if ($ifusft/x == unisoft/x) then
        !            97:                switch ($argument)
        !            98:                 case sun_unisoft:
        !            99:                        set OFFSET=0x8000
        !           100:                        breaksw
        !           101:                 case dual_unisoft:
        !           102:                        set OFFSET=0x800000
        !           103:                        breaksw
        !           104:                 case pixel_unisoft:
        !           105:                        set OFFSET=0x20000
        !           106:                        breaksw
        !           107:                endsw
        !           108:                sed "s%^OFFSET = .*%OFFSET = $OFFSET%"\
        !           109:                                lisplib/autorun/68k > temp$$
        !           110:                mv temp$$ lisplib/autorun/68k </dev/null
        !           111:        endif
        !           112: endif

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.