Check-in [c951d6608a]
Overview
Comment:Corrected typo in previous commit
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: c951d6608af8563eb9774a2cdf8e57c7a8e5c8d2
User & Date: rkeene on 2014-06-21 21:18:40
Other Links: manifest | tags
Context
2014-06-21
21:20
tcc4tcl 0.20 check-in: 7091d27bbd user: rkeene tags: trunk, 0.20
21:18
Corrected typo in previous commit check-in: c951d6608a user: rkeene tags: trunk
21:17
Updated to give a useful error if an invalid subcommand is given check-in: d7b387c82f user: rkeene tags: trunk
Changes

Modified tcc4tcl.tcl from [47b77bc722] to [f7535f5aaf].

    46     46   			if {$cmd == "code"} {
    47     47   				set cmd "go"
    48     48   				set args [list 1 {*}$args]
    49     49   			}
    50     50   
    51     51   			set callcmd ::tcc4tcl::_$cmd
    52     52   
    53         -			if {![info command $callcmd]} {
           53  +			if {[info command $callcmd] == ""} {
    54     54   				return -code error "unknown or ambiguous subcommand \"$cmd\": must be cproc, linktclcommand, code, tk, or go"
    55     55   			}
    56     56   
    57     57   			uplevel 1 [list $callcmd $handle {*}$args]
    58     58   		}]
    59     59   
    60     60   		return $handle