'From Squeak6.0alpha of 5 October 2017 [latest update: #17411] on 10 October 2017 at 3:28:47 pm'! Object subclass: #Blubb instanceVariableNames: '' classVariableNames: '' poolDictionaries: '' category: 'Sandbox'! Object subclass: #BlubbMethod instanceVariableNames: 'original' classVariableNames: '' poolDictionaries: '' category: 'Sandbox'! !Blubb methodsFor: 'as yet unclassified' stamp: 'mt 10/10/2017 15:19'! original ^ 111! ! !BlubbMethod methodsFor: 'as yet unclassified' stamp: 'mt 10/10/2017 15:23'! at: n ^ original at: n! ! !BlubbMethod methodsFor: 'as yet unclassified' stamp: 'mt 10/10/2017 15:20'! doesNotUnderstand: aMessage "Required for all meta messages that need information from the original method." ^ original perform: aMessage selector withArguments: aMessage arguments ! ! !BlubbMethod methodsFor: 'as yet unclassified' stamp: 'mt 10/10/2017 15:20'! original: m original := m.! ! !BlubbMethod methodsFor: 'as yet unclassified' stamp: 'mt 10/10/2017 15:13'! run: aSelector with: anArrayOfObjects in: aReceiver ^ 42! ! !BlubbMethod methodsFor: 'as yet unclassified' stamp: 'mt 10/10/2017 15:23'! size ^ original size! !