Merge pull request #792 from xexyl/1985-shapiro-alt

Remove 1985/shapiro alt code
This commit is contained in:
Landon Curt Noll authored and GitHub committed 2023-05-23 07:08:05 +10:00
commit 3daf3a2980
4 files changed
+3 -8

No files matched your search

-1
View File
@@ -1,2 +1 @@
shapiro
shapiro.alt
+2 -2
View File
@@ -112,8 +112,8 @@ OBJ= ${PROG}.o
DATA=
TARGET= ${PROG}
#
ALT_OBJ= ${PROG}.alt.o
ALT_TARGET= ${PROG}.alt
ALT_OBJ=
ALT_TARGET=
#################
+1 -2
View File
@@ -18,8 +18,7 @@ make all
## Judges' remarks:
As submitted, this program was 3 lines (2 of defines and 1 of code).
To make news & mail happy we split the last line into 7. The file
[shapiro.alt.c](shapiro.alt.c) is the original version.
To make news & mail happy we split the last line into seven lines.
This program was selected for the 1987 t-shirt collection.
-3
View File
@@ -1,3 +0,0 @@
#define P(X)j=write(1,X,1)
#define C 39
int M[5000]={2},*u=M,N[5000],R=22,a[4],l[]={0,-1,C-1,-1},m[]={1,-C,-1,C},*b=N, *d=N,c,e,f,g,i,j,k,s;main(){for(M[i=C*R-1]=24;f|d>=b;){c=M[g=i];i=e;for(s=f=0; s<4;s++)if((k=m[s]+g)>=0&&k<C*R&&l[s]!=k%C&&(!M[k]||!j&&c>=16!=M[k]>=16))a[f++ ]=s;if(f){f=M[e=m[s=a[rand()/(1+2147483647/f)]]+g];j=j<f?f:j;f+=c&-16*!j;M[g]= c|1<<s;M[*d++=e]=f|1<<(s+2)%4;}else e=d>b++?b[-1]:e;}P(" ");for(s=C;--s;P("_"))P(" ");for(;P("\n"),R--;P("|"))for(e=C;e--;P("_ "+(*u++/8)%2))P("| "+(*u/4)%2);}