rev 344 - trunk/pr
SVN User <[email protected]>
| Newsgroups | gmane.comp.lang.prothon.cvs |
|---|---|
| Message-ID | <[email protected]> |
Author: bcollins
Date: 2004-04-14 00:18:21 -0400 (Wed, 14 Apr 2004)
New Revision: 344
Modified:
trunk/pr/dict.pr
Log:
Set props on dict.pr. Test runs fine.
Modified: trunk/pr/dict.pr
===================================================================
--- trunk/pr/dict.pr 2004-04-14 03:49:57 UTC (rev 343)
+++ trunk/pr/dict.pr 2004-04-14 04:18:21 UTC (rev 344)
@@ -1,40 +1,40 @@
-#!/usr/bin/env prothon
-
-# dict.pr
-
-d = {1:2}
-if d.keys() != [1] : print 'error in keys'
-if d.values() != [2] : print 'error in values'
-if d.get(1) != 2 : print 'error1 in get'
-if d.get(2) != None : print 'error2 in get'
-if d.get(3,4) != 4 : print 'error3 in get'
-if d.get(3,5) != 5 : print 'error4 in get'
-if d.setdefault!(3,4) != 4 : print 'error5 in setdefault'
-if d.get(3,5) != 4 : print 'error6 in get'
-if 3 not in d: print 'error 7 in notin'
-
-d = {1:2, 3:4}
-e = d.copy()
-
-if d.items() != e.items():
- print 'error1'
-
-if Len(e.items()) != 2:
- print 'error2'
-
-d.clear!()
-
-d = {1:2}
-d.update!({3:4})
-if d.items() != e.items():
- print d.items(), e.items(), 'error3'
-
-if not e.has_key?(1) or e.has_key?(2): print 'error4'
-
-print 'all tests passed'
-
-print '\nfollowing should be: 1 (1,2) 3 (3,4)\n'
-
-for i in e: print i, d.popitem!(),
-
+#!/usr/bin/env prothon
+
+# dict.pr
+
+d = {1:2}
+if d.keys() != [1] : print 'error in keys'
+if d.values() != [2] : print 'error in values'
+if d.get(1) != 2 : print 'error1 in get'
+if d.get(2) != None : print 'error2 in get'
+if d.get(3,4) != 4 : print 'error3 in get'
+if d.get(3,5) != 5 : print 'error4 in get'
+if d.setdefault!(3,4) != 4 : print 'error5 in setdefault'
+if d.get(3,5) != 4 : print 'error6 in get'
+if 3 not in d: print 'error 7 in notin'
+
+d = {1:2, 3:4}
+e = d.copy()
+
+if d.items() != e.items():
+ print 'error1'
+
+if Len(e.items()) != 2:
+ print 'error2'
+
+d.clear!()
+
+d = {1:2}
+d.update!({3:4})
+if d.items() != e.items():
+ print d.items(), e.items(), 'error3'
+
+if not e.has_key?(1) or e.has_key?(2): print 'error4'
+
+print 'all tests passed'
+
+print '\nfollowing should be: 1 (1,2) 3 (3,4)\n'
+
+for i in e: print i, d.popitem!(),
+
print '\n'
\ No newline at end of file
Property changes on: trunk/pr/dict.pr
___________________________________________________________________
Name: svn:executable
+ *
Name: svn:eol-style
+ native