- ProjectChecker
comment/format in: #checkMethodSourceCode:
changed: #version_SVN
--- a/ProjectChecker.st Fri Sep 14 13:40:31 2012 +0100
+++ b/ProjectChecker.st Tue Sep 18 01:10:00 2012 +0100
@@ -93,12 +93,6 @@
"Created: / 11-01-2012 / 16:46:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
-!ProjectChecker class methodsFor:'others'!
-
-version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/ProjectChecker.st,v 1.7 2012/09/13 17:19:19 vrany Exp $'
-! !
-
!ProjectChecker methodsFor:'accessing'!
classes: aCollection
@@ -432,7 +426,7 @@
checkMethodSourceCode: method
"Checks, whether method's source code is both
available and parseable. Return true if the code
- is syntactically corret, false otherwise"
+ is syntactically correct, false otherwise"
| source |
@@ -443,6 +437,8 @@
(ProjectProblem newMethodSourceNotAvailable method: method).
^false
].
+ method programmingLanguage isSmalltalk ifFalse:[ ^ false ].
+
[
(Parser parseMethod: method source) == #Error ifTrue:[
self addProblem:
@@ -561,9 +557,13 @@
!ProjectChecker class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/ProjectChecker.st,v 1.7 2012/09/13 17:19:19 vrany Exp $'
+ ^ '$Id: ProjectChecker.st 1967 2012-09-18 00:10:00Z vranyj1 $'
+!
+
+version_CVS
+ ^ '§Header: /cvs/stx/stx/libbasic3/ProjectChecker.st,v 1.8 2012-09-18 01:10:30 +0100 vrany Exp §'
!
version_SVN
- ^ '§Id: ProjectChecker.st 1960 2012-09-07 10:45:07Z vranyj1 §'
+ ^ '$Id:: ProjectChecker.st 1967 2012-09-18 00:10:00Z vranyj1 $'
! !