home *** CD-ROM | disk | FTP | other *** search
/ Atari FTP / ATARI_FTP_0693.zip / ATARI_FTP_0693 / Mint / mnthlb30.zoo / patch / code30.diffs next >
Text File  |  1993-06-05  |  5KB  |  221 lines
  1. *** doprnt.c0    Wed Feb 10 04:35:42 1993
  2. --- doprnt.c    Thu May 27 20:53:38 1993
  3. ***************
  4. *** 606,635 ****
  5.   
  6.   /* static */ void Format __PROTO ((double number, char *buf));
  7.   
  8. ! asm ("
  9. ! comm = -6;
  10. ! resp = -16;
  11. ! .text
  12. ! .even
  13. ! _Format:
  14. !     lea    0xfffffa50:w,a0            | fpu address
  15. !     lea    sp@(4),a1            | argptr
  16. ! 
  17. !     movew    #0x5400,a0@(comm)        | fmoved -> fp0
  18. ! 1:    cmpw    #0x8900,a0@(resp)
  19. !     beq    1b
  20. !     movel    a1@+,a0@
  21. !     movel    a1@+,a0@
  22. ! 
  23. !     movel    a1@,a1                | get buf
  24. !     movew    #0x6c11,a0@(comm)        | fmovep fp0,a1@{#17}
  25. ! 1:    cmpw    #0x8900,a0@(resp)
  26. !     beq    1b
  27. !     movel    a0@,a1@+
  28. !     movel    a0@,a1@+
  29. !     movel    a0@,a1@+
  30. !     rts
  31. ! ");
  32.   #endif /* sfp004 */
  33.       
  34.   static int
  35. --- 606,635 ----
  36.   
  37.   /* static */ void Format __PROTO ((double number, char *buf));
  38.   
  39. ! asm ("\n"
  40. ! "comm = -6;\n"
  41. ! "resp = -16;\n"
  42. ! ".text\n"
  43. ! ".even\n"
  44. ! "_Format:\n"
  45. ! "    lea    0xfffffa50:w,a0            | fpu address\n"
  46. ! "    lea    sp@(4),a1            | argptr\n"
  47. ! "\n"
  48. ! "    movew    #0x5400,a0@(comm)        | fmoved -> fp0\n"
  49. ! "1:    cmpw    #0x8900,a0@(resp)\n"
  50. ! "    beq    1b\n"
  51. ! "    movel    a1@+,a0@\n"
  52. ! "    movel    a1@+,a0@\n"
  53. ! "\n"
  54. ! "    movel    a1@,a1                | get buf\n"
  55. ! "    movew    #0x6c11,a0@(comm)        | fmovep fp0,a1@{#17}\n"
  56. ! "1:    cmpw    #0x8900,a0@(resp)\n"
  57. ! "    beq    1b\n"
  58. ! "    movel    a0@,a1@+\n"
  59. ! "    movel    a0@,a1@+\n"
  60. ! "    movel    a0@,a1@+\n"
  61. ! "    rts\n"
  62. ! "");
  63.   #endif /* sfp004 */
  64.       
  65.   static int
  66. *** fread.c0    Wed Feb 10 03:49:42 1993
  67. --- fread.c    Thu May 27 21:05:10 1993
  68. ***************
  69. *** 2,7 ****
  70. --- 2,11 ----
  71.    * from Dale Schumacher's dLibs
  72.    */
  73.   
  74. + /* 5/26/93 sb -- Modified for HSC to account for the possibility that
  75. +  * size * count >= 64K.
  76. +  */
  77. + 
  78.   #include <stddef.h>
  79.   #include <stdio.h>
  80.   #include <unistd.h>
  81. ***************
  82. *** 18,24 ****
  83. --- 22,32 ----
  84.       size_t count;
  85.       register FILE *fp;
  86.       {
  87. + #ifdef __SOZOBON__
  88. +     register unsigned long n;
  89. + #else
  90.       register size_t n;
  91. + #endif
  92.       register long l, cnt;
  93.       register unsigned int f;
  94.       char *data=_data;
  95. ***************
  96. *** 33,39 ****
  97. --- 41,51 ----
  98.           return(0);
  99.   
  100.       l = 0;
  101. + #ifdef __SOZOBON__
  102. +     n = (unsigned long)count * size;
  103. + #else
  104.       n = count * size;
  105. + #endif
  106.   #if 0
  107.       if(fflush(fp))            /* re-sync file pointers */
  108.           return 0;
  109. ***************
  110. *** 44,50 ****
  111. --- 56,66 ----
  112.       if((cnt = fp->_cnt) > 0)
  113.       {
  114.           cnt = (cnt < n) ? cnt : n;
  115. + #ifdef __SOZOBON__
  116. +         _bcopy(fp->_ptr, data, cnt);
  117. + #else
  118.           bcopy(fp->_ptr, data, cnt);
  119. + #endif
  120.           fp->_cnt -= cnt;
  121.           fp->_ptr += cnt;
  122.           l += cnt;
  123. ***************
  124. *** 138,142 ****
  125. --- 154,162 ----
  126.       }
  127.   
  128.       ret:
  129. + #ifdef __SOZOBON__
  130. +     return((l > 0) ? ((size_t)((unsigned long)l / size)) : 0);
  131. + #else
  132.       return((l > 0) ? ((size_t)l / size) : 0);
  133. + #endif
  134.       }
  135. *** fwrite.c0    Fri Feb 19 18:28:20 1993
  136. --- fwrite.c    Wed May 26 20:42:12 1993
  137. ***************
  138. *** 1,5 ****
  139. --- 1,9 ----
  140.   /* from Dale Schumacher's dLibs */
  141.   
  142. + /* 5/26/93 sb -- Modified for HSC to account for the possibility that
  143. +  * size * count >= 64K.
  144. +  */
  145. + 
  146.   #include <stddef.h>
  147.   #include <stdio.h>
  148.   #include <unistd.h>
  149. ***************
  150. *** 17,23 ****
  151. --- 21,31 ----
  152.   register FILE *fp;
  153.   {
  154.       const char *data=_data;
  155. + #ifdef __SOZOBON__
  156. +     register unsigned long n, m;
  157. + #else
  158.       register size_t n, m;
  159. + #endif
  160.       register long l = 0;
  161.       long space;
  162.       unsigned int f = fp->_flag;
  163. ***************
  164. *** 38,52 ****
  165. --- 46,69 ----
  166.   
  167.       assert ((data != NULL));
  168.       assert ((size != 0));
  169. + #ifdef __SOZOBON__
  170. +     n =  (unsigned long)count * size;
  171. +     assert ( n <= (unsigned_long)LONG_MAX);  /* otherwise impl will not work */
  172. + #else
  173.       n =  count * size;
  174.       assert ( n <= (size_t)LONG_MAX);  /* otherwise impl will not work */
  175. + #endif
  176.   
  177.       if( (f&_IOBIN) || __FRW_BIN__ ) {
  178.         space = fp->_bsiz - fp->_cnt;
  179.         while(n > 0)
  180.         {
  181.             m = (n > space)? space: n;
  182. + #ifdef __SOZOBON__
  183. +           _bcopy(data, fp->_ptr, m);
  184. + #else
  185.             bcopy(data, fp->_ptr, m);
  186. + #endif
  187.             fp->_ptr += m;
  188.             fp->_cnt += m;
  189.             space -= m;
  190. ***************
  191. *** 137,141 ****
  192. --- 154,162 ----
  193.         }
  194.       }
  195.   
  196. + #ifdef __SOZOBON
  197. +     return((l > 0) ? ((size_t)((unsigned long)l / size)) : 0);
  198. + #else
  199.       return((l > 0) ? ((size_t)l / size) : 0);
  200. + #endif
  201.   }
  202. *** getpw.c0    Sat Sep  5 20:05:08 1992
  203. --- getpw.c    Sat May 22 16:40:24 1993
  204. ***************
  205. *** 114,120 ****
  206.       return (NULL);
  207.   }
  208.   
  209. ! #ifdef atarist
  210.   static char savbuf[256];    /* BUFSIZ seems bigger than necessary! */
  211.   #else
  212.   static char savbuf[BUFSIZ];
  213. --- 114,120 ----
  214.       return (NULL);
  215.   }
  216.   
  217. ! #if defined(atarist) || defined(__SOZOBON__)
  218.   static char savbuf[256];    /* BUFSIZ seems bigger than necessary! */
  219.   #else
  220.   static char savbuf[BUFSIZ];
  221.