1# Commands covered:  shape
2#
3# This file  contains a  collection of  tests for one  or more  of the
4# Shape extension's command(s) semantics.  Sourcing this file into Tcl
5# runs the tests and generates  output for errors.  No output means no
6# errors were found.
7#
8# Copyright (c) 2000 by Donal K. Fellows
9#
10# See  the   file  "license.terms"   for  information  on   usage  and
11# redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.
12
13if {[lsearch [namespace children] ::tcltest] == -1} {
14    package require tcltest
15    namespace import ::tcltest::*
16}
17
18package require shape
19
20### WRITE THE TESTS HERE ###
21
22# cleanup
23::tcltest::cleanupTests
24return
25
26# Local Variables:
27# mode: tcl
28# End:
29