ParserTests.st
changeset 581 b51102129a58
parent 580 1b6e2976cb08
child 749 97b804d7b9cf
--- a/ParserTests.st	Tue Jun 28 22:08:04 2011 +0200
+++ b/ParserTests.st	Tue Jun 28 22:25:28 2011 +0200
@@ -83,6 +83,19 @@
     "Modified: / 29-11-2009 / 22:09:33 / pp <Pavel.Pospichal@gmail.com>"
 ! !
 
+!ParserTests methodsFor:'smoke test'!
+
+testParseAllMethods
+    Smalltalk allClassesDo:[:cls |
+        Transcript showCR:cls.
+        cls instAndClassMethodsDo:[:mthd |
+            Parser parseMethod:mthd source in:mthd mclass
+        ]
+    ].
+
+    "Created: / 28-06-2011 / 22:23:43 / cg"
+! !
+
 !ParserTests methodsFor:'tests - annotations'!
 
 testAnnotationWithArrayLiteral
@@ -1694,5 +1707,5 @@
 !
 
 version_SVN
-    ^ ' Id: ParserTests.st 2014 2010-07-12 08:10:01Z vranyj1  '
+    ^ '§ Id: ParserTests.st 2014 2010-07-12 08:10:01Z vranyj1  §'
 ! !