Artifact f342636899b0114e2474c81f16bb4af9370c2e4c:

• File packages/upobj/pkgIndex.tcl — part of check-in [c2de09edcf] at 2015-02-13 14:18:36 on branch trunk — new object system: "shelf". New dispatch system: "vso", inspired by verb-subject-object patterns in functional languages. dispatch commands based on the types of their objects. lots of bug fixes all over. (user: pooryorick size: 438)

#! /bin/env tclsh

package ifneeded ycl::upobj 0.1 [list apply {{dir} {
	package require ycl::package
	[yclprefix]::package::source upobj \
		 [file join $dir lib upobj.tcl] 
	package provide ycl::upobj 0.1
}} $dir]

package ifneeded ycl::upobj::test 0.1 [list apply {{dir} {
	package require ycl::package
	[yclprefix]::package::source upobj::test \
		 [file join $dir lib upobj.test.tcl] 
	package provide ycl::upobj::test 0.1
}} $dir]