|
|
Power 6/32 Unix version 1.21
set -x for x do n=`basename $x .f` f77 -S $x; mv $n.s $n.v0 f77 -S -O -Tp/bin/cp $x; mv $n.s $n.v1 if cmp $n.v[01] then rm $n.v1 fi f77 -S -O $x; mv $n.s $n.v2 f77 -S -T1../f77pass1 -T2../../fcc/fort $x; mv $n.s $n.t0 f77 -S -O -T1../f77pass1 -T2../../fcc/fort -Tp/bin/cp $x; mv $n.s $n.t1 f77 -S -O -T1../f77pass1 -T2../../fcc/fort -Tp../../fc2/c2 $x; mv $n.s $n.t2 if cmp $n.t[01] then rm $n.t1 fi done
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.