*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Sat, 08 Sep 2001 22:47:00 +0200
changeset 6014 14acbd7c25d4
parent 6013 67fe7838f006
child 6015 0a014a232cc9
*** empty log message ***
Method.st
--- 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!