Go to the source code of this file.
Modules | |
module | xslt |
Functions/Subroutines | |
proc xslt::getprocs | ns (type set, type functions, optional, type set, type elements, optional, type foreach, type proc[, type info, type commands $, optional ns::*], optional if={[regexp{::([^:]+)$$, type proc, type discard, type name]) |
proc xslt::getprocs ns | ( | type | set, | |
type | functions, | |||
optional | , | |||
type | set, | |||
type | elements, | |||
optional | , | |||
type | foreach, | |||
type | proc[, type info, type commands $, optional ns::*] | |||
) |
Definition at line 17 of file tclxslt.tcl.
References args().
00021 {[regexp {::([^:]+)$ $, type proc , type discard , type name]) { 00022 if {[string equal [lindex [info args $proc] end] "args"]} { 00023 lappend functions $name 00024 } else { 00025 lappend elements $name 00026 } 00027 }