[Tcl] Fix std_vector typecheck typemaps
In some cases the typecheck typemap would try to access the first element of an empty Tcl list. Fixes https://sourceforge.net/p/swig/bugs/1309/
This commit is contained in:
parent
f003e9bcba
commit
6f4adde4b4
2 changed files with 19 additions and 12 deletions
7
Examples/test-suite/tcl/li_std_vector_runme.tcl
Normal file
7
Examples/test-suite/tcl/li_std_vector_runme.tcl
Normal file
|
|
@ -0,0 +1,7 @@
|
|||
|
||||
if [ catch { load ./li_std_vector[info sharedlibextension] li_std_vector} err_msg ] {
|
||||
puts stderr "Could not load shared object:\n$err_msg"
|
||||
}
|
||||
|
||||
# # Regression test for bug fixed in SWIG 4.2.0.
|
||||
if {[sum []] != 0} { error "bad vector sum" }
|
||||
Loading…
Add table
Add a link
Reference in a new issue