WinWorkstation.st
changeset 3553 5a51330ea94a
parent 3548 5c33ea9fc4f3
child 3560 0683afff0c11
--- a/WinWorkstation.st	Sat Nov 17 17:36:36 2001 +0100
+++ b/WinWorkstation.st	Sat Nov 17 17:40:13 2001 +0100
@@ -12753,7 +12753,9 @@
 		INFOPRINT((stderr, "WinWorkstation [warning]: noinfo returned in primGetBits\n"));
 		goto fail;
 	    }
-	    DPRINTF(("bitmap info:%d %d %d %d\n",bitmap.bmiHeader.biWidth,bitmap.bmiHeader.biHeight,bitmap.bmiHeader.biBitCount,bitmap.bmiHeader.biSizeImage));
+	    DPRINTF(("bitmap info:%d %d %d %d\n", 
+			bitmap.bmiHeader.biWidth, bitmap.bmiHeader.biHeight,
+			bitmap.bmiHeader.biBitCount, bitmap.bmiHeader.biSizeImage));
 	    numBytes = bitmap.bmiHeader.biSizeImage;
 	    if( numBytes != 0 ) {
 		char *cp = __ByteArrayInstPtr(imageBits)->ba_element;
@@ -12761,7 +12763,10 @@
 
 		if (numBytes > __byteArraySize(imageBits)) {
 		    /* imageBits too small */
-		    INFOPRINT((stderr, "WinWorkstation [warning]: primGetBits - provided byteArray too small\n"));
+		    INFOPRINT((stderr, "WinWorkstation [warning]: primGetBits - byteArray too small (is:%d need:5d; w:%d h%d)\n",
+				__byteArraySize(imageBits), numBytes,
+				bitmap.bmiHeader.biWidth, bitmap.bmiHeader.biHeight,
+			     ));
 		    goto fail;
 		}
 		DPRINTF(("numBytes %d\n",numBytes));
@@ -14247,6 +14252,6 @@
 !WinWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.207 2001-11-15 22:11:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.208 2001-11-17 16:40:13 cg Exp $'
 ! !
 WinWorkstation initialize!