1 2 3 4 5 6 7 8 9
#!/usr/local/bin/tclsh set CTMname src-cur set CTMref $CTMSW/../$CTMname set CTMcopy /c/phk/20R/usr/src set CTMdont {\.core$|/CVS$|/CVS/|^/secure|^/eBones|/#cvs|/\.#} set CTMtest 1 set CTMspecial 1 set CTMsuff R20