Lines of xvfs-create-synthetic from check-in f4ea8e39b6 that are changed by the sequence of edits moving toward check-in fc90ef3457:

                         1: #! /usr/bin/env tclsh
                         2: 
                         3: set sourceDirectory [file dirname [file normalize [info script]]]
                         4: lappend auto_path [file join $sourceDirectory lib]
                         5: package require xvfs
                         6: 
                         7: proc ::xvfs::callback::setOutputFileName {args} {
                         8: 	return "/"
                         9: }
                        10: 
                        11: proc ::xvfs::callback::addOutputFiles {fsName} {
f4ea8e39b6 2019-09-20   12: 	::xvfs::processFile $fsName "" "" {
f4ea8e39b6 2019-09-20   13: 		type directory
f4ea8e39b6 2019-09-20   14: 		children "foo"
f4ea8e39b6 2019-09-20   15: 	}
f4ea8e39b6 2019-09-20   16: 	::xvfs::processFile $fsName "" "foo" {
f4ea8e39b6 2019-09-20   17: 		type file
f4ea8e39b6 2019-09-20   18: 		fileContents "abc"
f4ea8e39b6 2019-09-20   19: 	}
f4ea8e39b6 2019-09-20   20: 	::xvfs::processFile $fsName "./xvfs-create-synthetic" "xvfs-create-synthetic" {
f4ea8e39b6 2019-09-20   21: 		type file
f4ea8e39b6 2019-09-20   22: 	}
f4ea8e39b6 2019-09-20   23: 	return [list "" "foo" "xvfs-create-synthetic"]
                        24: }
                        25: 
                        26: ::xvfs::run --directory [pwd] --name synthetic