equal
deleted
inserted
replaced
61 compiledParser := self compiledParser. |
61 compiledParser := self compiledParser. |
62 |
62 |
63 fileResources smalltalkSourcesBig do: [ :source | |
63 fileResources smalltalkSourcesBig do: [ :source | |
64 expected := normalParser parse: source. |
64 expected := normalParser parse: source. |
65 expected isPetitFailure ifFalse: [ |
65 expected isPetitFailure ifFalse: [ |
66 actual := (compiledParser parse: source withContext: self context). |
66 actual := (compiledParser parse: source withContext: self context). |
67 self assert: expected equals: actual. |
67 self assert: expected equals: actual. |
68 ] |
68 ] |
69 ]. |
69 ]. |
70 ! |
70 ! |
71 |
71 |