- Started regression test suite for SICS.
- The framework is there and testing motors works now
This commit is contained in:
26
test/testsics
Executable file
26
test/testsics
Executable file
@ -0,0 +1,26 @@
|
||||
#!/usr/bin/tclsh
|
||||
#------------------------------------------------------------------------------
|
||||
# This is a regression test for SICS. Before this can be used a SICServer must
|
||||
# have been started with: SICServer testini.tcl. This file uses the
|
||||
# tcltest package which comes with SICS for tests.
|
||||
#
|
||||
# copyright: see file COPYRIGHT
|
||||
#
|
||||
# Started: Mark Koennecke, July 2006
|
||||
#------------------------------------------------------------------------------
|
||||
# as of now we have tcl8.3 which has an outdated version of tcltest. We use
|
||||
# a better version in a local file. Once tcl8.4 has made it into the distro
|
||||
# I use, use the line below. We need tcltest 2.+
|
||||
# package require tcltest
|
||||
source tcltest.tcl
|
||||
namespace import tcltest::*
|
||||
source testutil.tcl
|
||||
source sicstcldebug.tcl
|
||||
|
||||
#-------------- Test for motors
|
||||
source mottest.tcl
|
||||
|
||||
#------------ print test summary
|
||||
cleanupTests
|
||||
exit 1
|
||||
|
Reference in New Issue
Block a user