--- a/Method.st Tue Apr 27 12:26:12 2010 +0200
+++ b/Method.st Tue Apr 27 14:27:17 2010 +0200
@@ -12,19 +12,19 @@
"{ Package: 'stx:libbasic' }"
CompiledCode variableSubclass:#Method
- instanceVariableNames:'source sourcePosition category package mclass'
- classVariableNames:'PrivateMethodSignal LastFileReference LastSourceFileName
- LastWhoClass LastFileLock LastMethodSources LastMethodSourcesLock
- CompilationLock'
- poolDictionaries:''
- category:'Kernel-Methods'
+ instanceVariableNames:'source sourcePosition category package mclass'
+ classVariableNames:'PrivateMethodSignal LastFileReference LastSourceFileName
+ LastWhoClass LastFileLock LastMethodSources LastMethodSourcesLock
+ CompilationLock'
+ poolDictionaries:''
+ category:'Kernel-Methods'
!
Object subclass:#MethodWhoInfo
- instanceVariableNames:'myClass mySelector'
- classVariableNames:''
- poolDictionaries:''
- privateIn:Method
+ instanceVariableNames:'myClass mySelector'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:Method
!
!Method class methodsFor:'documentation'!
@@ -2864,6 +2864,12 @@
"Modified: 4.11.1996 / 23:04:52 / cg"
!
+methodInvocationInfo
+ ^ nil
+
+ "Created: / 27-04-2010 / 13:36:12 / cg"
+!
+
trapMethodForNumArgs:numArgs
|trapSel|
@@ -2994,11 +3000,11 @@
!Method class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.347 2010-04-07 17:36:33 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.348 2010-04-27 12:27:17 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.347 2010-04-07 17:36:33 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.348 2010-04-27 12:27:17 cg Exp $'
! !
Method initialize!