Annotation of researchv10no/cmd/lcc/gen3/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 test=$3 remotehost=${4-$REMOTEHOST}
        !             6: 
        !             7: cd tst
        !             8: if [ ! -r "../../../include/${target}_$os" -o "$target" != vax ]; then
        !             9:        echo 2>&1 $0: unknown target-system combination '"'$target-$os'"'
        !            10: fi
        !            11: 
        !            12: echo $target-$os $3: 1>&2
        !            13: cc -E -I../../../include/${target}_$os ../../../tst/$3.c | ../rcc >$3.s 2>$3.2
        !            14: if [ $? != 0 ]; then remotehost=noexecute; fi
        !            15: diff ../../../tst/$3.2 $3.2
        !            16: if [ ! -r $3.s.bak ]; then
        !            17:        mv $3.s $3.s.bak
        !            18:        cp $3.s.bak $3.s
        !            19: else
        !            20:        if diff $3.s.bak $3.s; then exit 0; fi
        !            21: fi
        !            22: 
        !            23: case "$remotehost" in
        !            24: noexecute)     exit 0 ;;
        !            25: "")    cc -o $3 $3.s -lm; ./$3 <../../../tst/$3.0 >$3.1 ;;
        !            26: *)     rcp $3.s $remotehost:
        !            27:        if expr "$remotehost" : '.*@' >/dev/null ; then
        !            28:                remotehost="`expr $remotehost : '.*@\(.*\)'` -l `expr $remotehost : '\(.*\)@'`"
        !            29:        fi
        !            30:        rsh $remotehost "cc -o $3 $3.s -ll -lm;./$3;rm $3 $3.[so]" <../../../tst/$3.0 >$3.1
        !            31:        ;;
        !            32: esac
        !            33: diff $3.1.bak $3.1
        !            34: exit $?

unix.superglobalmegacorp.com

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