--- a/Method.st Sat Sep 08 21:18:00 2001 +0200
+++ b/Method.st Sat Sep 08 22:47:00 2001 +0200
@@ -1845,7 +1845,7 @@
#ifdef F_PRIMITIVE
INT f = __intVal(__INST(flags));
- INT nr = 0;
+ OBJ nr = 0;
if (f & F_PRIMITIVE) {
nr = __INST(code_);
@@ -1854,9 +1854,6 @@
#endif
%}.
self primitiveFailed
-
-
-
!
setPrimitiveNumber:aNumber
@@ -2808,6 +2805,6 @@
!Method class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.227 2001-09-07 17:12:13 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.228 2001-09-08 20:47:00 cg Exp $'
! !
Method initialize!