ycl

Artifact [0671cf57e7]
Login

Artifact [0671cf57e7]

Artifact 0671cf57e7212417ad8588e864af859d23ea1cd8:


#! /bin/env tclsh


package ifneeded {ycl parse}  0.1 [list apply {{dir} {
	package require {ycl package}
	[yclprefix] package prep parse
	package provide {ycl parse} 0.1
}} $dir]


package ifneeded {ycl parse digitalForensicsXml incremental} 0.1 [list apply {{dir} {
	package require {ycl parse}
	set ns parse::digitalForensicsXml::incremental
	set fullns [yclprefix]::$ns
	if {[namespace exists $fullns]} {
		error [list {namespace exists} $fullns]
	}
	namespace eval [info object namespace ::oo::object] [
		list my createWithNamespace $fullns $fullns]
	namespace eval [info object namespace $fullns] [
		list ::source $dir/lib/d/digitalForensicsXml/incremental.tcl
	]
	namespace eval [namespace parent $fullns] {
		namespace export *
	}
	package provide {ycl parse digitalForensicsXml incremental} 0.1
}} $dir]


package ifneeded {ycl parse photorec log} 0.1 [list apply {{dir} {
	package require {ycl parse}
	set name [yclprefix]::parse::photorec::log
	[yclprefix] package prep parse::photorec
	[yclprefix] package shelf {parse photorec log} 0.1 $dir/lib/p/photorec/log.tcl
}} $dir]


package ifneeded {ycl parse http util} 0.2 [list apply {{dir} {
	package require {ycl parse}
	[yclprefix] package source parse::http::util $dir/lib/h/http/util.tcl
	package provide {ycl parse http util} 0.2
}} $dir]

package ifneeded {ycl parse http util test} 0.1 [list apply {{dir} {
	package require {ycl parse http util}
	[yclprefix] package source parse::http::util::test $dir/lib/h/http/util.test.tcl
	package provide {ycl parse http util test} 0.1
}} $dir]


package ifneeded {ycl parse r} 0.1 [list apply {{dir} {
	package require {ycl parse}
	[yclprefix]::package::source parse::r $dir/lib/r/r/r.tcl
	package provide {ycl parse r} 0.1
}} $dir]


package ifneeded {ycl parse r test} 0.1 [list apply {{dir} {
	package require {ycl parse}
	[yclprefix]::package::source parse::r::test $dir/lib/r/r/r.test.tcl 
	package provide {ycl parse r test} 0.1
}} $dir]


package ifneeded {ycl parse tcl} 0.1 [list apply {{dir} {
	package require {ycl parse}
	[yclprefix]::package::source parse::tcl $dir/lib/t/tcl/tcl.tcl 
	package provide {ycl parse tcl} 0.1
}} $dir]


package ifneeded {ycl parse tcl commands} 0.1 [list apply {{dir} {
	package require {ycl package}
	[yclprefix] package prep ycl::parse::tcl
	[yclprefix] package source parse::tcl::commands $dir/lib/t/tcl/commands.tcl 
	package provide {ycl parse tcl commands} 0.1
}} $dir]


package ifneeded {ycl parse tcl common} 0.1 [list apply {{dir} {
	package require {ycl parse}
	[yclprefix]::package::source parse::tcl::common $dir/lib/t/tcl/common.tcl 
	package provide {ycl parse tcl common} 0.1
}} $dir]


package ifneeded {ycl parse tcl graph} 0.1 [list apply {{dir} {
	package require {ycl parse tcl}
	package require {ycl parser graph}
	set name [yclprefix]::parse::tcl::graph
	[[yclprefix] parser graph .spawn $name] init
	$name .eval [list ::source $dir/lib/t/tcl/graph.tcl]
	package provide {ycl parse tcl graph} 0.1
}} $dir]


package ifneeded {ycl parse tcl graph test} 0.1 [list apply {{dir} {
	package require {ycl parse tcl graph}
	[yclprefix]::package::source parse::tcl::graph::test $dir/lib/t/tcl/graph.test.tcl 
	package provide {ycl parse tcl graph test} 0.1
}} $dir]


package ifneeded {ycl parse tcl stream} 0.1 [list apply {{dir} {
	package require {ycl parse tcl}
	[yclprefix]::package::source parse::tcl::stream $dir/lib/t/tcl/stream.tcl 
	package provide {ycl parse tcl stream} 0.1
}} $dir]


package ifneeded {ycl parse tcl stream critcl} 0.1 [list apply {{dir} {
	[yclprefix] package prep {parse tcl stream}
	[yclprefix]::package::source parse::tcl::stream \
		$dir/lib/t/tcl/stream.critcl 
	package provide {ycl parse tcl stream critcl} 0.1
}} $dir]

package ifneeded {ycl parse tcl stream interpret} 0.1 [list apply {{dir} {
	[yclprefix] package prep {parse tcl stream}
	[yclprefix]::package::source parse::tcl::stream::interpret \
		$dir/lib/t/tcl/stream/interpret.tcl
	package provide {ycl parse tcl stream interpret} 0.1
}} $dir]


package ifneeded {ycl parse tcl stream test} 0.1 [list apply {{dir} {
	package require {ycl parse tcl stream}
	[yclprefix]::package::source parse::tcl::stream::test $dir/lib/t/tcl/stream.test.tcl 
	package provide {ycl parse tcl stream test} 0.1
}} $dir]


package ifneeded {ycl parse tcl table} 0.1 [list apply {{dir} {
	package require {ycl parse}
	package require {ycl shelf tcloo shelf}

	[yclprefix] package prep parse::tcl::table

	set name [yclprefix]::parse::tcl::table::reader
	[yclprefix]::shelf::tcloo::shelf .spawn $name
	$name .eval [list ::source $dir/lib/t/tcl/table/reader.tcl]

	set name [yclprefix]::parse::tcl::table::writer
	[yclprefix] shelf shelf .spawn $name
	$name .eval [list ::source $dir/lib/t/tcl/table/writer.tcl]

	package provide {ycl parse tcl table} 0.1
}} $dir]


package ifneeded {ycl parse tcl table test} 0.1 [list apply {{dir} {
	package require {ycl parse tcl table}
	[yclprefix]::package::source parse::tcl::table::test $dir/lib/t/tcl/table.test.tcl 
	package provide {ycl parse tcl table test} 0.1
}} $dir]


package ifneeded {ycl parse tcl test} 0.1 [list apply {{dir} {
	package require {ycl parse tcl}
	[yclprefix]::package::source parse::tcl::test $dir/lib/t/tcl/test.tcl 
	package provide {ycl parse tcl test} 0.1
}} $dir]


package ifneeded {ycl parse xml} 0.1 [list apply {{dir} {
	package require {ycl parse}
	package require {ycl parser graph}
	set name [yclprefix]::parse::xml
	[yclprefix] parser graph .new $name
	$name .specialize
	$name .eval [list ::source $dir/lib/x/xml/xml.tcl]
	[yclprefix]::package::source parse::xml::util $dir/lib/x/xml/util.tcl
	$name .eval [list $name .routine util]
	package provide {ycl parse xml} 0.1
}} $dir]


package ifneeded {ycl parse xml accelerated} 0.1 [list apply {{dir} {
	package require {ycl parse xml}
	[yclprefix] parse xml util accelerateEncodeInvalidChars
	package provide {ycl parse xml accelerated} 0.1
}} $dir]


package ifneeded {ycl parse xml test} 0.1 [list apply {{dir} {
	package require {ycl parse xml}
	[yclprefix]::package::source parse::xml::test $dir/lib/x/xml/xml.test.tcl 
	package provide {ycl parse xml test} 0.1
}} $dir]