#include "stdio.h" #define e 3 #define g (e/e) #define h ((g+e)/2) #define f (e-g-h) #define j (e*e-g) #define k (j-h) #define l(x) tab2[x]/h #define m(n,a) ((n&(a))==(a)) long tab1[]={ 989L,5L,26L,0L,88319L,123L,0L,9367L }; int tab2[]={ 4,6,10,14,22,26,34,38,46,58,62,74,82,86 }; main(m1,s) char *s; { int a,b,c,d,o[k],n=(int)s; if(m1==1){ char b[2*j+f-g]; main(l(h+e)+h+e,b); printf(b); } else switch(m1-=h){ case f: a=(b=(c=(d=g)<<g)<<g)<<g; return(m(n,a|c)|m(n,b)|m(n,a|d)|m(n,c|d)); case h: for(a=f;a<j;++a)if(tab1[a]&&!(tab1[a]%((long)l(n))))return(a); case g: if(n<h)return(g); if(n<j){n-=g;c='D';o[f]=h;o[g]=f;} else{c='\r'-'\b';n-=j-g;o[f]=o[g]=g;} if((b=n)>=e)for(b=g<<g;b<n;++b)o[b]=o[b-h]+o[b-g]+c; return(o[b-g]%n+k-h); default: if(m1-=e) main(m1-g+e+h,s+g); else *(s+g)=f; for(*s=a=f;a<e;) *s=(*s<<e)|main(h+a++,(char *)m1); } }

引用元：https://www.ioccc.org/1986/holloway/holloway.c

審査員・作者による説明：https://www.ioccc.org/1986/holloway/hint.html

動作

Hello, worldプログラム。

$ gcc -o holloway holloway.c

$ ./holloway
hello world!

解説

やたらとややこしい無意味な演算でhello world!の文字列を計算している。

main関数の再帰を多用している。 まず出力する文字数の数だけ再帰し、それから1文字あたり3回再帰して、case f:とcase h:とcase g:を呼び出す。

f:は各文字の7ビット目をビット演算で算出し、h:は謎の定数テーブルtab1とtab2を使って4～6ビット目の3ビットを返し、g:はよくわからないがフィボナッチ数列みたいな計算で1～3ビット目の3ビットを返す。

h:はちょっと面白いので少しだけ詳しく説明する。 これはゲーデル数のような方法で3ビットをエンコードしている。 tab2は素数列（を2倍にしたもの）で、tab1[i]がtab2[n]で割り切れるとき、iを返すようになっている。 tab1の長さが8（つまり3ビット）、tab2の長さが14（つまり"hello world!\r\n"の文字数）になっているところがミソ。

賞名は[[1986/august]]と対称的になっている。

clangはmainの第2引数がchar**でないと怒るので、書き換えが必要。