diff options
Diffstat (limited to 'ospicture.icl')
| -rw-r--r-- | ospicture.icl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/ospicture.icl b/ospicture.icl index f0cfe01..ddc236f 100644 --- a/ospicture.icl +++ b/ospicture.icl @@ -77,8 +77,9 @@ where unpackPicture :: !*Picture -> (!Origin,!*Pen,!Bool,!OSPictContext,!*OSToolbox)
unpackPicture {pictOrigin,pictPen,pictToScreen,pictContext,pictToolbox}
// PA: intend to use simplified version of winDonePicture; crashes for some reason.
- # (_,_,_,_,_,_,(hdc,tb)) = winDonePicture (pictContext,pictToolbox)
-// # (hdc,tb) = WinDonePicture (pictContext,pictToolbox)
+// CS: done (cause of crash still unknown).
+// # (_,_,_,_,_,_,(hdc,tb)) = winDonePicture (pictContext,pictToolbox)
+ # (hdc,tb) = winDonePicture (pictContext,pictToolbox)
= (pictOrigin,pictPen,pictToScreen,hdc,tb)
peekPicture :: !*Picture -> (!Origin,!*Pen,!Bool,!OSPictContext,!*OSToolbox)
|