Artifact 0449aea470a121d40b3045465241f43cd5cba3d5:

• Executable file packages/gryp/bin/gryp — part of check-in [15be242993] at 2019-01-08 22:57:55 on branch trunk — db sqlite new command get

  dir change default name template for temporary directories

  dir scan use a database instead of a file compressed file

  gryp

  add self-archive routines

  further development (user: pooryorick size: 547)

#! /usr/bin/env tclsh

proc main {argv0 argv} {
	global auto_path
	set scriptname [file dirname [file normalize [info script]/__dummy]]
	set mydir [file dirname $scriptname]
	set myprefix [file dirname $mydir]
	set libdir [file join $myprefix lib]
	set auto_path [linsert $auto_path[set auto_path {}] 0 $libdir]

	package require {ycl gryp gryp}

	set name [namespace current]::[info cmdcount]_gryp
	[yclprefix] gryp gryp .new $name
	$name .init {*}$argv
}

coroutine [info cmdcount]_main main $argv0[unset argv0] $argv[unset argv]
vwait forever