[Gcl-commits] gcl/o read.d [Version_2_6_8pre]

[Mike Thomas]

CVSROOT:        /sources/gcl
Module name:    gcl
Branch:         Version_2_6_8pre
Changes by:     Mike Thomas <mjthomas>  06/06/16 02:26:22

Modified files:
        o              : read.d 

Log message:
        Band aid fix to stop build failure on Windows.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gcl/o/read.d?cvsroot=gcl&only_with_tag=Version_2_6_8pre&r1=1.14.4.1.2.2.2.4.6.1.6.1.4.2&r2=1.14.4.1.2.2.2.4.6.1.6.1.4.3

Patches:
Index: read.d
===================================================================
RCS file: /sources/gcl/gcl/o/read.d,v
retrieving revision 1.14.4.1.2.2.2.4.6.1.6.1.4.2
retrieving revision 1.14.4.1.2.2.2.4.6.1.6.1.4.3
diff -u -b -r1.14.4.1.2.2.2.4.6.1.6.1.4.2 -r1.14.4.1.2.2.2.4.6.1.6.1.4.3
--- read.d      7 Jun 2006 15:09:38 -0000       1.14.4.1.2.2.2.4.6.1.6.1.4.2
+++ read.d      16 Jun 2006 02:26:22 -0000      1.14.4.1.2.2.2.4.6.1.6.1.4.3
@@ -256,6 +256,7 @@
 
        x = read_object(in);
        vs_push(x);
+#ifndef _WIN32
        while (listen_stream(in)) {
          object c=read_char(in);
          if (cat(c)!=cat_whitespace) {
@@ -263,7 +264,7 @@
            break;
          }
        }
-
+#endif
        if (sharp_eq_context_max > 0)
                x = vs_head = patch_sharp(x);