diff options
author | Camil Staps | 2015-08-10 11:18:45 +0200 |
---|---|---|
committer | Camil Staps | 2015-08-10 11:18:45 +0200 |
commit | e054c9a591a344e05b0cedaf285dc8e0a3aed7a0 (patch) | |
tree | 084b9d1b747dff30d61e1b15f8bb8cac0686b4df /ospicture.icl | |
parent | Fix email markdown (diff) |
Fixed winDonePicture
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)
|