~aleteoryx/tclircc

ref: 3a97dad35c3ce996e0b1df7ddcf6bffc03f22cd3 tclircc/src/util.tcl -rw-r--r-- 137 bytes
3a97dad3Aleteoryx sqlite3 debump for debian environment 8 days ago
                                                                                
1
2
3
4
5
set randchan [tcl::chan::random [tcl::randomseed]]
proc rand_hex {} {
  global randchan
  return [binary encode hex [read randchan 8]]
}