~aleteoryx/tclfeed-bsky

ref: 7582957d6d9620490936466c378b318af5f95bd2 tclfeed-bsky/src/algos.tcl -rw-r--r-- 200 bytes
7582957dAleteoryx hopefully make jetstream code a little less silent-failure-prone 28 days ago
                                                                                
1
2
3
4
5
6
7
8
9
namespace eval ::algos { variable list {} }

foreach file [glob src/algos/*.tcl] {
  source $file
}

foreach algo [namespace children ::algos] {
  lappend ::algos::list [lindex [split $algo :] end]
}