XWorkstation.st
changeset 1295 ef93ded3c030
parent 1246 f8835fc41467
child 1338 8df6dbb44883
--- a/XWorkstation.st	Wed Jan 29 13:34:56 1997 +0100
+++ b/XWorkstation.st	Wed Jan 29 14:17:45 1997 +0100
@@ -3341,7 +3341,7 @@
     static struct inlineCache vid = _ILC1;
 
     static struct inlineCache expS = _ILC5;
-    static struct inlineCache gexpS = _ILC5;
+    static struct inlineCache gexpS = _ILC6;
     static struct inlineCache nexpS = _ILC1;
     static struct inlineCache motS = _ILC4;
     static struct inlineCache bpS = _ILC4;
@@ -3649,11 +3649,12 @@
 
 	case GraphicsExpose:
 	    (*gexpS.ilc_func)(self, 
-			      @symbol(graphicExposeX:y:width:height:view:), nil, &gexpS,
+			      @symbol(graphicsExposeX:y:width:height:final:view:), nil, &gexpS,
 			      __MKSMALLINT(ee->x),
 			      __MKSMALLINT(ee->y),
 			      __MKSMALLINT(ee->width),
 			      __MKSMALLINT(ee->height),
+			      ee->count == 0 ? true : false,
 			      theView);
 
 	    if (ee->count != 0) {
@@ -8455,6 +8456,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.199 1997-01-18 15:57:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.200 1997-01-29 13:16:07 cg Exp $'
 ! !
 XWorkstation initialize!