equal
deleted
inserted
replaced
151 ruleClass := eachRule class. |
151 ruleClass := eachRule class. |
152 (SmalltalkChecker isRuleDisabled:ruleClass) ifTrue:[ |
152 (SmalltalkChecker isRuleDisabled:ruleClass) ifTrue:[ |
153 Transcript show:'rule '; show:ruleClass name; showCR:' disabled'. |
153 Transcript show:'rule '; show:ruleClass name; showCR:' disabled'. |
154 ] ifFalse:[ |
154 ] ifFalse:[ |
155 [ |
155 [ |
156 eachRule checkMethod: context. |
156 (eachRule shouldIgnoreMethod:context) ifFalse:[ |
|
157 eachRule checkMethod: context. |
|
158 ]. |
157 ] on: Error do:[:ex| |
159 ] on: Error do:[:ex| |
158 SmalltalkLintService debugging ifTrue:[ |
160 SmalltalkLintService debugging ifTrue:[ |
159 SmalltalkLintService debugging: false. |
161 SmalltalkLintService debugging: false. |
160 ex pass. |
162 ex pass. |
161 ] ifFalse:[ |
163 ] ifFalse:[ |
169 ]. |
171 ]. |
170 ]. |
172 ]. |
171 ]. |
173 ]. |
172 ] |
174 ] |
173 |
175 |
174 "Modified: / 24-08-2010 / 21:32:39 / Jan Vrany <enter your email here>" |
176 "Modified: / 24-08-2010 / 21:32:39 / Jan Vrany" |
175 "Created: / 17-02-2012 / 00:50:25 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
177 "Created: / 17-02-2012 / 00:50:25 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
176 "Modified (format): / 16-10-2014 / 01:08:59 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
178 "Modified (format): / 16-10-2014 / 01:08:59 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
177 ! ! |
179 ! ! |
178 |
180 |
179 !SmalltalkChecker class methodsFor:'documentation'! |
181 !SmalltalkChecker class methodsFor:'documentation'! |