Evaluated proc sr {s} {set r {}; set i [string len $s]; while {$i > 0} {append r [string index $s [incr i -1]]}; . $r}

This commit is contained in:
BureaucraticManager on #flashsupport
2023-09-02 15:31:47 -07:00
committed by dupa dup
parent 30c7898fdc
commit 166f22d6d2
2 changed files with 2 additions and 0 deletions

View File

@ -0,0 +1 @@
s {set r {}; set i [string len $s]; while {$i > 0} {append r [string index $s [incr i -1]]}; . $r}