initial harness code and read channel
[scpubgit/TenDotTcl.git] / snit / snit2.tcl
1 #-----------------------------------------------------------------------
2 # TITLE:
3 #       snit2.tcl
4 #
5 # AUTHOR:
6 #       Will Duquette
7 #
8 # DESCRIPTION:
9 #       Snit's Not Incr Tcl, a simple object system in Pure Tcl.
10 #
11 #       Snit 2.x Loader
12 #
13 #       Copyright (C) 2003-2006 by William H. Duquette
14 #       This code is licensed as described in license.txt.
15 #
16 #-----------------------------------------------------------------------
17
18 package require Tcl 8.5
19
20 # Define the snit namespace and save the library directory
21
22 namespace eval ::snit:: {
23     set library [file dirname [info script]]
24 }
25
26 # Load the kernel.
27 source [file join $::snit::library main2.tcl]
28
29 # Load the library of Snit validation types.
30 source [file join $::snit::library validate.tcl]
31
32 package provide snit 2.3.2