home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 100-199 / ff114.lzh / Vt100 / fixes / amiga.8985 < prev    next >
Text File  |  1987-11-22  |  4KB  |  129 lines
  1. Article 8985 of comp.sys.amiga:
  2. Path: mcdsun!noao!hao!oddjob!uwvax!rutgers!sri-spam!ames!amdcad!sun!pitstop!sundc!seismo!uunet!mcvax!enea!ttds!draken!sics!jw
  3. From: jw@sics.se (Johan Widen)
  4. Newsgroups: comp.sys.amiga
  5. Subject: VT100R2.7 bug in script.c
  6. Message-ID: <1534@sics.se>
  7. Date: 10 Oct 87 01:15:19 GMT
  8. Reply-To: jw@sics.UUCP (Johan Widen)
  9. Organization: Swedish Institute of Computer Science, Kista
  10. Lines: 115
  11.  
  12. When I compiled vt100 with the Lattice compiler the following bug was
  13. reported: WaitIO was called with a structure argument.
  14.  
  15. I have also added a few extern declarations. These are needed to get vt100
  16. through blink.
  17.  
  18. *** script.c    Wed Oct  7 17:15:30 1987
  19. --- script.c.new    Thu Oct  8 19:34:52 1987
  20. ***************
  21. *** 119,125 ****
  22.   
  23.   /*   NB: The structures referenced in the structure may be found in
  24.   ** init.c */
  25. ! struct filecmd {
  26.       char ac;    /* ASCII Capture    */
  27.       char as;    /* ASCII Send        */
  28.       char xs;    /* Xmodem Send        */
  29. --- 119,125 ----
  30.   
  31.   /*   NB: The structures referenced in the structure may be found in
  32.   ** init.c */
  33. ! extern struct filecmd {
  34.       char ac;    /* ASCII Capture    */
  35.       char as;    /* ASCII Send        */
  36.       char xs;    /* Xmodem Send        */
  37. ***************
  38. *** 131,137 ****
  39.       char nl;
  40.   } filecmd_chars;
  41.   
  42. ! struct baducmd {
  43.       char b03;    /* 0300            */
  44.       char b12;    /* 1200            */
  45.       char b24;    /* 2400            */
  46. --- 131,137 ----
  47.       char nl;
  48.   } filecmd_chars;
  49.   
  50. ! extern struct baducmd {
  51.       char b03;    /* 0300            */
  52.       char b12;    /* 1200            */
  53.       char b24;    /* 2400            */
  54. ***************
  55. *** 140,146 ****
  56.       char bnl;
  57.   } baudcmd_chars;
  58.   
  59. ! struct parcmd {
  60.       char no;    /* NOne            */
  61.       char ma;    /* MArk            */
  62.       char sp;    /* SPace        */
  63. --- 140,146 ----
  64.       char bnl;
  65.   } baudcmd_chars;
  66.   
  67. ! extern struct parcmd {
  68.       char no;    /* NOne            */
  69.       char ma;    /* MArk            */
  70.       char sp;    /* SPace        */
  71. ***************
  72. *** 149,155 ****
  73.       char nl;
  74.   } parcmd_chars;
  75.   
  76. ! struct modcmd {
  77.       char im;    /* IMage        */
  78.       char tx;    /* TeXt            */
  79.       char cn;    /* CoNvert        */
  80. --- 149,155 ----
  81.       char nl;
  82.   } parcmd_chars;
  83.   
  84. ! extern struct modcmd {
  85.       char im;    /* IMage        */
  86.       char tx;    /* TeXt            */
  87.       char cn;    /* CoNvert        */
  88. ***************
  89. *** 364,370 ****
  90.       if (*p != 's' && script_wait == WAIT_TIMER)  {
  91.           AbortIO((char *) &Script_Timer);
  92.           Wait (1L << Script_Timer_Port->mp_SigBit);
  93. !         WaitIO(Script_Timer);
  94.   
  95.           /* script will proceed after on command    */
  96.           script_wait = FALSE;
  97. --- 364,370 ----
  98.       if (*p != 's' && script_wait == WAIT_TIMER)  {
  99.           AbortIO((char *) &Script_Timer);
  100.           Wait (1L << Script_Timer_Port->mp_SigBit);
  101. !         WaitIO(&Script_Timer);
  102.   
  103.           /* script will proceed after on command    */
  104.           script_wait = FALSE;
  105. ***************
  106. *** 415,421 ****
  107.       if (script_wait == WAIT_TIMER) {    /* timer not done yet */
  108.          AbortIO((char *) &Script_Timer); /* so abort it */
  109.          Wait (1L << Script_Timer_Port->mp_SigBit); /* Wait for the sig */
  110. !        WaitIO(Script_Timer); /* Get my reply back */
  111.       }
  112.       InfoMsg1Line("Script - terminated");
  113.       script_on = FALSE;
  114. --- 415,421 ----
  115.       if (script_wait == WAIT_TIMER) {    /* timer not done yet */
  116.          AbortIO((char *) &Script_Timer); /* so abort it */
  117.          Wait (1L << Script_Timer_Port->mp_SigBit); /* Wait for the sig */
  118. !        WaitIO(&Script_Timer); /* Get my reply back */
  119.       }
  120.       InfoMsg1Line("Script - terminated");
  121.       script_on = FALSE;
  122. -- 
  123. Johan Widen
  124. SICS, PO Box 1263, S-163 13 SPANGA, SWEDEN
  125. {mcvax,munnari,cernvax,diku,inria,prlb2,penet,ukc,unido}!enea!sics.se!jw
  126. Internet: jw@sics.se
  127.  
  128.  
  129.