The Trunk: Compiler-fbs.277.mcz

Frank Shearar uploaded a new version of Compiler to project The Trunk:
http://source.squeak.org/trunk/Compiler-fbs.277.mcz

==================== Summary ====================

Name: Compiler-fbs.277
Author: fbs
Time: 9 December 2013, 10:41:57.732 pm
UUID: 57b07f9f-33aa-ee43-bbe4-3f1876140ecc
Ancestors: Compiler-eem.276

Tests belong in test packages. In this case, we have a test whose positive outcome is reflected in the system still running. Perhaps we ought to consider an Examples package, in which to collect these kinds of non-SUnit tests.

=============== Diff against Compiler-eem.276 ===============

Item was removed:
- ----- Method: Decompiler class>>recompileAllTest (in category 'testing') -----
- recompileAllTest
- "[Decompiler recompileAllTest]"
- "decompile every method and compile it back; if the decompiler is correct then the system should keep running.  :)"
-
- SystemNavigation default allBehaviorsDo: [ :behavior |
- UIManager default informUser: (behavior printString) during: [
- behavior selectors do: [ :sel |
- | decompiled ast compiled |
- decompiled := Decompiler new decompile: sel in: behavior.
- ast := Compiler new compile: decompiled in: behavior notifying: nil ifFail: [ self error: 'failed' ].
- compiled := ast generate: (behavior compiledMethodAt: sel) trailer.
- behavior addSelector: sel withMethod: compiled. ] ] ]!