[squeak-dev] The Trunk: Compiler-fbs.264.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Jul 12 19:52:54 UTC 2013


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

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

Name: Compiler-fbs.264
Author: fbs
Time: 12 July 2013, 8:52:28.613 pm
UUID: d9be5381-8137-2e4a-be06-2000e13a240b
Ancestors: Compiler-nice.263

Use UIManager default inform: '' during: [], not Utilities.

=============== Diff against Compiler-nice.263 ===============

Item was changed:
+ SystemOrganization addCategory: #'Compiler-Exceptions'!
  SystemOrganization addCategory: #'Compiler-Kernel'!
  SystemOrganization addCategory: #'Compiler-ParseNodes'!
  SystemOrganization addCategory: #'Compiler-Support'!
  SystemOrganization addCategory: #'Compiler-Syntax'!
- SystemOrganization addCategory: #'Compiler-Exceptions'!

Item was changed:
  ----- 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: [
- 		Utilities 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. ] ] ]!



More information about the Squeak-dev mailing list