rev 407 - trunk/pr

Author: mark
Date: 2004-04-24 02:28:48 -0400 (Sat, 24 Apr 2004)
New Revision: 407

Added:
   trunk/pr/re.pr
   trunk/pr/stdio.pr
   trunk/pr/system.pr
Removed:
   trunk/pr/re_test.pr
   trunk/pr/stdio_test.pr
   trunk/pr/system-test.pr
Log:
renamed all pr files with -test in them to remove -test

Added: trunk/pr/re.pr
===================================================================
--- trunk/pr/re.pr	2004-04-24 05:38:08 UTC (rev 406)
+++ trunk/pr/re.pr	2004-04-24 06:28:48 UTC (rev 407)
@@ -0,0 +1,39 @@
+#!/usr/bin/env prothon
+
+import Re
+
+def findAll(r,s):
+	result=[]
+	def foundOne(mo): 
+		&result.append!(mo.group())
+		return ''
+	r.sub(foundOne, s)
+	return result
+
+re = Re.compile("m..k")
+
+s = 'this mark likes to muck around in minks'
+
+print findAll(re, s)
+
+print re.findAll(s)
+
+print re.split(s, 2)
+
+mo = re.search(s, 10)
+
+print mo.group(), mo.groups()
+
+re = Re.compile(" (m..k) (l..e)")
+
+mo = re.search(s, 2, 20)
+
+print mo.group(), mo.groups(), mo.expand(r'grp1:<\1> grp2:<\2>')
+
+print "\n-------- above should look like ...  -------------\n"
+
+print "['mark', 'muck', 'mink']"
+print "['mark', 'muck', 'mink']"
+print "['this ', ' likes to ', ' around in minks']"
+print "mark ('mark')"
+print " mark like (' mark like', 'mark', 'like') grp1:<mark> grp2:<like>"
Deleted: trunk/pr/re_test.pr
===================================================================
--- trunk/pr/re_test.pr	2004-04-24 05:38:08 UTC (rev 406)
+++ trunk/pr/re_test.pr	2004-04-24 06:28:48 UTC (rev 407)
@@ -1,39 +0,0 @@
-#!/usr/bin/env prothon
-
-import Re
-
-def findAll(r,s):
-	result=[]
-	def foundOne(mo): 
-		&result.append!(mo.group())
-		return ''
-	r.sub(foundOne, s)
-	return result
-
-re = Re.compile("m..k")
-
-s = 'this mark likes to muck around in minks'
-
-print findAll(re, s)
-
-print re.findAll(s)
-
-print re.split(s, 2)
-
-mo = re.search(s, 10)
-
-print mo.group(), mo.groups()
-
-re = Re.compile(" (m..k) (l..e)")
-
-mo = re.search(s, 2, 20)
-
-print mo.group(), mo.groups(), mo.expand(r'grp1:<\1> grp2:<\2>')
-
-print "\n-------- above should look like ...  -------------\n"
-
-print "['mark', 'muck', 'mink']"
-print "['mark', 'muck', 'mink']"
-print "['this ', ' likes to ', ' around in minks']"
-print "mark ('mark')"
-print " mark like (' mark like', 'mark', 'like') grp1:<mark> grp2:<like>"

Added: trunk/pr/stdio.pr
===================================================================
--- trunk/pr/stdio.pr	2004-04-24 05:38:08 UTC (rev 406)
+++ trunk/pr/stdio.pr	2004-04-24 06:28:48 UTC (rev 407)
@@ -0,0 +1,21 @@
+#!/usr/bin/env prothon
+
+import File
+
+stdout = File.stdout
+stdin = File.stdin
+stderr = File.stderr
+
+stdout.write("Enter your name: ")
+
+name = stdin.readLine()
+
+stdout.write("Hello " + name)
+
+stderr.write("This is written on stderr\n")
+
+print "Opening test file for stdout"
+
+File.setStdOut(File("stdout.txt", "w+"))
+stdout.write("Should still go to stdout\n")
+File.stdout.write("Should go to stdout.txt file\n")
Deleted: trunk/pr/stdio_test.pr
===================================================================
--- trunk/pr/stdio_test.pr	2004-04-24 05:38:08 UTC (rev 406)
+++ trunk/pr/stdio_test.pr	2004-04-24 06:28:48 UTC (rev 407)
@@ -1,21 +0,0 @@
-#!/usr/bin/env prothon
-
-import File
-
-stdout = File.stdout
-stdin = File.stdin
-stderr = File.stderr
-
-stdout.write("Enter your name: ")
-
-name = stdin.readLine()
-
-stdout.write("Hello " + name)
-
-stderr.write("This is written on stderr\n")
-
-print "Opening test file for stdout"
-
-File.setStdOut(File("stdout.txt", "w+"))
-stdout.write("Should still go to stdout\n")
-File.stdout.write("Should go to stdout.txt file\n")

Deleted: trunk/pr/system-test.pr
===================================================================
--- trunk/pr/system-test.pr	2004-04-24 05:38:08 UTC (rev 406)
+++ trunk/pr/system-test.pr	2004-04-24 06:28:48 UTC (rev 407)
@@ -1,13 +0,0 @@
-#!/usr/bin/env prothon
-
-import OS
-
-print
-print 'The following lines should be:'
-print 'hello'
-print '0'
-print
-
-ret = OS.system("echo hello")
-print ret
-print
\ No newline at end of file

Added: trunk/pr/system.pr
===================================================================
--- trunk/pr/system.pr	2004-04-24 05:38:08 UTC (rev 406)
+++ trunk/pr/system.pr	2004-04-24 06:28:48 UTC (rev 407)
@@ -0,0 +1,13 @@
+#!/usr/bin/env prothon
+
+import OS
+
+print
+print 'The following lines should be:'
+print 'hello'
+print '0'
+print
+
+ret = OS.system("echo hello")
+print ret
+print
\ No newline at end of file