|
|
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.