equal
deleted
inserted
replaced
27 ! |
27 ! |
28 |
28 |
29 tearDown |
29 tearDown |
30 | parserClass | |
30 | parserClass | |
31 |
31 |
32 parserClass := (Smalltalk at: arguments name ifAbsent: [nil]). |
32 parserClass := (Smalltalk at: arguments parserName ifAbsent: [nil]). |
33 parserClass notNil ifTrue:[ |
33 parserClass notNil ifTrue:[ |
34 parserClass removeFromSystem |
34 parserClass removeFromSystem |
35 ]. |
35 ]. |
|
36 |
|
37 "Modified: / 24-07-2015 / 19:21:41 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
36 ! ! |
38 ! ! |
37 |
39 |
38 !PPCUniversalTest methodsFor:'tests - compiling'! |
40 !PPCUniversalTest methodsFor:'tests - compiling'! |
39 |
41 |
40 testCompileAnd |
42 testCompileAnd |