[VW7.8] How to find duplicate methods in source or code?

I want to find methods that are identical in source code and/or compiled code. How can I do that efficiently?

Thanks,
Aik-Siong Koh

On 2/7/2014 11:03 PM, askoh wrote:
> I want to find methods that are identical in source code and/or compiled
> code. How can I do that efficiently?

|byCompilationResult|
byCompilationResult := Dictionary new.
Smalltalk enumerateMethods:
         [:behavior :selector :compiled |
         | key |
         key := Array with: compiled bytes with: compiled literals.
         (byCompilationResult at: key ifAbsentPut: [Set new])
             add: compiled definition].
byCompilationResult := (byCompilationResult reject: [:set | set size =
1]) collect: #asArray.
byCompilationResult  inspect


R
-




_______________________________________________
vwnc mailing list
[hidden email]
http://lists.cs.uiuc.edu/mailman/listinfo/vwnc