equal
deleted
inserted
replaced
10 |
10 |
11 !PetitCompilerTest methodsFor:'context'! |
11 !PetitCompilerTest methodsFor:'context'! |
12 |
12 |
13 context |
13 context |
14 ^ context := PPCProfilingContext new |
14 ^ context := PPCProfilingContext new |
|
15 ! ! |
|
16 |
|
17 !PetitCompilerTest methodsFor:'running'! |
|
18 |
|
19 tearDown |
|
20 | parserClass | |
|
21 |
|
22 parserClass := (Smalltalk at: #PPGeneratedParser). |
|
23 parserClass notNil ifTrue:[ |
|
24 parserClass removeFromSystem |
|
25 ]. |
|
26 |
|
27 "Created: / 30-10-2014 / 22:56:19 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
15 ! ! |
28 ! ! |
16 |
29 |
17 !PetitCompilerTest methodsFor:'test support'! |
30 !PetitCompilerTest methodsFor:'test support'! |
18 |
31 |
19 assert: p parse: whatever |
32 assert: p parse: whatever |