Posted to tcl by jima at Thu Dec 11 18:41:54 GMT 2014view pretty

<!-- { -->
No check needed about *listness* of **l**.

<!-- } -->

        return [llength $l]