JavaMethod.st
changeset 332 2cb9ceae74d3
parent 323 97a1281ec215
child 334 638045537cf7
equal deleted inserted replaced
331:2c319ce4ac92 332:2cb9ceae74d3
   394 !
   394 !
   395 
   395 
   396 retvalSpecFromStream:s in:aPackage
   396 retvalSpecFromStream:s in:aPackage
   397     "parse a retvalSpec - see java doc"
   397     "parse a retvalSpec - see java doc"
   398 
   398 
       
   399     |spec|
       
   400 
   399     s atEnd ifTrue:[self halt. ^ #void].
   401     s atEnd ifTrue:[self halt. ^ #void].
   400     s peek == $V ifTrue:[^ #void].
   402     s peek == $V ifTrue:[^ #void].
   401     ^ self fieldTypeFromStream:s in:aPackage
   403     spec := self fieldTypeFromStream:s in:aPackage.
   402 
   404     spec knownAsSymbol ifTrue:[
   403     "Created: 18.3.1997 / 11:12:19 / cg"
   405         ^ spec asSymbol
       
   406     ].
       
   407     ^ spec
       
   408 
       
   409     "Created: / 18.3.1997 / 11:12:19 / cg"
       
   410     "Modified: / 7.4.1998 / 22:28:27 / cg"
   404 !
   411 !
   405 
   412 
   406 specComponentsWithArgsFromSignature:aSignature withName:name in:aPackage
   413 specComponentsWithArgsFromSignature:aSignature withName:name in:aPackage
   407     "given a signature, return a spec"
   414     "given a signature, return a spec"
   408 
   415 
  1891 ! !
  1898 ! !
  1892 
  1899 
  1893 !JavaMethod class methodsFor:'documentation'!
  1900 !JavaMethod class methodsFor:'documentation'!
  1894 
  1901 
  1895 version
  1902 version
  1896     ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaMethod.st,v 1.65 1998/03/09 18:39:29 cg Exp $'
  1903     ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaMethod.st,v 1.66 1998/04/07 20:30:12 cg Exp $'
  1897 ! !
  1904 ! !
  1898 JavaMethod initialize!
  1905 JavaMethod initialize!