equal
deleted
inserted
replaced
8 classVariableNames:'' |
8 classVariableNames:'' |
9 poolDictionaries:'' |
9 poolDictionaries:'' |
10 category:'PetitCompiler-Tests-Core-Universal' |
10 category:'PetitCompiler-Tests-Core-Universal' |
11 ! |
11 ! |
12 |
12 |
|
13 |
13 !PPCUniversalTest methodsFor:'context'! |
14 !PPCUniversalTest methodsFor:'context'! |
14 |
15 |
15 context |
16 context |
16 ^ context := PPCProfilingContext new |
17 ^ context := PPCProfilingContext new |
17 ! ! |
18 ! ! |
27 ! |
28 ! |
28 |
29 |
29 tearDown |
30 tearDown |
30 | parserClass | |
31 | parserClass | |
31 |
32 |
32 parserClass := (Smalltalk at: arguments name ifAbsent: [nil]). |
33 parserClass := (Smalltalk at: arguments parserName ifAbsent: [nil]). |
33 parserClass notNil ifTrue:[ |
34 parserClass notNil ifTrue:[ |
34 parserClass removeFromSystem |
35 parserClass removeFromSystem |
35 ]. |
36 ]. |
|
37 |
|
38 "Modified: / 24-07-2015 / 19:21:41 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
36 ! ! |
39 ! ! |
37 |
40 |
38 !PPCUniversalTest methodsFor:'tests - compiling'! |
41 !PPCUniversalTest methodsFor:'tests - compiling'! |
39 |
42 |
40 testCompileAnd |
43 testCompileAnd |
575 configuration := PPCUniversalConfiguration new |
578 configuration := PPCUniversalConfiguration new |
576 arguments: arguments; |
579 arguments: arguments; |
577 yourself. |
580 yourself. |
578 ! ! |
581 ! ! |
579 |
582 |
|
583 !PPCUniversalTest class methodsFor:'documentation'! |
|
584 |
|
585 version_HG |
|
586 |
|
587 ^ '$Changeset: <not expanded> $' |
|
588 ! ! |
|
589 |