Tools__AbstractTestRunner.st
changeset 10167 32f3659ee1aa
parent 10091 e715a30bfc47
child 10604 3f6100dcea47
equal deleted inserted replaced
10166:aa9d3a671526 10167:32f3659ee1aa
    27 
    27 
    28 "{ NameSpace: Tools }"
    28 "{ NameSpace: Tools }"
    29 
    29 
    30 ApplicationModel subclass:#AbstractTestRunner
    30 ApplicationModel subclass:#AbstractTestRunner
    31 	instanceVariableNames:''
    31 	instanceVariableNames:''
    32 	classVariableNames:'NotRunColor PassedColor FailureColor ErrorColor'
    32 	classVariableNames:'NotRunColor PassedColor FailureColor ErrorColor
       
    33 		CurrentlyRunningColor'
    33 	poolDictionaries:''
    34 	poolDictionaries:''
    34 	category:'SUnit-UI'
    35 	category:'SUnit-UI'
    35 !
    36 !
    36 
    37 
    37 !AbstractTestRunner class methodsFor:'documentation'!
    38 !AbstractTestRunner class methodsFor:'documentation'!
    67 !AbstractTestRunner class methodsFor:'initialization'!
    68 !AbstractTestRunner class methodsFor:'initialization'!
    68 
    69 
    69 initialize
    70 initialize
    70     "Invoked at system start or when the class is dynamically loaded."
    71     "Invoked at system start or when the class is dynamically loaded."
    71 
    72 
    72     NotRunColor     := Color redByte:145 greenByte:145 blueByte:145.
    73     CurrentlyRunningColor   := Color yellow.
    73     PassedColor     := Color redByte:92 greenByte:166 blueByte:92.
    74     NotRunColor             := Color redByte:145 greenByte:145 blueByte:145.
    74     FailureColor    := Color redByte:194 greenByte:110 blueByte:110.
    75     PassedColor             := Color redByte:92 greenByte:166 blueByte:92.
    75     ErrorColor      := FailureColor
    76     FailureColor            := Color redByte:194 greenByte:110 blueByte:110.
       
    77     ErrorColor              := FailureColor
    76 
    78 
    77     "Modified: / 15-03-2010 / 21:59:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    79     "Modified: / 15-03-2010 / 21:59:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
    80     "Modified: / 05-07-2011 / 14:12:34 / cg"
    78 ! !
    81 ! !
    79 
    82 
    80 !AbstractTestRunner class methodsFor:'accessing'!
    83 !AbstractTestRunner class methodsFor:'accessing'!
       
    84 
       
    85 currentlyRunningColor
       
    86     ^ CurrentlyRunningColor
       
    87 
       
    88     "Created: / 05-07-2011 / 14:12:04 / cg"
       
    89 !
    81 
    90 
    82 errorColor
    91 errorColor
    83     ^ ErrorColor
    92     ^ ErrorColor
    84 
    93 
    85     "Created: / 07-02-2010 / 14:43:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    94     "Created: / 07-02-2010 / 14:43:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   157 ! !
   166 ! !
   158 
   167 
   159 !AbstractTestRunner class methodsFor:'documentation'!
   168 !AbstractTestRunner class methodsFor:'documentation'!
   160 
   169 
   161 version_CVS
   170 version_CVS
   162     ^ '$Header: /cvs/stx/stx/libtool/Tools__AbstractTestRunner.st,v 1.3 2011-07-03 18:02:51 cg Exp $'
   171     ^ '$Header: /cvs/stx/stx/libtool/Tools__AbstractTestRunner.st,v 1.4 2011-07-05 12:15:23 cg Exp $'
   163 !
   172 !
   164 
   173 
   165 version_SVN
   174 version_SVN
   166     ^ '§Id: Tools__AbstractTestRunner.st 7681 2011-03-04 11:30:02Z vranyj1 §'
   175     ^ '§Id: Tools__AbstractTestRunner.st 7681 2011-03-04 11:30:02Z vranyj1 §'
   167 ! !
   176 ! !