Merge pull request #12 from xexyl/1993

Get most 1993 entries to compile

1993/jonth/README.md

@@ -19,6 +19,8 @@ Judges' comments:
     This program's output may be even more obfuscated when played 
     on inverse video.  :-)
 
+    Yusuke Endoh provided a patch which allows this entry to compile on modern
+    systems. Thank you Yusuke!
 
 Selected notes from the author:
 

1993/jonth/jonth.c

@@ -1,4 +1,5 @@
-  G	int i,j
+#include <X11/Xlib.h>
+  G	long i,j
   K	case
   R	return 0
   S(	x,y) for(x=0; x<y; x++)
@@ -35,7 +36,7 @@ Z(){
 	setitimer(0,_,0);
 }
 main(){
-	G,*_=(int*)X;
+	G,*_=(long*)X;
 	char*c=
 "*{{{ {}{{*{{{ {}* {    {{*{{{   *{{{ {* {* * {  {{ {  { *{* {   {* *{{{ *{{{ {   * {  { *{{{ {{  *{{ {  {{* {   {*{{ {{ {{ {* { {*{{ {  *{{{{    *{{ {{ ";
 	for(; *c; )
@@ -45,6 +46,7 @@ main(){
 	D=XOpenDisplay(0);
 	L[1]=L[2]=XWhitePixel(D,j=XDefaultScreen(D));
 	XMap@p=XCreate@XRoot@j),0,0,200,470,2,0,1,0,2056,L));
+	XSelectInput(D,p,ExposureMask|KeyPressMask);
 	T W;
 	L[2]=XBlackPixel(D,j);
 	J W;{
@@ -85,7 +87,7 @@ Y(){
 lK(){
 	XNextEvent(D,o);
 	switch(*o){
-		K 2:R+o[2]?0:XX k){
+		K 2:R+o[2]?0:XKeycodeToKeysym(D,((XKeyEvent*)o)->keycode,0);K 12:Y();}R;}d H 19;}M(J,4)}N H 20;}M(T,4)}q(m,w,k){
 			G=1;switch(k){
 				K 1:z+l]=1;
 				d(m);R+1;