Check-in [7edb5d1dd6]
Overview
SHA1:7edb5d1dd6551ebe25207bc857dc6db3712bd2f0
Date: 2016-03-28 14:57:45
User: rkeene
Comment:Ticket [cc1af09637]: Add additional subcommands to error message
Timelines: family | ancestors | descendants | both | trunk
Downloads: Tarball | ZIP archive
Other Links: files | file ages | folders | manifest
Tags And Properties
Context
2016-03-30
03:20
[5dde744f4b] Better sanitization of "AR" and "CC" when trying to figure out the cross-prefix (user: rkeene, tags: trunk)
2016-03-28
14:57
[7edb5d1dd6] Ticket [cc1af09637]: Add additional subcommands to error message (user: rkeene, tags: trunk)
14:53
[722e4d134f] tcc4tcl 0.26 (user: rkeene, tags: trunk, 0.26)
Changes

Modified tcc4tcl.tcl from [f1fd06e875] to [200fc77793].

44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
				set cmd "go"
				set args [list 1 {*}$args]
			}

			set callcmd ::tcc4tcl::_$cmd

			if {[info command $callcmd] == ""} {
				return -code error "unknown or ambiguous subcommand \"$cmd\": must be cproc, linktclcommand, code, tk, or go"
			}

			uplevel 1 [list $callcmd $handle {*}$args]
		}]

		return $handle
	}







|







44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
				set cmd "go"
				set args [list 1 {*}$args]
			}

			set callcmd ::tcc4tcl::_$cmd

			if {[info command $callcmd] == ""} {
				return -code error "unknown or ambiguous subcommand \"$cmd\": must be cwrap, ccode, cproc, delete, linktclcommand, code, tk, add_include_path, add_library_path, add_library, or go"
			}

			uplevel 1 [list $callcmd $handle {*}$args]
		}]

		return $handle
	}