Artifact 1fcbe951fb5f6c964e9a00105425e691c8a5743a:
- File
packages/chan/lib/prototype.vso.tcl
— part of check-in
[6842ef1911]
at
2015-11-03 13:10:04
on branch trunk
— Rename various packages in list format .
First commit of sql .
Early version of entity-attribute-value model in test/lib/data.tcl . It has a context column , but the idea of using an events and attributes in the "what" colun comes in the next changeset . (user: pooryorick size: 611)
#! /bin/env tclsh package require ycl::iter package require {ycl proc} namespace import [yclprefix]::chan::prototype package require ycl::vso namespace import [yclprefix]::route rename [namespace current] {} [yclprefix] proc alias [namespace current] [[yclprefix] vso eval {namespace which universe}] [namespace current] class chan {} [namespace current] class chan iter apply [list {} { foreach name {write more iter} { #namespace import [yclprefix]::chan::prototype::$name [namespace current] route $name chan [namespace current]::$name } } [namespace current]] prototype new [namespace current]