Import Tix 8.4.3.5 (as of svn r86089)
This commit is contained in:
21
tests/general/fs.tcl
Normal file
21
tests/general/fs.tcl
Normal file
@@ -0,0 +1,21 @@
|
||||
# -*- mode: TCL; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*-
|
||||
#
|
||||
# $Id: fs.tcl,v 1.4 2004/03/28 02:44:57 hobbs Exp $
|
||||
#
|
||||
# fs.tcl
|
||||
#
|
||||
# Test the portable file handling ("FS") routines.
|
||||
#
|
||||
# Copyright (c) 1996, Expert Interface Technologies
|
||||
#
|
||||
# See the file "license.terms" for information on usage and
|
||||
# redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.
|
||||
#
|
||||
|
||||
proc About {} {
|
||||
return "Testing portable file handling routines"
|
||||
}
|
||||
|
||||
proc Test {} {
|
||||
# These tests were all obsolete post-Tix 8.2
|
||||
}; # Test
|
||||
Reference in New Issue
Block a user