--- a/compiler/TMethodBinding.st Wed Sep 02 18:15:44 2015 +0100
+++ b/compiler/TMethodBinding.st Mon Sep 14 11:19:10 2015 +0100
@@ -12,8 +12,8 @@
!TMethodBinding class methodsFor:'instance creation'!
-class: aTClassDefinition selector: aSymbol
- ^ self new initializeWithClass: aTClassDefinition selector: aSymbol
+class: aTClassBinding selector: aSymbol
+ ^ self new initializeWithClass: aTClassBinding selector: aSymbol
"Created: / 31-08-2015 / 12:04:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
@@ -38,8 +38,8 @@
!TMethodBinding methodsFor:'initialization'!
-initializeWithClass: aTClassDefinition selector: aSymbol
- mclass := aTClassDefinition.
+initializeWithClass: aTClassBinding selector: aSymbol
+ mclass := aTClassBinding.
selector := aSymbol
"Created: / 31-08-2015 / 11:20:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"