[Plib-cvs] plib/examples/src/psl/data test.psl,1.1,1.2

[Steve B. <sj...@us...>]

Update of /cvsroot/plib/plib/examples/src/psl/data
In directory usw-pr-cvs1:/tmp/cvs-serv1575/plib/examples/src/psl/data

Modified Files:
	test.psl 
Log Message:
Function calls now work.


Index: test.psl
===================================================================
RCS file: /cvsroot/plib/plib/examples/src/psl/data/test.psl,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- test.psl	5 Sep 2002 06:46:06 -0000	1.1
+++ test.psl	5 Sep 2002 14:58:56 -0000	1.2
@@ -1,14 +1,19 @@
 
+void wibble ()
 {
-x = 0 ;
-y = 0 ;
-z = 0 ;
-
-while ( x < 10 )
-{
-  x = x + 1 ;
   hello () ;
-  pause ;
 }
+
+void main ()
+{
+  x = 0 ;
+
+  while ( x < 10 )
+  {
+    x = x + 1 ;
+    wibble () ;
+    pause ;
+  }
 }
+