isup: Very basic regression test to test the number of classes we have

2011-03-15 11:29:29 +01:00 · 2011-03-15 11:29:29 +01:00 · ad58823edf
parent 46b6c89e6f
commit ad58823edf
1 changed files with 4 additions and 0 deletions
--- a/ISUPTests.st
+++ b/ISUPTests.st
@ -39,4 +39,8 @@ TestCase subclass: ISUPGeneratedTest [
                class create].
        ].
    ]
+
+    testClassCount [
+        self assert: ISUPMessage allSubclasses size = 46.
+    ]
 ]