TCL-Example:
set x [list]
lvarpop x 0. ; # intentionally non-int as 2nd argument
This can really crash your app, since a bug in TclX_RelativeExpr() may trash the stack.
The code that tests, whether the last argument is an integer, an expression or an expression in the form of "end"
is faulty.
--- tclXutil.c, line 364 ---
if (!(STRNEQU (exprStr, "end", 3) ||...
2009-04-09 12:33:53 UTC in Extended Tcl (TclX)