map prefix

(System32) 1 % linsert
wrong # args: should be "linsert list index ?element ...?"
(System32) 2 % proc map {fun list} {
>     set res {}
>     foreach element $list {lappend res [$fun $element]}
>     set res
>  } ;# RS
(System32) 3 % proc prefix {prefix x} {return [list $prefix $x]}
(System32) 4 % interp alias {} 
wrong # args: should be "interp alias slavePath slaveCmd ?masterPath masterCmd? ?arg ...?"
(System32) 5 % interp alias {} prefixMark {} prefix mark
prefixMark
(System32) 6 % map prefixMark {x y z}
{mark x} {mark y} {mark z}
(System32) 7 %