|
|
1.1 ! root 1: set -x ! 2: ! 3: f2c </n/pyxis/usr/dmg/swift/port3/src/p3$2/$1.f >$1.c || { echo $1 failed | mail cwf; exit 1 } ! 4: ! 5: f77 /n/pyxis/usr/dmg/swift/port3/src/p3$2/$1.f fport.a ! 6: a.out <in/$1 >outf ! 7: ! 8: lcc -B/usr/src/cmd/lcc/gen2/vax-v9/ -c $1.c ! 9: f77 $1.o cport.a ! 10: a.out <in/$1 >outc ! 11: cmp outf outc || { echo $1 failed | mail cwf; exit 1 } ! 12: ! 13: lcc -B/usr/src/cmd/lcc/gen2/vax-v9/ -g -c $1.c ! 14: f77 $1.o dport.a ! 15: a.out <in/$1 >outd ! 16: cmp outf outd || { echo $1 failed | mail cwf; exit 1 } ! 17: ! 18: rm -f a.out $1.[fco] out[cdf] ! 19: exit 0
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.