Thanks. I'm merging. I like my dreams when they come true.

Stef

On Mar 14, 2010, at 9:40 PM, Lukas Renggli wrote:

> I published a slice that rewrites "Smalltalk"  to "Smalltalk globals"
> for various messages
> (http://code.google.com/p/pharo/issues/detail?id=2143). To adapt the
> code in other packages just run the rewrite rules below:
> 
> Name: SLICE-RewriteSmalltalkToSmalltalkGlobals-lr.1
> Author: lr
> Time: 14 March 2010, 9:18:06 pm
> UUID: 1742e7f2-7233-4be3-bc3d-c9332ed07ef7
> Ancestors:
> Dependencies: Collections-Support-lr.31, Collections-Text-lr.30,
> Compiler-lr.196, CompilerTests-lr.32, Compression-lr.50,
> DeprecatedPreferences-lr.17, Files-lr.ducasse.139, FreeType-lr.524,
> Gofer-Core-lr.118, Gofer-Tests-lr.117, Graphics-lr.214,
> GraphicsTests-lr.32, Kernel-lr.617, KernelTests-lr.216,
> Monticello-lr.439, MonticelloGUI-lr.51, Morphic-lr.547,
> Multilingual-lr.155, Network-Protocols-lr.42, Network-URI-lr.17,
> Network-Url-lr.28, PackageInfo-lr.51, Polymorph-Tools-Diff-lr.26,
> Polymorph-Widgets-lr.214, ST80-lr.126, SUnit-lr.91, SUnitGUI-lr.57,
> ScriptLoader11-lr.297, Settings-Polymorph-lr.3, System-lr.11,
> System-Changes-lr.52, System-Download-lr.45, System-FilePackage-lr.36,
> System-Localization-lr.43, System-Object Storage-lr.87,
> System-Settings-lr.181, System-Support-lr.259, Tests-lr.131,
> ToolBuilder-Morphic-lr.65, Tools-lr.362, Traits-lr.359
> 
> RBParseTreeRewriter new
>       replace: 'Smalltalk associationAt: `...@arg1' with: 'Smalltalk globals
> associationAt: `...@arg1';
>       replace: 'Smalltalk associationAt: `...@arg1 ifAbsent: `...@arg2' with:
> 'Smalltalk globals associationAt:
> `...@arg1 ifAbsent: `...@arg2';
>       replace: 'Smalltalk associationDeclareAt: `...@arg1' with: 'Smalltalk
> globals associationDeclareAt:
> `...@arg1';
>       replace: 'Smalltalk associationOrUndeclaredAt: `...@arg1' with:
> 'Smalltalk globals
> associationOrUndeclaredAt: `...@arg1';
>       replace: 'Smalltalk classNamed: `...@arg1' with: 'Smalltalk globals
> classNamed: `...@arg1';
>       replace: 'Smalltalk at: `...@arg1' with: 'Smalltalk globals at: 
> `...@arg1';
>       replace: 'Smalltalk at: `...@arg1 ifPresent: `...@arg2' with: 'Smalltalk
> globals at: `...@arg1 ifPresent:
> `...@arg2';
>       replace: 'Smalltalk at: `...@arg1 ifAbsent: `...@arg2' with: 'Smalltalk
> globals at: `...@arg1 ifAbsent:
> `...@arg2';
>       replace: 'Smalltalk includesKey: `...@arg1' with: 'Smalltalk globals
> includesKey: `...@arg1';
>       replace: 'Smalltalk keyAtIdentityValue: `...@arg1' with: 'Smalltalk
> globals keyAtIdentityValue: `...@arg1';
>       replace: 'Smalltalk flushClassNameCache' with: 'Smalltalk globals
> flushClassNameCache';
>       yourself
> 
> -- 
> Lukas Renggli
> http://www.lukas-renggli.ch
> 
> _______________________________________________
> Pharo-project mailing list
> [email protected]
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project


_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Reply via email to