我想将所有以前缀 SMP 开头的类重命名为 RS,包括源代码中的引用(直接引用,如 SMPClass1 和间接引用,如 Smalltalk,位于:#SMPClass2)以及类和方法注释中。当前的 RBParseTreeRewriter 可以做到这一点吗?没有解析树重写器的等价物是:
Smalltalk allClassesDo: [ :class |
(class name beginsWith: 'SW2')
ifTrue: [ class rename: 'PR' , (class name allButFirst: 3) ] ].