rev 471 - trunk/pr

SVN User <[email protected]> Wed, 12 May 2004 17:23:09 -0400
Newsgroups gmane.comp.lang.prothon.cvs
Message-ID <[email protected]>
Author: mark
Date: 2004-05-12 17:23:06 -0400 (Wed, 12 May 2004)
New Revision: 471

Modified:
   trunk/pr/test.pr
Log:
fixed bug in for loop

Modified: trunk/pr/test.pr
===================================================================
--- trunk/pr/test.pr	2004-05-12 20:10:14 UTC (rev 470)
+++ trunk/pr/test.pr	2004-05-12 21:23:06 UTC (rev 471)
@@ -1,31 +1,3 @@
-#!/usr/bin/env prothon
 
-# bin.pr
-
-x = Exception
-
-object obj(String, Int):
-        Int.init_{obj}(99)      # inits using second proto
-        print Int.str_{obj}()   # prints 99
-        
-try:
-    with obj: Int.init_{obj}(99)   # init Int a second time
-except x,e: print e    # throws "object has binary data, expected none"
-
-try:
-    obj.init_('abc') # init as String
-except x,e: print e     # throws "object has binary data, expected none"
-
-L = Proto(List) # L is uninitialized list
-
-L.init_(1,2,3)
-print L             # prints [1, 2, 3] 
-
-L.init_(4,5,6)
-print L             # prints [4, 5, 6] 
-
-d = {1:2, 'a':'b'}
-print d             # prints {1:2, 'a':'b'}
-
-d.init_(c = 'd', f = 'g')
-print d             # prints {f:'g', c:'d'} 
\ No newline at end of file
+for i in j:
+	pass
\ No newline at end of file