home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #3 / amigamamagazinepolishissue1998.iso / szachy / gnu / gnu_4_0_74 / gnuchess-4.0.pl74.patch < prev    next >
Text File  |  1995-05-02  |  23KB  |  848 lines
  1. Only in gnuchess-4.0.pl74/src: Install
  2. Only in gnuchess-4.0.pl74/src: Install.info
  3. Only in gnuchess-4.0.pl74/src: Makefile.amiga
  4. diff -r -b -c gnuchess-4.0.pl74.orig/src/binsort.c gnuchess-4.0.pl74/src/binsort.c
  5. *** gnuchess-4.0.pl74.orig/src/binsort.c    Mon Sep 19 10:23:04 1994
  6. --- gnuchess-4.0.pl74/src/binsort.c    Wed May 03 00:32:34 1995
  7. ***************
  8. *** 82,89 ****
  9. --- 82,94 ----
  10.   #    include <sys/types.h>        /* for statistics & io */
  11.   #    include <sys/stat.h>         /* for i/o */
  12.   #    include <errno.h>
  13. + #ifndef _amigados
  14.   #    include <sys/param.h>        /* for statistics */
  15.   #    include <sys/times.h>        /* for statistics */
  16. + #else
  17. + #define NOUNISTD
  18. + #define FUNCPROTO
  19. + #endif
  20.   #    include <time.h>
  21.   #    include <stdlib.h>
  22.   
  23. ***************
  24. *** 1171,1177 ****
  25. --- 1176,1184 ----
  26.   prtstatist(realtime)
  27.   long            realtime;
  28.   {
  29. + #ifndef _amigados
  30.     struct tms    spenttime;
  31. + #endif
  32.     int           tapenum;
  33.     unsigned long one, total;
  34.   
  35. ***************
  36. *** 1188,1198 ****
  37. --- 1195,1207 ----
  38.       }
  39.     fprintf(stderr,"\t\tTotal  : %10ld\n", total);
  40.     fprintf(stderr,"\tReal time [s]:\t\t\t%d\n", (int)realtime + 1);
  41. + #ifndef _amigados
  42.     times(&spenttime);
  43.     fprintf(stderr,"\tUser time [s]:\t\t\t%.2f\n",
  44.         (float)spenttime.tms_utime/(float)CLOCKFREQ);
  45.     fprintf(stderr,"\tSystem time [s]:\t\t%.2f\n",
  46.         (float)spenttime.tms_stime/(float)CLOCKFREQ);
  47. + #endif
  48.   }
  49.   
  50.   
  51. ***************
  52. *** 1500,1506 ****
  53. --- 1509,1519 ----
  54.     struct stat statstr;
  55.   
  56.     ctape = TAPE + num;
  57. + #ifndef _amigados
  58.     sprintf(scrname, "%s/binsort%07d%d", scrpath, getpid(), num); /* gen name */
  59. + #else
  60. +   sprintf(scrname, "%s/binsort%s", scrpath, tmpnam(NULL));
  61. + #endif
  62.     if ((fdes = open(scrname, O_RDWR | O_CREAT, S_IREAD|S_IWRITE)) < 0)
  63.                   /* create scratch file */
  64.       ioerr();
  65. diff -r -b -c gnuchess-4.0.pl74.orig/src/book.c gnuchess-4.0.pl74/src/book.c
  66. *** gnuchess-4.0.pl74.orig/src/book.c    Wed Feb 22 00:46:32 1995
  67. --- gnuchess-4.0.pl74/src/book.c    Wed May 03 00:32:36 1995
  68. ***************
  69. *** 23,29 ****
  70.   #include "gnuchess.h"
  71.   #include "ttable.h"        /* uses hashbd, hashkey */
  72.   #include "ataks.h"
  73. ! #if !defined(AMIGADOS) && !defined(Think_C)
  74.   #include <unistd.h>
  75.   #endif
  76.   #ifdef Think_C
  77. --- 23,29 ----
  78.   #include "gnuchess.h"
  79.   #include "ttable.h"             /* uses hashbd, hashkey */
  80.   #include "ataks.h"
  81. ! #if !defined(_amigados) && !defined(Think_C)
  82.   #include <unistd.h>
  83.   #endif
  84.   #ifdef Think_C
  85. Only in gnuchess-4.0.pl74/src: doc
  86. diff -r -b -c gnuchess-4.0.pl74.orig/src/dspcom.c gnuchess-4.0.pl74/src/dspcom.c
  87. *** gnuchess-4.0.pl74.orig/src/dspcom.c    Sat Feb 11 04:04:13 1995
  88. --- gnuchess-4.0.pl74/src/dspcom.c    Wed May 03 00:32:38 1995
  89. ***************
  90. *** 59,65 ****
  91.   #include <sys/param.h>
  92.   #include <sys/types.h>
  93.   #include <sys/file.h>
  94. ! #ifndef AMIGADOS
  95.   #include <sys/ioctl.h>
  96.   #endif
  97.   #endif /* Think_C */
  98. --- 59,72 ----
  99.   #include <sys/param.h>
  100.   #include <sys/types.h>
  101.   #include <sys/file.h>
  102. ! #if defined(_amigados)
  103. ! /*
  104. !     We cannot use the Amiga headers, as exec/types.h would redefine
  105. !     the SHORT type. Fortunately we do not need very much of them:
  106. ! */
  107. ! #define SIGBREAKF_SET 0xf000 /* SIGBREAKF_CTRL(C|D|E|F) */
  108. ! extern long SetSignal(long, long);
  109. ! #else
  110.   #include <sys/ioctl.h>
  111.   #endif
  112.   #endif /* Think_C */
  113. ***************
  114. *** 1429,1435 ****
  115.   
  116.   {
  117.   struct timeval tv;
  118. ! #ifndef MSDOS
  119.     int nchar;
  120.     extern int errno;
  121.     int i;
  122. --- 1436,1442 ----
  123.   
  124.   {
  125.   struct timeval tv;
  126. ! #if !defined(MSDOS)  &&  !defined(_amigados)
  127.     int nchar;
  128.     extern int errno;
  129.     int i;
  130. ***************
  131. *** 1451,1463 ****
  132.       }
  133.   #endif /*FIONREAD*/
  134.   #else
  135.     if (kbhit ())
  136.       {
  137.         if (!flag.timeout)
  138.       flag.back = true;
  139.         flag.bothsides = false;
  140.       }
  141. ! #endif /* MSDOS */
  142.     gettimeofday(&tv,NULL);
  143.     et = (tv.tv_sec*100+(tv.tv_usec/10000)) - time0;
  144.     ETnodes = NodeCnt + ZNODES;
  145. --- 1458,1482 ----
  146.       }
  147.   #endif /*FIONREAD*/
  148.   #else
  149. + /*
  150. +     On the Amiga we have two possibilities of interrupting GNU Chess:
  151. +     Breaking with Ctrl-C is less comfortable for the user, but
  152. +     checking for it is faster.
  153. + 
  154. +     We choose the comfortable way for curses and the fast way for
  155. +     AmyBoard.
  156. + */
  157. + #if defined(_amigados) && defined(XBOARD)
  158. +   if (SetSignal(0, SIGBREAKF_SET) & SIGBREAKF_SET)
  159. + #else
  160.     if (kbhit ())
  161. + #endif
  162.       {
  163.         if (!flag.timeout)
  164.           flag.back = true;
  165.         flag.bothsides = false;
  166.       }
  167. ! #endif /* MSDOS  ||  _amigados  */
  168.     gettimeofday(&tv,NULL);
  169.     et = (tv.tv_sec*100+(tv.tv_usec/10000)) - time0;
  170.     ETnodes = NodeCnt + ZNODES;
  171. ***************
  172. *** 1495,1501 ****
  173.    */
  174.   
  175.   {
  176. ! #ifndef MSDOS
  177.     int nchar;
  178.     extern int errno;
  179.     int i;
  180. --- 1514,1520 ----
  181.    */
  182.   
  183.   {
  184. ! #if !defined(MSDOS)  &&  !defined(_amigados)
  185.     int nchar;
  186.     extern int errno;
  187.     int i;
  188. ***************
  189. *** 1523,1529 ****
  190.       flag.back = true;
  191.         flag.bothsides = false;
  192.       }
  193. ! #endif /* MSDOS */
  194.     et = (time ((time_t *) 0) - time0) * 100;
  195.     ETnodes = NodeCnt + ZNODES;
  196.     if (et < 0)
  197. --- 1542,1548 ----
  198.           flag.back = true;
  199.         flag.bothsides = false;
  200.       }
  201. ! #endif /* MSDOS  ||  _amigados */
  202.     et = (time ((time_t *) 0) - time0) * 100;
  203.     ETnodes = NodeCnt + ZNODES;
  204.     if (et < 0)
  205. diff -r -b -c gnuchess-4.0.pl74.orig/src/eco.c gnuchess-4.0.pl74/src/eco.c
  206. *** gnuchess-4.0.pl74.orig/src/eco.c    Mon Sep 19 10:23:05 1994
  207. --- gnuchess-4.0.pl74/src/eco.c    Wed May 03 00:32:38 1995
  208. ***************
  209. *** 23,29 ****
  210.   #include "gnuchess.h"
  211.   #include "ttable.h" /* uses hashbd, hashkey */
  212.   #include "ataks.h"
  213. ! #if !defined(AMIGADOS) && !defined(Think_C)
  214.   #include <unistd.h>
  215.   #endif
  216.   #ifdef Think_C
  217. --- 23,29 ----
  218.   #include "gnuchess.h"
  219.   #include "ttable.h" /* uses hashbd, hashkey */
  220.   #include "ataks.h"
  221. ! #if !defined(_amigados) && !defined(Think_C)
  222.   #include <unistd.h>
  223.   #endif
  224.   #ifdef Think_C
  225. diff -r -b -c gnuchess-4.0.pl74.orig/src/ecocvt.c gnuchess-4.0.pl74/src/ecocvt.c
  226. *** gnuchess-4.0.pl74.orig/src/ecocvt.c    Tue Sep 20 03:09:34 1994
  227. --- gnuchess-4.0.pl74/src/ecocvt.c    Wed May 03 00:32:38 1995
  228. ***************
  229. *** 1,5 ****
  230. --- 1,8 ----
  231.   #include <fcntl.h>
  232.   #include <sys/types.h>
  233. + #if defined(_amigados)
  234. + #define LIBRARIES_DOS_H
  235. + #endif
  236.   #include <sys/stat.h>
  237.   #include "gnuchess.h"
  238.   struct gdxdata
  239. diff -r -b -c gnuchess-4.0.pl74.orig/src/ecosort.c gnuchess-4.0.pl74/src/ecosort.c
  240. *** gnuchess-4.0.pl74.orig/src/ecosort.c    Mon Sep 19 10:23:05 1994
  241. --- gnuchess-4.0.pl74/src/ecosort.c    Wed May 03 00:32:38 1995
  242. ***************
  243. *** 7,12 ****
  244. --- 7,13 ----
  245.         utshort cntr;
  246.         };
  247.   char strcmd[256];
  248. + #ifndef _amigados
  249.   main()
  250.   {
  251.   sprintf(strcmd,"./binsort -r %d -k L:a:0:2</tmp/step1.eco>/tmp/step2.eco\n",sizeof(struct gdxecodata));
  252. ***************
  253. *** 14,16 ****
  254. --- 15,31 ----
  255.   system(strcmd);
  256.   exit(0);
  257.   }
  258. + #else
  259. + int main(int argc, char *argv[])
  260. + {
  261. +     if (argc < 4) {
  262. +     fprintf(stderr, "Usage: ecosort <binsortpath> <step1path> <step2path>");
  263. +     exit(10);
  264. +     }
  265. + 
  266. +     sprintf(strcmd, "%s -r %d -k L:a:0:2 <%s >%s\n",
  267. +         argv[1], sizeof(struct gdxecodata), argv[2], argv[3]);
  268. +     system(strcmd);
  269. +     exit(0);
  270. + }
  271. + #endif
  272. diff -r -b -c gnuchess-4.0.pl74.orig/src/eval.c gnuchess-4.0.pl74/src/eval.c
  273. *** gnuchess-4.0.pl74.orig/src/eval.c    Fri Feb 10 21:54:43 1995
  274. --- gnuchess-4.0.pl74/src/eval.c    Wed May 03 00:32:38 1995
  275. ***************
  276. *** 1574,1580 ****
  277.                   pp = false;
  278.                   break;
  279.                   }
  280. !               z = (pp ? i - ((row (i) == 6) ? 8 : 16) : i);
  281.                 Pd += ((pp) ? 5 * taxicab (sq, z) : taxicab (sq, z));
  282.             }
  283.           }
  284. --- 1574,1580 ----
  285.                   pp = false;
  286.                   break;
  287.                   }
  288. !               z = (pp ? i - ((row (i) == 1) ? 8 : 16) : i);
  289.                 Pd += ((pp) ? 5 * taxicab (sq, z) : taxicab (sq, z));
  290.             }
  291.           }
  292. Only in gnuchess-4.0.pl74/src: gettimeofday.c
  293. diff -r -b -c gnuchess-4.0.pl74.orig/src/gnuan.c gnuchess-4.0.pl74/src/gnuan.c
  294. *** gnuchess-4.0.pl74.orig/src/gnuan.c    Mon Sep 19 10:23:06 1994
  295. --- gnuchess-4.0.pl74/src/gnuan.c    Wed May 03 00:32:40 1995
  296. ***************
  297. *** 77,83 ****
  298.   #include <sys/param.h>
  299.   #include <sys/types.h>
  300.   #include <sys/file.h>
  301. ! #ifndef AMIGADOS
  302.   #include <sys/ioctl.h>
  303.   #endif
  304.   void TerminateSearch (int), Die (int);
  305. --- 77,83 ----
  306.   #include <sys/param.h>
  307.   #include <sys/types.h>
  308.   #include <sys/file.h>
  309. ! #ifndef _amigados
  310.   #include <sys/ioctl.h>
  311.   #endif
  312.   void TerminateSearch (int), Die (int);
  313. ***************
  314. *** 622,628 ****
  315.   {
  316.       struct timeval tv;
  317.   
  318. ! #ifndef MSDOS
  319.       int nchar;
  320.       extern int errno;
  321.       int i;
  322. --- 622,628 ----
  323.   {
  324.       struct timeval tv;
  325.   
  326. ! #if !defined(MSDOS)  &&  !defined(_amigados)
  327.       int nchar;
  328.       extern int errno;
  329.       int i;
  330. ***************
  331. *** 650,656 ****
  332.             flag.back = true;
  333.         flag.bothsides = false;
  334.         }
  335. ! #endif /* MSDOS */
  336.       gettimeofday (&tv, NULL);
  337.       et = (tv.tv_sec * 100 + (tv.tv_usec / 10000)) - time0;
  338.       ETnodes = NodeCnt + ZNODES;
  339. --- 650,656 ----
  340.                 flag.back = true;
  341.             flag.bothsides = false;
  342.         }
  343. ! #endif /* MSDOS  ||  _amigados  */
  344.       gettimeofday (&tv, NULL);
  345.       et = (tv.tv_sec * 100 + (tv.tv_usec / 10000)) - time0;
  346.       ETnodes = NodeCnt + ZNODES;
  347. ***************
  348. *** 679,685 ****
  349.    */
  350.   
  351.   {
  352. ! #ifndef MSDOS
  353.       int nchar;
  354.       extern int errno;
  355.       int i;
  356. --- 679,685 ----
  357.    */
  358.   
  359.   {
  360. ! #if !defined(MSDOS)  &&  !defined(_amigados)
  361.       int nchar;
  362.       extern int errno;
  363.       int i;
  364. ***************
  365. *** 707,713 ****
  366.             flag.back = true;
  367.         flag.bothsides = false;
  368.         }
  369. ! #endif /* MSDOS */
  370.       et = (time ((long *) 0) - time0) * 100;
  371.       ETnodes = NodeCnt + ZNODES;
  372.       if (et < 0)
  373. --- 707,713 ----
  374.                 flag.back = true;
  375.             flag.bothsides = false;
  376.         }
  377. ! #endif /* MSDOS  ||  _amigados */
  378.       et = (time ((long *) 0) - time0) * 100;
  379.       ETnodes = NodeCnt + ZNODES;
  380.       if (et < 0)
  381. diff -r -b -c gnuchess-4.0.pl74.orig/src/gnuchess.h gnuchess-4.0.pl74/src/gnuchess.h
  382. *** gnuchess-4.0.pl74.orig/src/gnuchess.h    Sat Feb 04 22:05:34 1995
  383. --- gnuchess-4.0.pl74/src/gnuchess.h    Wed May 03 00:32:40 1995
  384. ***************
  385. *** 32,38 ****
  386.   #define huge
  387.   #endif
  388.   #include <stdio.h>
  389. ! #if !defined(NOMEMSET) 
  390.   #include <memory.h>
  391.   #endif
  392.   #ifdef SIGNCHAR
  393. --- 32,38 ----
  394.   #define huge
  395.   #endif
  396.   #include <stdio.h>
  397. ! #if !defined(NOMEMSET)  &&  !defined(_amigados)
  398.   #include <memory.h>
  399.   #endif
  400.   #ifdef SIGNCHAR
  401. ***************
  402. *** 81,87 ****
  403.   #ifndef Think_C
  404.   #include <sys/param.h>
  405.   #include <sys/types.h>
  406. ! #ifndef AMIGADOS
  407.   #include <sys/times.h>
  408.   #endif
  409.   #endif /* Think_C */
  410. --- 81,87 ----
  411.   #ifndef Think_C
  412.   #include <sys/param.h>
  413.   #include <sys/types.h>
  414. ! #ifndef _amigados
  415.   #include <sys/times.h>
  416.   #endif
  417.   #endif /* Think_C */
  418. ***************
  419. *** 89,94 ****
  420. --- 89,102 ----
  421.   #define printz printf
  422.   #define scanz scanf
  423.   #else
  424. + #ifdef _amigados
  425. + #define EXEC_TYPES_H            /*  Prevent exec/types.h from being  */
  426. + typedef unsigned char UBYTE;    /*  included as this would redefine  */
  427. + typedef short WORD;             /*  SHORT. Some typedef's required   */
  428. + typedef unsigned short UWORD;   /*  by curses.h, however.            */
  429. + typedef long LONG;
  430. + typedef unsigned long ULONG;
  431. + #endif
  432.   #include <curses.h>
  433.   #define scanz fflush(stdout),scanw
  434.   #define printz printw
  435. ***************
  436. *** 238,245 ****
  437.   #define QBLOCK false        /* if true cache quiescent positions */
  438.   #define BESTDELTA 90
  439.   /* about 1/2 second worth of nodes for your machine */
  440. ! #ifdef Think_C
  441.   #define ZNODES 500              /* check the time every ZNODES positions */
  442.   #else /* Think_C */
  443.   #define ZNODES 4000             /* check the time every ZNODES positions */
  444.   #endif /* Think_C */
  445. --- 246,255 ----
  446.   #define QBLOCK false            /* if true cache quiescent positions */
  447.   #define BESTDELTA 90
  448.   /* about 1/2 second worth of nodes for your machine */
  449. ! #if defined(Think_C)
  450.   #define ZNODES 500              /* check the time every ZNODES positions */
  451. + #elif defined(_amigados)
  452. + #define ZNODES 1000             /* check the time every ZNODES positions */
  453.   #else /* Think_C */
  454.   #define ZNODES 4000             /* check the time every ZNODES positions */
  455.   #endif /* Think_C */
  456. ***************
  457. *** 430,436 ****
  458.        extern unsigned int starttime;
  459.        extern SHORT distdata[64][64], taxidata[64][64];
  460.        extern CHAR mvstr[5][7];
  461. ! #ifndef AMIGADOS
  462.        extern union U admin;
  463.   #endif
  464.        extern UTSHORT bookmaxply;
  465. --- 440,446 ----
  466.        extern unsigned int starttime;
  467.        extern SHORT distdata[64][64], taxidata[64][64];
  468.        extern CHAR mvstr[5][7];
  469. ! #ifndef _amigados
  470.        extern union U admin;
  471.   #endif
  472.        extern UTSHORT bookmaxply;
  473. ***************
  474. *** 554,566 ****
  475.        extern int pick (SHORT p1, SHORT p2);
  476.        extern int VerifyMove (CHAR *s, SHORT inp, UTSHORT *mv);
  477.        extern void VMoveList (SHORT side, register SHORT ply);
  478. ! #if !defined(AMIGADOS)
  479.        extern struct gdxadmin B;
  480.   #endif
  481.   
  482. - #if defined(AMIGADOS)  &&  !defined(XBOARD)
  483. - #define exit(retcode) CleanExit(retcode)
  484. - #endif
  485.   /* Take care of NOMEMSET once and for all... */
  486.   #if (defined(NOMEMSET) || defined(MSDOS)) && !defined(__GNUC__)
  487.   #define memset(s,c,l) {\
  488. --- 564,573 ----
  489.        extern int pick (SHORT p1, SHORT p2);
  490.        extern int VerifyMove (CHAR *s, SHORT inp, UTSHORT *mv);
  491.        extern void VMoveList (SHORT side, register SHORT ply);
  492. ! #if !defined(_amigados)
  493.        extern struct gdxadmin B;
  494.   #endif
  495.   
  496.   /* Take care of NOMEMSET once and for all... */
  497.   #if (defined(NOMEMSET) || defined(MSDOS)) && !defined(__GNUC__)
  498.   #define memset(s,c,l) {\
  499. Only in gnuchess-4.0.pl74/src: kbhit.c
  500. diff -r -b -c gnuchess-4.0.pl74.orig/src/nondsp.c gnuchess-4.0.pl74/src/nondsp.c
  501. *** gnuchess-4.0.pl74.orig/src/nondsp.c    Fri Feb 10 21:51:25 1995
  502. --- gnuchess-4.0.pl74/src/nondsp.c    Wed May 03 00:32:40 1995
  503. ***************
  504. *** 29,35 ****
  505.   /*#include <conio.h>*/
  506.   #elif !defined(Think_C)
  507.   #include <sys/file.h>
  508. ! #ifndef AMIGADOS
  509.   #include <sys/ioctl.h>
  510.   #endif
  511.   
  512. --- 29,35 ----
  513.   /*#include <conio.h>*/
  514.   #elif !defined(Think_C)
  515.   #include <sys/file.h>
  516. ! #ifndef _amigados
  517.   #include <sys/ioctl.h>
  518.   #endif
  519.   
  520. ***************
  521. *** 62,68 ****
  522.   {
  523.     mycnt1 = mycnt2 = 0;
  524.   #if defined CHESSTOOL || defined XBOARD
  525. ! #if defined(SYSV)  ||  defined(AMIGADOS)
  526.     setvbuf (stdout, NULL, _IOLBF, BUFSIZ);
  527.   #else
  528.     setlinebuf (stdout);
  529. --- 62,68 ----
  530.   {
  531.     mycnt1 = mycnt2 = 0;
  532.   #if defined CHESSTOOL || defined XBOARD
  533. ! #if defined(SYSV)  ||  defined(_amigados)
  534.     setvbuf (stdout, NULL, _IOLBF, BUFSIZ);
  535.   #else
  536.     setlinebuf (stdout);
  537. diff -r -b -c gnuchess-4.0.pl74.orig/src/nuxdsp.c gnuchess-4.0.pl74/src/nuxdsp.c
  538. *** gnuchess-4.0.pl74.orig/src/nuxdsp.c    Tue Nov 22 01:36:43 1994
  539. --- gnuchess-4.0.pl74/src/nuxdsp.c    Wed May 03 00:32:40 1995
  540. ***************
  541. *** 37,43 ****
  542. --- 37,45 ----
  543.   #include <sys/param.h>
  544.   #include <sys/types.h>
  545.   #include <sys/file.h>
  546. + #ifndef _amigados
  547.   #include <curses.h>
  548. + #endif
  549.   
  550.   #ifdef notdef
  551.   #if defined(__STDC__)
  552. ***************
  553. *** 104,109 ****
  554. --- 106,116 ----
  555.     signal (SIGINT, Die);
  556.   #ifndef MSDOS
  557.     signal (SIGQUIT, Die);
  558. + #ifdef _amigados
  559. +   if (atexit((void (*)(void)) endwin))
  560. +   { perror("atexit");
  561. +   }
  562. + #endif
  563.     initscr ();
  564.     crmode ();
  565.   #else
  566. diff -r -b -c gnuchess-4.0.pl74.orig/src/search.c gnuchess-4.0.pl74/src/search.c
  567. *** gnuchess-4.0.pl74.orig/src/search.c    Wed Feb 22 00:46:50 1995
  568. --- gnuchess-4.0.pl74/src/search.c    Wed May 03 00:32:42 1995
  569. ***************
  570. *** 269,275 ****
  571.             /* calculate avg time per move remaining */
  572.   
  573.             ResponseTime = TimeControl.clock[side] / TimeControl.moves[side];
  574. !           ResponseTime += TCadd * 3 / 4;
  575.             TCleft = (int) ResponseTime / 5;
  576.             if (TimeControl.moves[side] < 5)
  577.           TCcount = MAXTCCOUNTX - 10;
  578. --- 269,276 ----
  579.             /* calculate avg time per move remaining */
  580.   
  581.             ResponseTime = TimeControl.clock[side] / TimeControl.moves[side];
  582. !           ResponseTime = ResponseTime * 2 / 3;
  583. !           ResponseTime += TCadd / 2;
  584.             TCleft = (int) ResponseTime / 5;
  585.             if (TimeControl.moves[side] < 5)
  586.           TCcount = MAXTCCOUNTX - 10;
  587. ***************
  588. *** 1245,1251 ****
  589.   #endif
  590.             ElapsedTime (2);
  591.             TCcount++;
  592. -           if (et > ResponseTime) flag.timeout = true;
  593.             if (!background && Sdepth > 2)
  594.           {
  595.             if (best < alpha)
  596. --- 1246,1251 ----
  597. diff -r -b -c gnuchess-4.0.pl74.orig/src/ttable.c gnuchess-4.0.pl74/src/ttable.c
  598. *** gnuchess-4.0.pl74.orig/src/ttable.c    Sun Feb 05 06:47:31 1995
  599. --- gnuchess-4.0.pl74/src/ttable.c    Wed May 03 00:32:42 1995
  600. ***************
  601. *** 21,27 ****
  602.   struct hashentry *ttable[2];
  603.   
  604.   unsigned long ttblsize;
  605. ! /* unsigned */ SHORT rehash;  /* -1 is used as a flag --tpm */
  606.   #ifdef NEWAGE
  607.           utshort TTage;        /* Current ttable age */
  608.           UTSHORT TTageClock,    /* Count till next age tick */
  609. --- 21,27 ----
  610.   struct hashentry *ttable[2];
  611.   
  612.   unsigned long ttblsize;
  613. ! SHORT rehash;  /* -1 is used as a flag --tpm */
  614.   #ifdef NEWAGE
  615.           utshort TTage;        /* Current ttable age */
  616.           UTSHORT TTageClock,    /* Count till next age tick */
  617. ***************
  618. *** 99,105 ****
  619.   
  620.   {
  621.     register struct hashentry *ptbl;
  622. !   register /*unsigned*/ SHORT i = 0;    /*to match new type of rehash --tpm*/
  623.   
  624.   #ifdef DEBUG
  625.       if(flag.nott)return false;
  626. --- 99,105 ----
  627.   
  628.   {
  629.       register struct hashentry *ptbl;
  630. !     register SHORT i = 0;
  631.   
  632.   #ifdef DEBUG
  633.       if(flag.nott)return false;
  634. ***************
  635. *** 107,112 ****
  636. --- 107,120 ----
  637.   #ifdef HASHSTATS
  638.       ttprobe[depth]++;
  639.   #endif
  640. + #ifdef NEWAGE
  641. +       /* Find entry within rehash window or return failure */
  642. +       for (i=rehash, ptbl = &ttable[side][hashkey % ttblsize];
  643. +            ptbl->hashbd != hashbd; ptbl++)
  644. +         if (--i == 0) return false;
  645. +       /* Update age of rediscovered node */
  646. +           ptbl->age = TTage - TTdepthage[ptbl->depth];
  647. + #else
  648.       ptbl = &ttable[side][hashkey % ttblsize];
  649.       while (true)
  650.         {
  651. ***************
  652. *** 115,120 ****
  653. --- 123,129 ----
  654.         if (++i > rehash) return false;
  655.         ptbl++;
  656.         }
  657. + #endif
  658.   
  659.       PV = SwagHt = ptbl->mv;
  660.       if ((ptbl->depth >= (SHORT) depth) || abs(ptbl->score)>9000)
  661. ***************
  662. *** 138,151 ****
  663.       HashCnt++;
  664.   #endif
  665.   
  666. - #ifdef NEWAGE
  667. -         /* Find entry within rehash window or return failure */
  668. -          for (i=rehash, ptbl = &ttable[side][hashkey % ttblsize];
  669. -                   ptbl->hashbd != hashbd; ptbl++)
  670. -           if (--i == 0) return false;
  671. -         /* Update age of rediscovered node */
  672. -           ptbl->age = TTage - TTdepthage[ptbl->depth];
  673. - #endif
  674.         if (ptbl->flags & truescore)
  675.       {
  676.         *score = ptbl->score;
  677. --- 147,152 ----
  678. ***************
  679. *** 191,207 ****
  680.   
  681.     {
  682.       register struct hashentry *ptbl;
  683. !     register /*unsigned*/ SHORT i = 0;    /*to match new type of rehash --tpm*/
  684.   
  685.       ptbl = &ttable[side][hashkey % ttblsize];
  686.       while (true)
  687.         {
  688. !         if (ptbl->depth == 0 
  689. ! #ifdef NEWAGE
  690. !             || TTage - ptbl->age > newage
  691. ! #endif
  692. !             ) break;
  693. !         if((ptbl->hashbd) == hashbd)if(ptbl->depth > (UCHAR)depth)return false; else break;
  694.           if (++i > rehash)
  695.             {
  696.   #ifdef HASHSTATS
  697. --- 192,207 ----
  698.   
  699.     {
  700.       register struct hashentry *ptbl;
  701. !     register SHORT i = 0;
  702. ! #ifndef NEWAGE
  703.   
  704.       ptbl = &ttable[side][hashkey % ttblsize];
  705.       while (true)
  706.         {
  707. !         if (ptbl->depth == 0) break;
  708. !         if ((ptbl->hashbd) == hashbd) {
  709. !             if (ptbl->depth > (UCHAR)depth) return false; else break;
  710. !         }
  711.           if (++i > rehash)
  712.             {
  713.   #ifdef HASHSTATS
  714. ***************
  715. *** 213,249 ****
  716.             }
  717.           ptbl++;
  718.         }
  719. ! #ifdef NEWAGE
  720. !     {
  721.           /* Look for match or oldest entry to reuse */
  722. !         int i;
  723. !         SHORT old = 0;
  724. !         struct hashentry * oldest = (struct hashentry *)NULL;
  725. !         for (i=rehash, ptbl = &ttable[side][hashkey % ttblsize];
  726. !                 i > 0 && ptbl->hashbd != hashbd; i--, ptbl++)
  727. !             if ((TTage - ptbl->age) > old)
  728. !               {  
  729.                   old = TTage - ptbl->age;
  730.                   oldest = ptbl;
  731.                 }  
  732. !         if (i == 0)
  733. !           {
  734.               ptbl = oldest; /* reuse oldest entry */
  735. !             if (--TTageClock == 0)
  736. !               {
  737.                   TTageClock = TTageRate;
  738.                   TTage++;        /* Everyone is now just a little older */
  739.                 }
  740. !           }
  741. !         ptbl->age = TTage - TTdepthage[ptbl->depth]; /* Set age of this node */
  742.       }
  743. ! #else
  744. !     TTadd++;
  745. ! #endif
  746.   #ifdef HASHSTATS
  747.       HashAdd++;
  748.   #endif
  749. -     if(ptbl->depth > (UCHAR)depth) return false;
  750.       ptbl->hashbd = hashbd;
  751.       ptbl->depth = (UCHAR) depth;
  752.       ptbl->score = score;
  753. --- 213,257 ----
  754.             }
  755.           ptbl++;
  756.         }
  757. !     TTadd++;
  758. !     if (ptbl->depth > (UCHAR)depth) return false;
  759. ! 
  760. ! #else /* NEWAGE */
  761. !     utshort old;
  762. !         struct hashentry *oldest;
  763. ! 
  764.           /* Look for match or oldest entry to reuse */
  765. !     /* Note that arithmetic on ages is intentionally modulo 65536 */
  766. !         i = rehash;
  767. !     oldest = ptbl = &ttable[side][hashkey % ttblsize];
  768. !         old = TTage - ptbl->age;
  769. !     while (ptbl->hashbd != hashbd) {
  770. !         if (--i == 0) break;
  771. !         ptbl++;
  772. !         if ((TTage - ptbl->age) > old) {
  773.           old = TTage - ptbl->age;
  774.           oldest = ptbl;
  775.           }
  776. !     }
  777. !         if (i == 0) {
  778.               ptbl = oldest; /* reuse oldest entry */
  779. ! #ifdef HASHSTATS
  780. !         THashCol++;
  781. ! #endif
  782. !             if (--TTageClock == 0) {
  783.                   TTageClock = TTageRate;
  784.                   TTage++;        /* Everyone is now just a little older */
  785.           }
  786. !     } else {
  787. ! /*!!!        if (ptbl->depth > (UCHAR)depth) return false;*/
  788.       }
  789. ! /*!!!*/        if (ptbl->depth > (UCHAR)depth) return false;
  790. !         ptbl->age = TTage - TTdepthage[depth]; /* Set age of this node */
  791. ! 
  792. ! #endif /* NEWAGE */
  793.   #ifdef HASHSTATS
  794.       HashAdd++;
  795.   #endif
  796.       ptbl->hashbd = hashbd;
  797.       ptbl->depth = (UCHAR) depth;
  798.       ptbl->score = score;
  799. ***************
  800. *** 290,296 ****
  801.         {
  802.           TTageClock = TTageRate;
  803.           TTage = newage+1; /* Zero entries are pre-expired. */
  804. -         TTageRate = ttblsize/(newage/2); /* Average 1/2 of table will be expired */
  805.           /* zero the age of all ttable entries */
  806.           memset(ttable[white],0,sizeof(struct hashentry)*(unsigned)(ttblsize+rehash));
  807.           memset(ttable[black],0,sizeof(struct hashentry)*(unsigned)(ttblsize+rehash));
  808. --- 298,303 ----
  809. ***************
  810. *** 824,827 ****
  811. --- 831,837 ----
  812.   #endif
  813.             }
  814.     }
  815. + 
  816. + 
  817. + 
  818.   
  819. diff -r -b -c gnuchess-4.0.pl74.orig/src/uxdsp.c gnuchess-4.0.pl74/src/uxdsp.c
  820. *** gnuchess-4.0.pl74.orig/src/uxdsp.c    Tue Nov 22 01:36:44 1994
  821. --- gnuchess-4.0.pl74/src/uxdsp.c    Wed May 03 00:32:42 1995
  822. ***************
  823. *** 37,43 ****
  824. --- 37,45 ----
  825.   #include <sys/param.h>
  826.   #include <sys/types.h>
  827.   #include <sys/file.h>
  828. + #ifndef _amigados
  829.   #include <curses.h>      
  830. + #endif
  831.   
  832.   #ifdef notdef
  833.   #if defined(__STDC__)
  834. ***************
  835. *** 79,84 ****
  836. --- 81,91 ----
  837.     signal (SIGINT, Die);
  838.   #ifndef MSDOS
  839.     signal (SIGQUIT, Die);
  840. + #ifdef _amigados
  841. +   if (atexit((void (*) (void)) endwin))
  842. +   { perror("atexit");
  843. +   }
  844. + #endif
  845.     initscr ();
  846.     crmode ();
  847.   #else
  848.