summaryrefslogtreecommitdiff
path: root/dev-lang/qu-prolog/files/qu-prolog-10.0-gcc6.patch
blob: 626a15b5de9931f4848474fe05632df675070faa (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
--- qp10.0/src/io_qp.h.old	2016-10-12 02:50:04.343499674 -0400
+++ qp10.0/src/io_qp.h	2016-10-12 02:50:10.605264154 -0400
@@ -662,7 +662,7 @@
 
   bool seekp(streampos pos, ios::seekdir d = ios::beg)
     {
-      return stream->seekp(pos, d);
+      return !stream->seekp(pos, d).fail();
     }
 
   bool put(char ch)
@@ -736,7 +736,7 @@
 
   bool seekp(streampos pos, ios::seekdir d = ios::beg)
     {
-      return stream.seekp(pos, d);
+      return !stream.seekp(pos, d).fail();
     }
 
   bool put(char ch)
@@ -816,7 +816,7 @@
 
   bool seekp(streampos pos, ios::seekdir d = ios::beg)
     {
-      return stream.seekp(pos, d);
+      return !stream.seekp(pos, d).fail();
     }
 
   bool put(char ch);
@@ -876,7 +876,7 @@
 
   bool seekp(streampos pos, ios::seekdir d = ios::beg)
     {
-      return stream.seekp(pos, d);
+      return !stream.seekp(pos, d).fail();
     }
 
   bool put(char ch);