--- a/ProjectChecker.st Thu May 29 18:05:37 2014 +0200
+++ b/ProjectChecker.st Thu May 29 18:16:59 2014 +0200
@@ -515,6 +515,10 @@
^ self
].
+ "/ Speed optimization: do not check method if it was compiled by
+ "/ stc and hasn't been changed since then.
+ method byteCode isNil ifTrue:[ ^ self ].
+
issue1 := ProjectProblem newMethodCompilabilityIssue1.
issue1 method: method.
self checkMethodSTCCompilability1: method into: issue1.
@@ -530,7 +534,7 @@
]
"Created: / 11-04-2012 / 12:37:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 29-05-2014 / 16:54:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified (format): / 29-05-2014 / 16:54:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
checkMethodSourceCode: method
@@ -692,14 +696,14 @@
!ProjectChecker class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/ProjectChecker.st,v 1.22 2014-05-29 16:04:30 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/ProjectChecker.st,v 1.23 2014-05-29 16:16:59 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/ProjectChecker.st,v 1.22 2014-05-29 16:04:30 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/ProjectChecker.st,v 1.23 2014-05-29 16:16:59 vrany Exp $'
!
version_SVN
- ^ '$Id: ProjectChecker.st,v 1.22 2014-05-29 16:04:30 vrany Exp $'
+ ^ '$Id: ProjectChecker.st,v 1.23 2014-05-29 16:16:59 vrany Exp $'
! !