rev 581 - in trunk: . pr/test

Author: mark
Date: 2004-06-05 19:28:54 -0400 (Sat, 05 Jun 2004)
New Revision: 581

Modified:
   trunk/STATUS.txt
   trunk/pr/test/test.pr
Log:
working on mi2.pr bug

Modified: trunk/STATUS.txt
===================================================================
--- trunk/STATUS.txt	2004-06-05 05:53:09 UTC (rev 580)
+++ trunk/STATUS.txt	2004-06-05 23:28:54 UTC (rev 581)
@@ -15,6 +15,8 @@
 
 --- getAttr(name), setAttr(name, value), delAttr(name)
 
+--- has_proto should return true for self
+
 --- Strings -> 24-bit ords
 --- resolve binary vs. strings vs. unicode----- code in binary string (all binary data in binary string?)
 --- new integrated binary obj_malloc?

Modified: trunk/pr/test/test.pr
===================================================================
--- trunk/pr/test/test.pr	2004-06-05 05:53:09 UTC (rev 580)
+++ trunk/pr/test/test.pr	2004-06-05 23:28:54 UTC (rev 581)
@@ -7,11 +7,11 @@
     while i < n:
         if mro[i] is start:
             break
-        i += 1
+        i = i+1
     if i == n:
         raise AttributeError
     while True:
-        i += 1
+        i = i+1
         if i == n:
             break
         o = mro[i]
@@ -20,6 +20,7 @@
             a = attrs[attrname]
             if a.hasProto?(Func):
                 return a 
+            print "not func:", a
             return a
     raise AttributeError
 
@@ -42,7 +43,7 @@
 
 m = Mod8Int(0)
 n = Mod8Int(1)
-for i in 100:
+for i in 1000:
     if m != i % 8:
         print "test failed:",i
         Sys.exit(1)