Implement the lassign command in C

For efficiency since it can be heavily used

Signed-off-by: Steve Bennett <steveb@workware.net.au>

1 files changed, 0 insertions, 8 deletions

diff --git a/stdlib.tcl b/stdlib.tcl
index 177373d..5dbdce6 100644
--- a/stdlib.tcl
+++ b/stdlib.tcl
@@ -28,14 +28,6 @@ proc function {value} {
 	return $value
 }
 
-# Tcl 8.5 lassign
-proc lassign {list args} {
-	# in case the list is empty...
-	lappend list {}
-	uplevel 1 [list foreach $args $list break]
-	lrange $list [llength $args] end-1
-}
-
 # Returns a list of proc filename line ...
 # with 3 entries for each stack frame (proc),
 # (deepest level first)