genStubs.tcl File Reference

Go to the source code of this file.

Modules

module  genStubs

Functions/Subroutines

ret lassign (type valueList, type args)

Function Documentation

ret lassign ( type  valueList,
type  args 
)

Definition at line 885 of file genStubs.tcl.

References error().

00885                                           {
00886   if {[llength $args] == 0} {
00887       error "wrong # args: lassign list varname ?varname..?"
00888   }
00889 
00890   uplevel [list foreach $args $valueList {break}]
00891   return [lrange $valueList [llength $args] end]
00892 }

Here is the call graph for this function:


Generated on 21 Sep 2010 for Gui by  doxygen 1.6.1