#define _POSIX_SOURCE #include <time.h> #include <stdio.h> #define extern/* ioccc*/ #define condition 22+d+e> 31 #define declarator main ( void ) #define keyword ae(t,d+e-9); ae(m,4) #define false ae (t, d+ e+ 22); ae (m,3) #define syntax_error(n); } else if (J < n) { #define relational_expression(i, o, ccc) i o ccc #define errno translation_unit/*Apollo 13*/int errno #define iterative_statement for ( expressions ) block #define translation_unit declarator compound_statement #define ae(unary_expression,ae) unary_expression= ae #define declaration char T[16]; struct tm ae(s,{ 0}) #define if_part {macrolist list ae(b,J%4); type_name #define tokens if (t==25&&d==28 &&a > 10) ae (t, 18) #define selection_statement(a,b,c) if(a){b; } else{ c; } #define storage_class ae(e,(2*b+4*c+6*d+N)%7); statement #define statement_list iterative_statement return'^'^'^' #define macro(x,y,cast) ae(M,x); ae(N,y)syntax_error(cast) #define block { if(relational_expression(J,<,1700))if_part;} #define declaration_list int J,a,b,c,d, e,t,m,M,N; declaration #define true keyword; selection_statement(t==26,ae(t,19),tokens) #define compound_statement { declaration_list ; statement_list ; } #define expressions ae(J,1582); relational_expression(J,<,2200); ++J #define list macro (24, 5, 2200) ae(M, 24); ae(N, 6); } ae(a, J % 19); #define type_name ae (c, J % 7);ae (d, (19 * a + M) % 30); storage_class #define statement selection_statement ( condition,true,false)pptoken cast #define macrolist macro(22,2,1800)macro (23, 3,1900) macro (23, 4, 2100) #define pptoken ae(s.tm_year,J-1900);ae (s.tm_mon,m-1); ae(s.tm_mday,t); #define cast (void)strftime(T,sizeof T, "%a %b %d %Y",&s),(void)puts(T); #include <errno.h>

引用元：https://www.ioccc.org/1996/schweikh1.c

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

動作

イースター（復活祭）の日付を列挙する。

コンパイルオプションの-I .を足すことで、同じディレクトリのerrno.hを参照できる設定でコンパイルする必要がある。

$ cat errno.h
extern int errno;

$ gcc -I . -o schweikh1 schweikh1.c

$ ./schweikh1
Sun Apr 18 1582
Sun Apr 10 1583
Sun Apr 01 1584
Sun Apr 21 1585
Sun Apr 06 1586
Sun Mar 29 1587
Sun Apr 17 1588
Sun Apr 02 1589
Sun Apr 22 1590
Sun Apr 14 1591
...
Sun Mar 29 2195
Sun Apr 17 2196
Sun Apr 09 2197
Sun Mar 25 2198
Sun Apr 14 2199

解説

イースターは「春分の後の最初の満月の後の日曜日」とのこと。 これを求めるアルゴリズムはガウスによるらしい。 詳しくはschweikh1.hintを参照。

プリプロセスの指示のみからなるコード。 extern int errno;を置き換えている。 schweikh1.hintによるとこれは当時から一部の環境で動かなかったらしい。 Solarisのgccでこの定義が2箇所にあるので壊れているとある（が、同じextern宣言を複数回置くのはC言語的に合法のはずなので、壊れているのはこのコードである）。 リリースパッケージにはerrno.hが添付され、gcc -I.するようになっている。 同年の[[1996/jonth]]と少しネタがかぶっているのは偶然か。

コードの形はロケット。 コメントでApollo 13と書かれているが、イースターとの関連はわからない。 次のようにC言語の構文の説明みたいなものを（あまり脈絡なく）入れているあたり、思いつくネタをいろいろ入れたのかもしれない。

#define        compound_statement { declaration_list ; statement_list ; }

[[1996/schweikh2]]と[[1996/schweikh3]]とあわせて、同じ人が同年に3部門で入賞するのは初の事例。