--- a/JavaClassReader.st Fri Feb 06 00:33:06 1998 +0000
+++ b/JavaClassReader.st Fri Feb 06 01:56:01 1998 +0000
@@ -156,11 +156,11 @@
]
].
- ('JAVA: no file found for: ' , clsName) infoPrintCR.
+ ('JAVA [info]: no file found for: ' , clsName) infoPrintCR.
^ nil
"Modified: / 14.8.1997 / 11:38:42 / stefan"
- "Modified: / 27.1.1998 / 21:59:29 / cg"
+ "Modified: / 6.2.1998 / 02:20:48 / cg"
!
loadFile:aFilename
@@ -336,29 +336,30 @@
|inStream javaClass|
Silent ifFalse:[
- 'reading ' print. aFilename print. ' ...' printNL.
+ 'reading ' print. aFilename print. ' ...' printNL.
].
inStream := aFilename asFilename readStream.
inStream isNil ifTrue:[
- ('no file: ' , aFilename) printCR.
- self halt.
- ^ nil
+ ('JAVA [info]: no file: ' , aFilename) printCR.
+ self halt.
+ ^ nil
].
javaClass := self new readStream:inStream ignoring:classesBeingLoaded.
javaClass notNil ifTrue:[
- javaClass setBinaryFilePath:(inStream pathName).
+ javaClass setBinaryFilePath:(inStream pathName).
].
inStream close.
AbsolutelySilent ifFalse:[
- ' ... loaded ' print. javaClass displayString printNL.
+ ' ... loaded ' print. javaClass displayString printNL.
].
^ javaClass
- "Created: 15.4.1996 / 14:58:53 / cg"
+ "Created: / 15.4.1996 / 14:58:53 / cg"
+ "Modified: / 6.2.1998 / 02:20:58 / cg"
!
readStream:aStream
@@ -1415,6 +1416,6 @@
!JavaClassReader class methodsFor:'documentation'!
version
- ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClassReader.st,v 1.55 1998/01/27 21:04:33 cg Exp $'
+ ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClassReader.st,v 1.56 1998/02/06 01:55:46 cg Exp $'
! !
JavaClassReader initialize!