aboutsummaryrefslogtreecommitdiff
path: root/ospicture.icl
diff options
context:
space:
mode:
authorCamil Staps2015-08-10 11:18:45 +0200
committerCamil Staps2015-08-10 11:18:45 +0200
commite054c9a591a344e05b0cedaf285dc8e0a3aed7a0 (patch)
tree084b9d1b747dff30d61e1b15f8bb8cac0686b4df /ospicture.icl
parentFix email markdown (diff)
Fixed winDonePicture
Diffstat (limited to 'ospicture.icl')
-rw-r--r--ospicture.icl5
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)