|
|
|---|
set V [expr {int(1+2)}] | set V [expr {int(1+2)}] |
concat [tcl_variable_type V] [execsql {SELECT typeof(:V)}] | concat [tcl_variable_type V] [execsql {SELECT typeof(:V)}] |
} {int integer} | } {int integer} |
do_test types3-1.3 { |
#do_test types3-1.3 { |
set V [expr {1+123456789012345}] |
# set V [expr {1+123456789012345}] |
concat [tcl_variable_type V] [execsql {SELECT typeof(:V)}] |
# concat [tcl_variable_type V] [execsql {SELECT typeof(:V)}] |
} {wideInt integer} |
#} {wideInt integer} |
| |
# A double variable comes in as REAL | # A double variable comes in as REAL |
do_test types3-1.4 { | do_test types3-1.4 { |
