Check-in [e4bde431db]
Overview
Comment:Mark more things as requiring Tcl 8.7
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: e4bde431db415d569850a0b00b157075bb448bdfd9797ab0219bd25a6b031c83
User & Date: rkeene on 2019-09-16 19:31:23
Other Links: manifest | tags
Context
2019-09-16
19:45
Added debugging system and ability to free absolute path check-in: d80c88cee0 user: rkeene tags: trunk
19:31
Mark more things as requiring Tcl 8.7 check-in: e4bde431db user: rkeene tags: trunk
19:28
Updated to use tcltest check-in: ad7092b843 user: rkeene tags: trunk
Changes

Modified example/main.tcl from [9e5c601d1d] to [a1ab38e038].

131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
	set startDir [pwd]
} -body {
	cd $rootDir
	pwd
} -cleanup {
	cd $startDir
	unset startDir
} -result $rootDir

tcltest::test xvfs-cwd-2 "Xvfs Can Be cwd" -setup {
	set startDir [pwd]
} -body {
	cd $rootDir
	cd lib
	lindex [glob *] 0
} -cleanup {
	cd $startDir
	unset startDir
} -result "hello"

# Currently broken
tcltest::test xvfs-package "Xvfs Can Be Package Directory" -setup {
	set startAutoPath $auto_path
	lappend auto_path ${rootDir}/lib
} -body {
	package require hello







|










|







131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
	set startDir [pwd]
} -body {
	cd $rootDir
	pwd
} -cleanup {
	cd $startDir
	unset startDir
} -constraints tcl87 -result $rootDir

tcltest::test xvfs-cwd-2 "Xvfs Can Be cwd" -setup {
	set startDir [pwd]
} -body {
	cd $rootDir
	cd lib
	lindex [glob *] 0
} -cleanup {
	cd $startDir
	unset startDir
} -constraints tcl87 -result "hello"

# Currently broken
tcltest::test xvfs-package "Xvfs Can Be Package Directory" -setup {
	set startAutoPath $auto_path
	lappend auto_path ${rootDir}/lib
} -body {
	package require hello