1
0
Fork 0
mirror of https://git.freebsd.org/ports.git synced 2025-07-08 12:59:17 -04:00
ports/lang/bwbasic/files/patch-bwb__var.c
Jason E. Hale f6c38015ec Update to 3.10
Install additional PORTEXAMPLES added in this release
Add WWW to pkg-descr

Changes: 	From the README
CHANGES FROM 3.00 to 3.10
   * Implements most of the following BASIC dialects:
      OPTION VERSION DARTMOUTH        ' Dartmouth DTSS BASIC
      OPTION VERSION MARK-I           ' GE 265 Mainframe BASIC
      OPTION VERSION MARK-II          ' GE 435 Mainframe BASIC
      OPTION VERSION SYSTEM-360       ' IBM System/360 BASIC
      OPTION VERSION SYSTEM-370       ' IBM System/370 BASIC
      OPTION VERSION CBASIC-II        ' CBASIC-II for CP/M
      OPTION VERSION ECMA-55          ' ANSI Minimal BASIC
      OPTION VERSION HANDBOOK1        ' The BASIC Handbook, 1st Edition
      OPTION VERSION HANDBOOK2        ' The BASIC Handbook, 2nd Edition
      OPTION VERSION TRS-80           ' TRS-80 Model I/III/4 LBASIC
      OPTION VERSION BASIC-80         ' Microsoft BASIC-80 for Xenix
      OPTION VERSION ECMA-116         ' ANSI Full BASIC
2017-01-19 00:37:17 +00:00

20 lines
559 B
C

--- bwb_var.c.orig 2017-01-19 00:10:00 UTC
+++ bwb_var.c
@@ -124,7 +124,7 @@ bwb_COMMON(LineType * l)
{
/* COMMON A(,,) : DIM A( 5, 10, 20 ) */
dimensions++;
- while( line_skip_comma(l) );
+ while( line_skip_comma(l) )
{
dimensions++;
}
@@ -2640,7 +2640,7 @@ bwb_OPTION_USING(LineType * l)
*/
n = bwb_strlen( tbuf );
/* PAD RIGHT with NUL */
- for( i = n; n < 12; i++ )
+ for( i = n; i < 12; i++ )
{
tbuf[ i ] = BasicNulChar;
}