Return to icon-pi CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / icon

Annotation of 43BSD/contrib/icon/icon-pi, revision 1.1.1.1

1.1       root        1: iroot=/usr/src/new/icon/v5g
                      2: echo Setting up structure for personalized interpreter ...
                      3: MAKFIL=$iroot/Pimakefile
                      4: BASDIR=`pwd`
                      5: path=$BASDIR/piconx
                      6: rm -rf $BASDIR/h $BASDIR/std $BASDIR/pi $BASDIR/picont $BASDIR/pilink $BASDIR/piconx
                      7: echo -n $path >/tmp/$$
                      8: set xx `/bin/ls -l /tmp/$$`
                      9: rm -f /tmp/$$
                     10: if test $5 -gt 29
                     11: then
                     12:        echo "The pathname for piconx,"
                     13:        echo "     \"$path\""
                     14:        echo "is too long."
                     15:        echo "It must not exceed 29 characters (it is now $5)"
                     16:        echo "or execution of the interpretable files will fail."
                     17:        echo "You must locate your personalized interpreter in a"
                     18:        echo "higher level directory with a shorter path length."
                     19:        exit
                     20: fi
                     21: HDIR=$BASDIR/h
                     22: PIDIR=$BASDIR/pi
                     23: STDDIR=$BASDIR/std
                     24: mkdir $PIDIR
                     25: mkdir $HDIR
                     26: mkdir $STDDIR
                     27: cp $MAKFIL $PIDIR/Makefile
                     28: echo Copying files ...
                     29: cp $iroot/pilib/*.h $HDIR
                     30: rm -f $HDIR/ilink.h
                     31: pifiles="ilink.h builtin.c init.c strprc.c icont.c rtlib linklib"
                     32: for j in $pifiles
                     33: do
                     34:   cp $iroot/pilib/$j $STDDIR
                     35: done
                     36: cd $PIDIR
                     37: ed - Makefile <<EOF >/dev/null
                     38: /^DIR=/
                     39: s:^.*\$:DIR=$BASDIR:
                     40: w
                     41: q
                     42: EOF
                     43: if test -f "$iroot/pilib/ranlib"
                     44: then
                     45:        echo Personalized interpreter is complete.
                     46:        exit
                     47: else
                     48:        echo Randomizing the libraries ...
                     49:        ranlib $STDDIR/rtlib
                     50:        ranlib $STDDIR/linklib
                     51:        echo Personalized interpreter is complete.
                     52: fi

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