Artifact 7c187e9abc0e83ca5713f5880fa098ec6ca7313e:

• Executable file packages/parse/pkgIndex.tcl — part of check-in [1c252a3cd0] at 2020-06-22 00:31:53 on branch trunk — chan new routines

  carve

  interpolate

  keep

  further development

  best working version so far

  notes

  new routines

  absorb addrspaceex

  "eval" option to [ls]

  "message" design for interactive output

  add zip processing to [fin]

  sqlite

  lossless

  work in progress

  add test

  string

  printable

  new interface

  tree

  much faster [last] and [pivot] routines

  (user: pooryorick size: 5894)

#! /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 [
			file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $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 [
		file join $dir lib t tcl stream.test.tcl]
	package provide {ycl parse tcl stream test} 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 [
		file join $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 [
		file join $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 [
		file join $dir lib x xml xml.tcl]]
	[yclprefix]::package::source parse::xml::util [
		file join $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 [
		file join $dir lib x xml xml.test.tcl]
	package provide {ycl parse xml test} 0.1
}} $dir]