如何从索引开始有效地获取Tcl列表的其余部分？

Question

我想获得列表中特定索引后面的所有元素。这可以写为：

set foo {0 1 2 3 4 5 6 <...> n} 
puts [lrange $foo 1 [llength $foo]] 

但是，计算列表的长度似乎很浪费。如果lrange的最后一个参数是可选的，并且省略它直到列表结束才会继续，但是，现在情况并非如此，那将会很好。

有没有其他的方式在Tcl中有效地做到这一点，而不计算列表的长度？

Answer 1

您可以使用 “结束” 到位 “[llength $ FOO]”

所以......

看跌[lrange $ foo的1月底]的

Answer 2

杰夫回答您的实际问题提得好。这就是说，有一件事值得注意。获取列表的长度（实际上是列表中的列表）是O（1），意味着它不需要实时。列表本身的长度与元数据一起存储，不会重新计算。唯一的实际成本是函数调用的开销。使用“结束”可能仍然更快，只是没有你想象的那么多。

但“实际上是引擎盖下的清单”，我的意思是说，解释者目前将其视为一个清单（有更深入的解释，但不值得进入此处）。由于您在值上使用[lrange]，因此解释器必须将其内部转换为列表...所以您几乎可以保证[llength]的O（1）行为。