Most Erratic Behavior

もっとも不安定な挙動

Line wrap

Highlight

#define _POSIX_SOURCE /* you are not supposed to understand this */
#define O(OOO,OO0,O00,O0O,OO,O0)\0##O0O%:%:OO\0##O0%:%:OOO\0##OO0%:%:O00
#include<signal.h>
static volatile sig_atomic_t One;
#include<stdlib.h>
#include<unistd.h>
#define Zero(NULL)#NULL
#define ONE(One) Zero(One)
in??/
t
#line 10 "01\015"
main (register zero, char **ONE)
%:
<% switch (sizeof __FILE__ < zero) case 1: return One /= zero;
{ auto one = zero = atoi (ONE<:zero-1:>);
do for (one += alarm (One |= (signal (__LINE__, (void(*)(register))main)
!= SIG_ERR)); One; ++one);
while (zero -= write (1, __FILE__+(one&1), 1));
return write (1, 1+__FILE__+1, 1) != 1;
%>}

引用元：https://www.ioccc.org/1998/schweikh2.c

審査員・作者による説明：https://github.com/ioccc-src/winner/blob/main/1998/schweikh2.hint

動作

0と1の乱数列をゆっくりと表示する。

$ gcc -trigraphs -o schweikh2 schweikh2.c

$ ./schweikh2 32
00000010011101101111000001101011

解説

1秒のアラームシグナルをセットして、無限ループで変数をカウントアップしていき、シグナルが届いたタイミングでのカウンタの偶奇を0か1として出力するとのこと。シグナルハンドラにmain関数をセットしているのが面白い。

元コードは??=line 10 ONE(O(1,1,2,6,0,6))で、これは#line "01\012"なんだけれど、当時のコンパイラでも動かなかったらしく、審査員によって#line "01\015"と変えられている。しかし、これを現代のgccで実行するとinternal compiler errorになったので、元通りに#line "01\012"にしておいた。

パッチ

--- schweikh2.c
+++ schweikh2.c
@@ -8,7 +8,7 @@
 #define ONE(One) Zero(One)
 in??/
 t
-#line 10 "01\015"
+#line 10 "01\012"
 main (register zero, char **ONE)
 %:
 <% switch (sizeof __FILE__ < zero) case 1: return One /= zero;

パッチをダウンロード