--- a/JavaBuiltInClassPointerRef.st Fri Feb 06 00:00:57 1998 +0000
+++ b/JavaBuiltInClassPointerRef.st Fri Feb 06 00:33:06 1998 +0000
@@ -78,12 +78,15 @@
(nameandType startsWith:'[B') ifTrue:[
^ ByteArray
].
+ (nameandType startsWith:'[C') ifTrue:[
+ ^ String "/ soon: TwoByteString
+ ].
self halt.
^ self
"Created: / 13.1.1998 / 00:02:39 / cg"
- "Modified: / 13.1.1998 / 00:03:07 / cg"
+ "Modified: / 6.2.1998 / 01:20:08 / cg"
!
asClassPointerRef
@@ -118,5 +121,5 @@
!JavaBuiltInClassPointerRef class methodsFor:'documentation'!
version
- ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaBuiltInClassPointerRef.st,v 1.5 1998/01/16 16:11:11 cg Exp $'
+ ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaBuiltInClassPointerRef.st,v 1.6 1998/02/06 00:32:22 cg Exp $'
! !
--- a/JavaUnresolvedClassConstant.st Fri Feb 06 00:00:57 1998 +0000
+++ b/JavaUnresolvedClassConstant.st Fri Feb 06 00:33:06 1998 +0000
@@ -63,10 +63,12 @@
].
^ JavaUnresolvedClassConstant basicNew setFullName:refClassName
].
- self halt.
+ (fullName startsWith:'[[C') ifTrue:[
+ ^ JavaBuiltInClassPointerRef new nameandType:'[C'.
+ ].
"Created: / 7.4.1997 / 13:38:07 / cg"
- "Modified: / 25.1.1998 / 18:23:06 / cg"
+ "Modified: / 6.2.1998 / 01:21:01 / cg"
!
fullName
@@ -271,5 +273,5 @@
!JavaUnresolvedClassConstant class methodsFor:'documentation'!
version
- ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaUnresolvedClassConstant.st,v 1.27 1998/02/05 11:12:48 cg Exp $'
+ ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaUnresolvedClassConstant.st,v 1.28 1998/02/06 00:32:39 cg Exp $'
! !
--- a/JavaVM.st Fri Feb 06 00:00:57 1998 +0000
+++ b/JavaVM.st Fri Feb 06 00:33:06 1998 +0000
@@ -2783,6 +2783,20 @@
"Modified: / 13.1.1998 / 23:05:01 / cg"
!
+_Math_atan:nativeContext
+ "arc tangens"
+
+ |dVal|
+
+ dVal := nativeContext argAt:1.
+ (nativeContext argAt:2) ~~ DUMMY_DOUBLE_HIGHWORD ifTrue:[
+ self halt:'expected double arg'
+ ].
+ ^ dVal arcTan
+
+ "Created: / 6.2.1998 / 01:24:12 / cg"
+!
+
_Math_ceil:nativeContext
"ceiling"
@@ -7232,6 +7246,6 @@
!JavaVM class methodsFor:'documentation'!
version
- ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaVM.st,v 1.19 1998/02/06 00:00:57 cg Exp $'
+ ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaVM.st,v 1.20 1998/02/06 00:33:06 cg Exp $'
! !
JavaVM initialize!