Lines Matching refs:newvalue
108 method C-var {o newvalue} {
112 if {![uplevel \#0 {info exists $newvalue}]} {
113 return -code error "Bad variable \"$newvalue\", does not exist"
116 set mydest $newvalue
120 method C-chan {o newvalue} {
121 if {![llength [file channels $newvalue]]} {
122 return -code error "Bad channel handle \"$newvalue\", does not exist"
126 set mydest $newvalue
130 method C-file {o newvalue} {
131 if {![file exists $newvalue]} {
132 set d [file dirname $newvalue]
134 return -code error "File \"$newvalue\" not creatable"
137 return -code error "File \"$newvalue\" not creatable"
140 if {![file writable $newvalue]} {
141 return -code error "File \"$newvalue\" not writable"
143 if {![file isfile $newvalue]} {
144 return -code error "File \"$newvalue\" not a file"
149 set mydest $newvalue