[Plib-cvs] plib/demos/simon/src Makefile,1.4,1.5 simon.cxx,1.5,1.6

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

Update of /cvsroot/plib/plib/demos/simon/src
In directory usw-pr-cvs1:/tmp/cvs-serv11840/plib/demos/simon/src

Modified Files:
	Makefile simon.cxx 
Log Message:
Added PSL_DUMP and PSL_TRACE environment vars.
Fixed evaluation of && and || so they don't compute
their right-hand sides unless they have to.


Index: Makefile
===================================================================
RCS file: /cvsroot/plib/plib/demos/simon/src/Makefile,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- Makefile	15 Sep 2002 01:46:33 -0000	1.4
+++ Makefile	15 Sep 2002 04:34:39 -0000	1.5
@@ -18,10 +18,12 @@
  
 install: libsimon.a simon.h simon
 	mkdir -p /usr/local/simon
-	cp simon libsimon.a simon.h /usr/local/simon
+	cp libsimon.a simon.h /usr/local/simon
+	cp simon /usr/local/bin
 
 uninstall:
 	rm -r /usr/local/simon
+	rm /usr/local/bin/simon
 
 clean:
 	rm -f simon libsimon.a *.o

Index: simon.cxx
===================================================================
RCS file: /cvsroot/plib/plib/demos/simon/src/simon.cxx,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- simon.cxx	15 Sep 2002 02:33:33 -0000	1.5
+++ simon.cxx	15 Sep 2002 04:34:39 -0000	1.6
@@ -25,6 +25,25 @@
 #include <simon.h>
 #include <plib/psl.h>
 
+
+pslValue my_print ( int argc, pslValue *argv, pslProgram *p )
+{
+  for ( int i = 0 ; i < argc ; i++ )
+  {
+    switch ( argv[i].getType () )
+    {
+      case PSL_INT    : printf ( "%d ", argv[i].getInt    () ) ; break ;
+      case PSL_FLOAT  : printf ( "%f ", argv[i].getFloat  () ) ; break ;
+      case PSL_STRING : printf ( "%s ", argv[i].getString () ) ; break ;
+      case PSL_VOID   : printf ( "(void) " ) ; break ;
+    }
+  }
+ 
+  pslValue ret ;
+  return ret ;                                                                  
+}
+
+
 pslValue my_siJoystickUD ( int, pslValue *, pslProgram * )
 {
   pslValue ret ;
@@ -142,6 +161,7 @@
   { "siJoystickL" , 0, my_siJoystickL  },
   { "siJoystickR" , 0, my_siJoystickR  },
   { "fabs"        , 1, my_fabs         },
+  { "print"       ,-1, my_print        },
   { NULL, 0, NULL }
 } ;