Posted to tcl by kbk at Wed Jan 06 15:51:26 GMT 2016view raw
- (0) loadScalar1 %v0 # var "s"
- (2) tryCvtToBoolean
- (3) reverse 2
- (8) pop
- (9) jumpTrue1 +19 # pc 28
- (11) loadScalar1 %v0 # var "s"
- (13) numericType
- (14) jumpTrue1 +6 # pc 20
- (16) push1 0 # "0"
- (18) jump1 +4 # pc 22
- (20) push1 1 # "1"
- (22) jumpTrue1 +6 # pc 28
- (24) push1 0 # "0"
- (26) jump1 +4 # pc 30
- (28) push1 1 # "1"
- (30) jumpFalse1 +6 # pc 36
- (32) push1 1 # "1"
- (34) jump1 +4 # pc 38
- (36) push1 0 # "0"
- (38) tryCvtToNumeric