#!/bin/env tclsh set boot_dir [pwd] cd [file dirname [dict get [info frame [info frame]] file]] puts "boot_dir=$boot_dir" puts "pwd=[pwd]" source persist.tcl source deps.tcl set log [logger::init tclircc::main] sqlite3 core_db [file join $data_dir core.db] source migrate_core.tcl