Re: switch statement and numeric constants

On 05/27/05 14:28, Christopher Nelson wrote:
> ...
> binary scan $bpdu "S c c c a*" \
> a(protocol) a(rstpVersion) a(type) a(flags) bpdu
>
> if {$a(protocol) != 0 } {
> error "Invalid protocol"
> }
> switch -- $a(type) {
> 0 {
> set a(type) "CFG"
> }
> 0x80 {
> set a(type) "TCN"
> }
> 2 {
> set a(type) "RST"
> }
> default {
> error "Unknown BPDU type"
> }
> }
> ...
>
You are aware that the switch command does string matching? This means
that the 0x80 pattern will never match the value of a variable that has
been set by binary scan c. Your pattern should probably be "-128".

Schelte.

-- 
set Reply-To [string map {nospam schelte} $header(From)]