template::util::list_to_array (public, deprecated)

 template::util::list_to_array values array_ref columns

Defined in packages/acs-templating/tcl/util-procs.tcl

Deprecated. Invoking this procedure generates a warning.

Converts a list of values into an array, using a list of corresponding column names for the array keys.

Parameters:
values - A list of values
array_ref - The name of the array to create in the calling frame.
columns - A list of column names to use for the array keys. The length of this list should be the same as the values list. DEPRECATED: as of August 2022 no OpenACS code is using this proc. The operation it implements can be easily achieved via plain Tcl idioms.
See Also:
  • array

Partial Call Graph (max 5 caller/called nodes):
%3 ad_log_deprecated ad_log_deprecated (public) template::util::list_to_array template::util::list_to_array template::util::list_to_array->ad_log_deprecated

Testcases:
No testcase defined.
Source code:
ad_log_deprecated proc template::util::list_to_array

    upvar $array_ref array

    for { set i 0 } { $i < [llength $values] } { incr i } {

        set key [lindex $columns $i]
        set value [lindex $values $i]

        set array($key$value
    }
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: