FIX: compilation error due to last commit.

libRed/libRed.red

@@ -532,7 +532,7 @@ Red [
 
 		rgb: null
 		if format = RGB_BUFFER [rgb: src]
-		img/node: OS-image/make-image width height rgb null null
+		img/node: OS-image/make-image width height binary/load-in rgb width * height null null null
 
 		if format = RGBA_BUFFER [
 			stride: 0

modules/view/backends/windows/draw.reds

@@ -2226,7 +2226,7 @@ OS-draw-brush-pattern: func [
 	/local
 		pat-image	[red-image!]
 		bkg-alpha	[byte!]
-		p-alpha		[byte-ptr!]
+		p-alpha		[red-binary! value]
 		p			[byte-ptr!]
 ][
 	pat-image: either brush?
@@ -2239,14 +2239,13 @@ OS-draw-brush-pattern: func [
 	pat-image/head:   0
 	pat-image/size:   size/y << 16 or size/x
 	bkg-alpha:        as byte! 0
-	p-alpha:          allocate pat-image/size
-	p: p-alpha
+	string/rs-make-at as cell! :p-alpha pat-image/size
+	p: binary/rs-head :p-alpha
 	loop pat-image/size [
 		p/value: as-byte 255
 		p: p + 1
 	]
-	pat-image/node: OS-image/make-image size/x size/y null p-alpha null
-	free p-alpha
+	pat-image/node: OS-image/make-image size/x size/y null :p-alpha null
 	do-draw null pat-image block no no no no
 	OS-draw-brush-bitmap ctx pat-image crop-1 crop-2 mode brush?
 ]