egghelp/eggheads community

$$var and switch question

2003-11-18T12:50:39-04:00

yeah... seems good work

Statistics: Posted by arcane — Tue Nov 18, 2003 12:50 pm

$$var and switch question

2003-11-17T12:10:09-04:00

I'm shure he didn't

Statistics: Posted by caesar — Mon Nov 17, 2003 12:10 pm

$$var and switch question

2003-11-17T11:28:35-04:00

Code:

if {[info exists var($value)]} {

wouldnt this check for var? it should check if vonend($value) exists.

also, call globaly the vonend (add a "global vonend" line in the proc) and there is no need of two $ when calling the variable/array

sorry, forgot that. of course i have this global line with all possible values for "var".

@user: yes, this seems more correct to me thx and ill come back if you told me nonsense

Statistics: Posted by arcane — Mon Nov 17, 2003 11:28 am

$$var and switch question

2003-11-16T15:35:07-04:00

Your code fails because you're working with the local variable "var" and not the target array. Try this:

Code:

proc avote:getValue {array element} {upvar 1 $array varif {[info exists var($element)]} {set var($element)} {set var(standard)}}

and then ive got a question about the switch command.
ive got: if {x=="1" || x=="2"} {
what would that be in a switch command?

Code:

switch -- x {    "1" - "2" {do stuff}}

Statistics: Posted by user — Sun Nov 16, 2003 3:35 pm

$$var and switch question

2003-11-16T15:38:48-04:00

Code:

if {[info exists var($value)]} {

also, call globaly the vonend (add a "global vonend" line in the proc) and there is no need of two $ when calling the variable/array

Statistics: Posted by caesar — Sun Nov 16, 2003 3:34 pm

$$var and switch question

2003-11-16T14:47:11-04:00

hi
got some problem. in my script i have several standard settings which can be overwritten by chan settings.
e.g. i have var vonend(standard), vonend(#mychan) and vonend(#anotherchan). now if vonend(#mychan) exists, the script should use vonend(#mychan), otherwise vonend(standard).
now to prevent an [info exists] every time i need a variable, i wrote a proc which should decide wheter chan setting or standard setting is taken.
here is what i got:

Code:

proc avote:getValue {var value} {if {[info exists $var($value)]} {return $$var($value)} else {return $$var(standard)}}

its called with

Code:

avote:getValue "vonend" "#mychan"

but i always get "Tcl error [avote:getValue]: can't read "var(standard)": variable isn't array". normally it should check if vonend(#mychan) exists and then decide whether to use vonend(#mychan) or vonend(standard)
can anyone please correct my code?
and then ive got a question about the switch command.
ive got: if {x=="1" || x=="2"} {
what would that be in a switch command?

Statistics: Posted by arcane — Sun Nov 16, 2003 2:47 pm