3 proc addpath {p before after default} {
5 if {[info exists lc]} {
10 set l [append $before $l $after]
14 addpath LD_LIBRARY_PATH {../base ../hbytes} {} {}
16 load ./chiark_tcl_cdb.so
19 # CURRENTLY TESTING WITH
21 # LD_LIBRARY_PATH=../base:../hbytes:. ../../sauce/convertdb test-out 0 db.addr-list.main db.addr-list.log
22 # LD_LIBRARY_PATH=../base:../hbytes:. strace ../../sauce/convertdb test-out 0 db.addr-list.main db.addr-list.log
23 # LD_LIBRARY_PATH=../base:../hbytes:. valgrind --db-attach=yes tclsh8.3 ../../sauce/convertdb test-out 0 db.addr-list.main db.addr-list.log