Return to run CVS log

Up to [Research Unix] / researchv10no / cmd / lcc / gen2

Annotation of researchv10no/cmd/lcc/gen2/run, revision 1.1

1.1     ! root        1: #!/bin/sh
        !             2: # ../run target os test [ remotehost ]
        !             3: 
        !             4: # set -x
        !             5: target=$1 os=$2 remotehost=${4-$REMOTEHOST}
        !             6: 
        !             7: cd tst
        !             8: if [ ! -r "../../../include/${target}_$os" ]; then
        !             9:        echo 2>&1 $0: unknown target-system combination '"'$target-$os'"'
        !            10: fi
        !            11: case "$target-$os" in
        !            12: mips-ultrix)   TARGET=mipsel ;;
        !            13: mc-next)       TARGET=next ;;
        !            14: *)             TARGET=$target ;;
        !            15: esac
        !            16: 
        !            17: echo $HOST-$HOSTOS/rcc $target-$os $3: 1>&2
        !            18: lcc -N -S -B../../$HOST-$HOSTOS/ -I../../../include/${target}_$os -Usun -Uvax -Umips \
        !            19:        -D$target -Wf-g0 -Wftarget=$TARGET ../../../tst/$3.c 2>$3.2
        !            20: if [ $? != 0 ]; then remotehost=noexecute; fi
        !            21: diff ../../../tst/$3.2 $3.2
        !            22: if [ ! -r $3.s.bak ]; then
        !            23:        mv $3.s $3.s.bak
        !            24:        cp $3.s.bak $3.s
        !            25: else
        !            26:        if diff $3.s.bak $3.s; then exit 0; fi
        !            27: fi
        !            28: 
        !            29: case "$remotehost" in
        !            30: noexecute)     exit 0 ;;
        !            31: ""|"-")        lcc -o $3 $3.s -lm; ./$3 <../../../tst/$3.0 >$3.1 ;;
        !            32: *)     rcp $3.s $remotehost:
        !            33:        if expr "$remotehost" : '.*@' >/dev/null ; then
        !            34:                remotehost="`expr $remotehost : '.*@\(.*\)'` -l `expr $remotehost : '\(.*\)@'`"
        !            35:        fi
        !            36:        rsh $remotehost "cc -o $3 $3.s -ll -lm;./$3;rm $3 $3.[so]" <../../../tst/$3.0 >$3.1
        !            37:        ;;
        !            38: esac
        !            39: if [ ! -r $3.1.bak ]; then
        !            40:        mv $3.1 $3.1.bak
        !            41:        cp $3.1.bak $3.1
        !            42:        exit 0
        !            43: fi
        !            44: diff $3.1.bak $3.1
        !            45: exit $?

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