7 lines
109 B
Tcl
7 lines
109 B
Tcl
$ tclsh
|
|
% proc f {s1 s2 sep} {
|
|
append result $s1 $sep $sep $s2
|
|
}
|
|
% f Rosetta Code :
|
|
Rosetta::Code
|
|
% exit
|