InstrumentingCompiler.st
changeset 3862 42354ffef3a1
parent 3585 1f2291b908b7
child 3874 4f9db2d4c2b7
child 4126 319760fc7900
equal deleted inserted replaced
3861:214e93764392 3862:42354ffef3a1
   566 
   566 
   567     | source |
   567     | source |
   568 
   568 
   569     source := owningMethod source asText.
   569     source := owningMethod source asText.
   570     startPosition isNil ifTrue:[
   570     startPosition isNil ifTrue:[
   571         source colorizeAllWith: Color red.
   571         source withColor: Color red.
   572     ] ifFalse:[
   572     ] ifFalse:[
   573         endPosition isNil ifTrue:[
   573         endPosition isNil ifTrue:[
   574             source emphasizeFrom:startPosition to:source string size with: #bold.
   574             source emphasizeFrom:startPosition to:source string size with: #bold.
   575             source emphasizeFrom:startPosition to:source string size with: #color -> Color red.
   575             source emphasizeFrom:startPosition to:source string size with: #color -> Color red.
   576         ] ifFalse:[
   576         ] ifFalse:[
  1152 ! !
  1152 ! !
  1153 
  1153 
  1154 !InstrumentingCompiler class methodsFor:'documentation'!
  1154 !InstrumentingCompiler class methodsFor:'documentation'!
  1155 
  1155 
  1156 version
  1156 version
  1157     ^ '$Header: /cvs/stx/stx/libcomp/InstrumentingCompiler.st,v 1.35 2015-02-13 21:03:04 vrany Exp $'
  1157     ^ '$Header$'
  1158 !
  1158 !
  1159 
  1159 
  1160 version_CVS
  1160 version_CVS
  1161     ^ '$Header: /cvs/stx/stx/libcomp/InstrumentingCompiler.st,v 1.35 2015-02-13 21:03:04 vrany Exp $'
  1161     ^ '$Header$'
  1162 ! !
  1162 ! !
  1163 
  1163