Method.st
changeset 21431 e3a47227faa1
parent 21373 d8c34dd8952f
child 21450 0f7f5f090f81
equal deleted inserted replaced
21430:efccd218ce9c 21431:e3a47227faa1
  1042     "Created: / 02-07-2010 / 22:33:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  1042     "Created: / 02-07-2010 / 22:33:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  1043     "Modified: / 11-07-2010 / 19:38:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  1043     "Modified: / 11-07-2010 / 19:38:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  1044     "Modified (format): / 18-11-2011 / 14:47:06 / cg"
  1044     "Modified (format): / 18-11-2011 / 14:47:06 / cg"
  1045 ! !
  1045 ! !
  1046 
  1046 
       
  1047 
  1047 !Method methodsFor:'accessing-visibility'!
  1048 !Method methodsFor:'accessing-visibility'!
  1048 
  1049 
  1049 isIgnored
  1050 isIgnored
  1050     "return true, if this is an ignored method.
  1051     "return true, if this is an ignored method.
  1051      Ignored methods are physically present in the source file,
  1052      Ignored methods are physically present in the source file,
  2377 
  2378 
  2378     |rawStream|
  2379     |rawStream|
  2379 
  2380 
  2380     rawStream := self rawSourceStreamUsingCache:usingCacheBoolean.
  2381     rawStream := self rawSourceStreamUsingCache:usingCacheBoolean.
  2381     rawStream isNil ifTrue:[
  2382     rawStream isNil ifTrue:[
  2382 	^ nil.
  2383         ^ nil.
  2383     ].
  2384     ].
  2384     rawStream position:0.
  2385     rawStream position:0.
  2385 
  2386 
  2386     "/ see if its utf8 encoded...
  2387     "/ see if it's utf8 encoded...
  2387     ^ EncodedStream decodedStreamFor:rawStream.
  2388     ^ EncodedStream decodedStreamFor:rawStream.
       
  2389 
       
  2390     "Modified (comment): / 13-02-2017 / 20:26:54 / cg"
  2388 ! !
  2391 ! !
  2389 
  2392 
  2390 !Method methodsFor:'private-compiler interface'!
  2393 !Method methodsFor:'private-compiler interface'!
  2391 
  2394 
  2392 primitiveNumber
  2395 primitiveNumber
  3738     ^ modifiedInstVars includes:instVarName.
  3741     ^ modifiedInstVars includes:instVarName.
  3739 
  3742 
  3740     "Created: / 23-07-2012 / 11:16:36 / cg"
  3743     "Created: / 23-07-2012 / 11:16:36 / cg"
  3741 ! !
  3744 ! !
  3742 
  3745 
       
  3746 
  3743 !Method methodsFor:'source management'!
  3747 !Method methodsFor:'source management'!
  3744 
  3748 
  3745 revisionInfo
  3749 revisionInfo
  3746     "cg: is this correct for extensions? (shouldn't this be the revisionInfo from the extensions container?)"
  3750     "cg: is this correct for extensions? (shouldn't this be the revisionInfo from the extensions container?)"
  3747 
  3751