--- a/JavaVM.st	Tue Apr 14 11:24:42 1998 +0000
+++ b/JavaVM.st	Tue Apr 14 11:26:24 1998 +0000
@@ -3640,6 +3640,24 @@
     "Modified: / 4.1.1998 / 14:59:13 / cg"
 !
 
+_Thread_interrupt0:nativeContext
+    "ask if a thread is interrupted (clear interruptState if arg is true)"
+
+    |jThread stProcess|
+
+    jThread := nativeContext receiver.
+    stProcess := self stProcessForJavaThread:jThread.
+    stProcess isNil ifTrue:[
+        self halt.
+        ^ 0
+    ].
+
+    stProcess markInterrupted
+
+    "Modified: / 2.1.1998 / 21:49:06 / cg"
+    "Created: / 10.4.1998 / 15:21:43 / cg"
+!
+
 _Thread_isAlive:nativeContext
     "is it alive ?"
 
@@ -4609,6 +4627,9 @@
 
     stream := decoder instVarNamed:'input'.
     pixelStore := decoder instVarNamed:'store'.
+    pixelStore isNil ifTrue:[
+        ^ 0
+    ].
 
     buffSize := (width * height // 2) max:4096.
     compressedData := ByteArray uninitializedNew:buffSize.
@@ -4680,7 +4701,7 @@
 "/ self internalError:'breakPoint'.
     ^ 1 "/ true
 
-    "Modified: / 1.2.1998 / 20:54:00 / cg"
+    "Modified: / 10.4.1998 / 14:31:59 / cg"
 !
 
 _ImageRepresentation_disposeImage:nativeContext
@@ -6647,11 +6668,13 @@
     |scrollPane|
 
     scrollPane := self viewForWPeer:nativeContext.
-    ^ 16
-
-    "Modified: / 9.4.1998 / 17:30:18 / cg"
+    ^ HorizontalScrollBar new preferredExtent y.
+
     "Created: / 9.4.1998 / 17:30:56 / cg"
-!
+    "Modified: / 10.4.1998 / 14:59:28 / cg"
+! !
+
+!JavaVM class ignoredMethodsFor:'native - sun.awt.windows'!
 
 _WScrollPanePeer__getHScrollbarWidth:nativeContext
     |scrollPane|
@@ -6660,16 +6683,18 @@
 
     "Created: / 9.4.1998 / 17:29:44 / cg"
     "Modified: / 9.4.1998 / 17:30:18 / cg"
-!
+! !
+
+!JavaVM class methodsFor:'native - sun.awt.windows'!
 
 _WScrollPanePeer__getVScrollbarWidth:nativeContext
     |scrollPane|
 
     scrollPane := self viewForWPeer:nativeContext.
-    ^ 16
+    ^ ScrollBar new preferredExtent x.
 
     "Created: / 9.4.1998 / 17:29:48 / cg"
-    "Modified: / 9.4.1998 / 17:30:47 / cg"
+    "Modified: / 10.4.1998 / 15:00:33 / cg"
 !
 
 _WScrollPanePeer_create:nativeContext
@@ -7711,6 +7736,6 @@
 !JavaVM class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaVM.st,v 1.30 1998/04/09 20:50:35 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaVM.st,v 1.31 1998/04/14 11:26:24 cg Exp $'
 ! !
 JavaVM initialize!