OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [insight/] [itcl/] [itcl/] [tests/] [old/] [all] - Rev 1765

Compare with Previous | Blame | View Log

#
# Old test suite for [incr Tcl] v1.5
# ----------------------------------------------------------------------
#   AUTHOR:  Michael J. McLennan
#            Bell Labs Innovations for Lucent Technologies
#            mmclennan@lucent.com
#            http://www.tcltk.com/itcl
#
#      RCS:  $Id: all,v 1.1.1.1 2002-01-16 10:24:47 markom Exp $
# ----------------------------------------------------------------------
#            Copyright (c) 1993-1998  Lucent Technologies, Inc.
# ======================================================================
# See the file "license.terms" for information on usage and
# redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.

variable WATCH

global TEST_ABS_TOL TEST_REL_TOL
set TEST_ABS_TOL 1.0e-6
set TEST_REL_TOL 1.0e-5

if {![file readable "testlib.tcl"]} {
        error "ERROR: execute test suite in \"tests\" directory"
}

lappend auto_path .

foreach i [lsort [glob ./*.test]] {
        source $i
}
puts stdout "== ALL TESTS SUCCESSFUL =="
exit

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.