images.gdiplus, windows.gdiplus, windows.streams: update for change to with-out-param...

[factor.git] / basis / images / gdiplus / gdiplus.factor

diff --git a/basis/images/gdiplus/gdiplus.factor b/basis/images/gdiplus/gdiplus.factor
index 97bc52375f602416c905bf5dc243d01dc43e5388..7b47af3d3abf2a666b893070fef39b18593360cf 100644 (file)
--- a/basis/images/gdiplus/gdiplus.factor
+++ b/basis/images/gdiplus/gdiplus.factor
@@ -23,17 +23,17 @@ SINGLETON: gdi+-image
 : stream>gdi+-bitmap ( stream -- bitmap )\r
     stream>IStream &com-release\r
     { void* } [ GdipCreateBitmapFromStream check-gdi+-status ]\r
-    [ ] with-out-parameters &GdipFree ;\r
+    with-out-parameters &GdipFree ;\r
 \r
 : gdi+-bitmap-width ( bitmap -- w )\r
     { UINT } [ GdipGetImageWidth check-gdi+-status ]\r
-    [ ] with-out-parameters ;\r
+    with-out-parameters ;\r
 : gdi+-bitmap-height ( bitmap -- w )\r
     { UINT } [ GdipGetImageHeight check-gdi+-status ]\r
-    [ ] with-out-parameters ;\r
+    with-out-parameters ;\r
 : gdi+-lock-bitmap ( bitmap rect mode format -- data )\r
     { BitmapData } [ GdipBitmapLockBits check-gdi+-status ]\r
-    [ clone ] with-out-parameters ;\r
+    with-out-parameters ;\r
 \r
 :: gdi+-bitmap>data ( bitmap -- w h pixels )\r
     bitmap [ gdi+-bitmap-width ] [ gdi+-bitmap-height ] bi :> ( w h )\r