PSI update

r1464 | ffr | 2007-02-12 12:20:21 +1100 (Mon, 12 Feb 2007) | 2 lines

test/testmisc.tcl

@@ -0,0 +1,21 @@
+#--------------------------------------------------------------------
+# This is for testing odd bits and pieces
+#
+# Mark Koennecke, October 2006
+#--------------------------------------------------------------------
+
+puts stdout "Testing variables and aliases"
+
+test misc-1.0 {Test Variables} -body {
+        testPar lotte Uuuuuurgs User 
+	return OK
+} -result OK
+
+test misc-1.1 {Test Alias} -body {
+    config rights User User
+    miau errortype 0
+    testDrive miau 10 User
+    return OK
+} -result OK
+
+