summaryrefslogtreecommitdiff
path: root/lang/open-cobol-devel/files/patch-libcob::fileio.c
diff options
context:
space:
mode:
Diffstat (limited to 'lang/open-cobol-devel/files/patch-libcob::fileio.c')
-rw-r--r--lang/open-cobol-devel/files/patch-libcob::fileio.c20
1 files changed, 20 insertions, 0 deletions
diff --git a/lang/open-cobol-devel/files/patch-libcob::fileio.c b/lang/open-cobol-devel/files/patch-libcob::fileio.c
new file mode 100644
index 000000000000..d96315e95d73
--- /dev/null
+++ b/lang/open-cobol-devel/files/patch-libcob::fileio.c
@@ -0,0 +1,20 @@
+--- libcob/fileio.c.orig Wed Jun 11 15:40:20 2003
++++ libcob/fileio.c Wed Aug 27 09:57:31 2003
+@@ -202,13 +202,10 @@
+ else
+ {
+ /* discard input until the next newline */
+- int c = getc (f->file);
+- while (c != '\r' && c != '\n' && c != EOF)
+- c = getc (f->file);
+- if (c == '\r')
+- c = getc (f->file);
+- if (c != '\n' && c != EOF)
+- ungetc (c, f->file);
++ char buff[BUFSIZ];
++ while (fgets (buff, BUFSIZ, f->file) !=NULL)
++ if (strchr (buff, '\n') != NULL)
++ break;
+ }
+
+ memcpy (f->record->data, buff, f->record->size);