rev 494 - trunk/pr/test

SVN User <[email protected]> Mon, 17 May 2004 13:45:17 -0400

Newsgroups	gmane.comp.lang.prothon.cvs
Message-ID	<[email protected]>

Author: mark
Date: 2004-05-17 13:45:14 -0400 (Mon, 17 May 2004)
New Revision: 494

Modified:
   trunk/pr/test/string.pr
Log:
updated strin.pr

Modified: trunk/pr/test/string.pr
===================================================================
--- trunk/pr/test/string.pr	2004-05-17 17:42:54 UTC (rev 493)
+++ trunk/pr/test/string.pr	2004-05-17 17:45:14 UTC (rev 494)
@@ -15,9 +15,9 @@
 
 if 3 !=  Len("abc"):  err(3)
 
-print "abc".upper()
+if "ABC" !=  "abc".upper(): err(4)
 
-print "ABC".lower()
+if "abc" !=  "ABC".lower(): err(5)
 
 if "Abc def" !=  "abc def".capitalize(): err(6)