我们可以创建一个数组列表吗？如何创建？

Question

我想创建一个列表，它的每个元素都是一个数组，类似于C语言中的结构体数组。
TCL可以做吗？如果可以怎么做？非常感谢！

我做了一些尝试，但失败了......

tcl>set si(eid) -1
tcl>set si(core) 0
tcl>set si(time) 0
tcl>lappend si_list "$si"
Error: can't read "si": variable is array

Answer 1

您无法创建数组列表，但可以创建功能相同的字典列表（从键到值的映射）：

set mylist [list [dict create a 1 b 2] [dict create a 4 b 5]]
puts [dict get [lindex $mylist 1] a]

要将其作为数组执行，您需要使用 [array get] 和 [array set] ] 将数组更改为字符串：

set si(eid) -1
set si(core) 0
set si(time) 0
lappend si_list [array get si]

并将其返回，

array set newsi [lindex $si_list]
puts $newsi(eid)

字典可让您直接处理 {name value} 列表。

Answer 2

在不包含 dict 的 Tcl 版本上执行此操作的一种方法是使用 upvar。

为此，请将数组变量的名称添加到列表中：

    set si(eid) -1
    set si(core) 0
    set si(time) 0
    lappend si_list "si"

然后要恢复数组，请执行以下操作：

    upvar #0 [lindex $si_list 0] newsi
    puts $newsi(eid)

Answer 3

您还可以使用 tcllib 中的 ::struct::record 包来实现类似的功能。