#! /usr/bin/env tclkit
set fd [open trove.txt]
file delete -force trove.vfs
file mkdir trove.vfs
while {[gets $fd line] > 0} {
  file mkdir trove.vfs/[string map [list / %2F " :: " /] $line]
}
close $fd
exec sdx wrap trove.kit
file delete -force trove.vfs