--- a/JavaClass.st Mon Mar 02 17:50:49 2015 +0100
+++ b/JavaClass.st Fri Mar 20 14:29:53 2015 +0100
@@ -935,7 +935,6 @@
!
source
- "Returns a source of the class as String or nil of no source is found along the Java's source paths."
| sourceString stream |
(sourceString := self sourceString) notNil ifTrue: [ ^ sourceString ].
^ [
@@ -957,35 +956,6 @@
"Modified: / 30-07-1997 / 14:31:01 / cg"
"Modified: / 07-12-2014 / 01:32:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified (comment): / 17-02-2015 / 13:43:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-sourceDecompiled
- "Returns a decompiled source code as String."
-
- | resources |
-
- resources := self classResources.
-
- ^ String streamContents:[:s |
- s nextPutAll: '/**'; cr.
- s nextPutAll: ' * ' ; nextPutAll: (resources string: 'No source has been found along configured source path:'); cr.
- s nextPutAll: ' * ' ; cr.
- Java effectiveSourceDirectories do:[:d |
- s nextPutAll: ' * '; nextPutAll: d asString; cr.
- ].
- s nextPutAll: ' * ' ; cr.
- s nextPutAll: ' * ' ; nextPutAll: (resources string: 'You may add more source directories or archives by evaluating:'); cr.
- s nextPutAll: ' * ' ; cr.
- s nextPutAll: ' * '; nextPutAll: 'Java addToSourceDirectories: ''/path/to/sources''.' ; cr.
- s nextPutAll: ' */'; cr.
- JavaDecompiler definitionOf:self on:s
- ]
- "
- JAVA java lang Object sourceDecompiled
- "
-
- "Created: / 17-02-2015 / 12:07:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
sourceFile
@@ -3545,11 +3515,11 @@
!JavaClass class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libjava/JavaClass.st,v 1.139 2015-02-17 15:16:50 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libjava/JavaClass.st,v 1.140 2015-03-20 12:07:59 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libjava/JavaClass.st,v 1.139 2015-02-17 15:16:50 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libjava/JavaClass.st,v 1.140 2015-03-20 12:07:59 vrany Exp $'
!
version_SVN