Ticket #132: bytestring.dpatch

File bytestring.dpatch, 1.8 KB (added by igloo, 6 years ago)

Patch to change GHC's parser to support (only) the proposed replacement syntax

Line 
1
2New patches:
3
4[Make the code compatible with the stricter labelled-field parsing rules
5Ian Lynagh <[email protected]>**20090725211933] {
6hunk ./Data/ByteString.hs 1749
7-    \ h_@Handle__{haByteBuffer} -> do
8+    \ h_@(Handle__{haByteBuffer}) -> do
9hunk ./Data/ByteString.hs 1757
10-  fill h_@Handle__{haByteBuffer,haDevice} buf len xss =
11+  fill h_@(Handle__{haByteBuffer,haDevice}) buf len xss =
12hunk ./Data/ByteString.hs 1761
13-       then do writeIORef haByteBuffer buf{ bufR=0, bufL=0 }
14+       then do writeIORef haByteBuffer (buf{ bufR=0, bufL=0 })
15hunk ./Data/ByteString.hs 1767
16-  haveBuf h_@Handle__{haByteBuffer}
17-          buf@Buffer{ bufRaw=raw, bufR=w, bufL=r }
18+  haveBuf h_@(Handle__{haByteBuffer})
19+          buf@(Buffer{ bufRaw=raw, bufR=w, bufL=r })
20hunk ./Data/ByteString.hs 1779
21-                            then writeIORef haByteBuffer buf{ bufL=0, bufR=0 }
22-                            else writeIORef haByteBuffer buf{ bufL = off + 1 }
23+                            then writeIORef haByteBuffer (buf{ bufL=0, bufR=0 })
24+                            else writeIORef haByteBuffer (buf{ bufL = off + 1 })
25hunk ./Data/ByteString.hs 1783
26-                 fill h_ buf{ bufL=0, bufR=0 } new_len (xs:xss)
27+                 fill h_ (buf{ bufL=0, bufR=0 }) new_len (xs:xss)
28}
29
30Context:
31
32[fix compilation with GHC 6.10
33Simon Marlow <[email protected]>**20090722125604
34 Ignore-this: 6f7a1ef9018c97793f2eae41e2f1660f
35]
36[Fix some "warn-unused-do-bind" warnings where we want to ignore the value
37Ian Lynagh <[email protected]>**20090710202441]
38[Fix unused import warnings
39Ian Lynagh <[email protected]>**20090707133556]
40[Remove unused imports
41Ian Lynagh <[email protected]>**20090707115817]
42[TAG 2009-06-25
43Ian Lynagh <[email protected]>**20090625160134]
44Patch bundle hash:
45ff3d66af495550ba1b235ad723fc5788fa11a370