X -e "s/??'/^/g" -e 's/??</{/g' -e 's/??!/|/g' -e 's/??>/}/g' \
X -e 's/??-/~/g' scjones.c > scjones.alt.c
X
Xstdlib.h:
X ${RM} -f stdlib.h
X echo "#define EXIT_SUCCESS 0" >stdlib.h
X echo "#define EXIT_FAILURE 1" >>stdlib.h
X echo "void exit(); /* may need to be int on some systems */" >>stdlib.h
X
Xclean:
X rm -f *.o a.out core
Xclobber: clean
X ${RM} -f ${WINNERS} sorter.c sorter westley.alt.c stdlib.h
X ${RM} -f fibonacci.c fibonacci atob zcat scjonds.alt.c
Xnuke: clobber
X @true
Xinstall: all
X cat ${WINNERS} > /dev/null
SHAR_EOF
$TOUCH -am 0922164990 1990/common.mk &&
chmod 0444 1990/common.mk ||
echo "restore of 1990/common.mk failed"
set `wc -c 1990/common.mk`;Wc_c=$1
if test "$Wc_c" != "2327"; then
echo original size 2327, current size $Wc_c
fi
# ============= 1990/baruch.c ==============
echo "x - extracting 1990/baruch.c (Text)"
sed 's/^X//' << 'SHAR_EOF' > 1990/baruch.c &&
Xv,i,j,k,l,s,a[99];
Xmain()
X{
X for(scanf("%d",&s);*a-s;v=a[j*=v]-a[i],k=i<s,j+=(v=j<s&&(!k&&!!printf(2+"\n\n%c"-(!l<<!j)," #Q"[l^v?(l^j)&1:2])&&++l||a[i]<s&&v&&v-i+j&&v+i-j))&&!(l%=s),v||(i==j?a[i+=k]=0:++a[i])>=s*k&&++a[--i])
X ;
X}
SHAR_EOF
$TOUCH -am 0922163990 1990/baruch.c &&
chmod 0444 1990/baruch.c ||
echo "restore of 1990/baruch.c failed"
set `wc -c 1990/baruch.c`;Wc_c=$1
if test "$Wc_c" != "231"; then
echo original size 231, current size $Wc_c
fi
# ============= 1990/cmills.c ==============
echo "x - extracting 1990/cmills.c (Text)"
sed 's/^X//' << 'SHAR_EOF' > 1990/cmills.c &&
X#include<stdio.h>
X#include<time.h>
X#define S(q)B(*e=0),q,p);
X#define W(w)if((w)<22)v= -v;else v-=10;else
X#define F for(r=d;r<d+N;
X#define H(v,g)v=h(v,*g++= *r++),*g=0;
X#define B(n)b(l,n),(V)printf(l
XV
Xexit();char*g,c[M],d[N],q[N],p[N],*e,*r=d+N,l[M],*t="??",*k,*m="DEATHISDSev2oinpohae3ttsluuln4a?uibfe 5l\0rtlfrb6 ?a?el:e7$!n\0?e t8%ccp\0.%s9deelc.s T.@?-t.\t<J /\0=a\nP=Q Sex \0l KW Sin a$\0ane-lay% ge#-slediefuk ar r$via-:o ?+}:r? n \0:) ee%lone 1-esy666!-~v\n.!^`'~@#\0\np~===:=q";b(o,n)char*o;{for(k=n+m;*o++=*k;k+=9);}int
