mklinks

tcl是工具命令语言

    $ZIP concat.n
fi
if test -r continue.n; then
    rm -f continue.n.*
    $ZIP continue.n
fi
if test -r dde.n; then
    rm -f dde.n.*
    $ZIP dde.n
fi
if test -r encoding.n; then
    rm -f encoding.n.*
    $ZIP encoding.n
fi
if test -r eof.n; then
    rm -f eof.n.*
    $ZIP eof.n
fi
if test -r error.n; then
    rm -f error.n.*
    $ZIP error.n
fi
if test -r eval.n; then
    rm -f eval.n.*
    $ZIP eval.n
fi
if test -r exec.n; then
    rm -f exec.n.*
    $ZIP exec.n
fi
if test -r exit.n; then
    rm -f exit.n.*
    $ZIP exit.n
fi
if test -r expr.n; then
    rm -f expr.n.*
    $ZIP expr.n
fi
if test -r fblocked.n; then
    rm -f fblocked.n.*
    $ZIP fblocked.n
fi
if test -r fconfigure.n; then
    rm -f fconfigure.n.*
    $ZIP fconfigure.n
fi
if test -r fcopy.n; then
    rm -f fcopy.n.*
    $ZIP fcopy.n
fi
if test -r file.n; then
    rm -f file.n.*
    $ZIP file.n
fi
if test -r fileevent.n; then
    rm -f fileevent.n.*
    $ZIP fileevent.n
fi
if test -r filename.n; then
    rm -f filename.n.*
    $ZIP filename.n
fi
if test -r flush.n; then
    rm -f flush.n.*
    $ZIP flush.n
fi
if test -r for.n; then
    rm -f for.n.*
    $ZIP for.n
fi
if test -r foreach.n; then
    rm -f foreach.n.*
    $ZIP foreach.n
fi
if test -r format.n; then
    rm -f format.n.*
    $ZIP format.n
fi
if test -r gets.n; then
    rm -f gets.n.*
    $ZIP gets.n
fi
if test -r glob.n; then
    rm -f glob.n.*
    $ZIP glob.n
fi
if test -r global.n; then
    rm -f global.n.*
    $ZIP global.n
fi
if test -r history.n; then
    rm -f history.n.*
    $ZIP history.n
fi
if test -r http.n; then
    rm -f http.n.*
    $ZIP http.n
fi
if test -r if.n; then
    rm -f if.n.*
    $ZIP if.n
fi
if test -r incr.n; then
    rm -f incr.n.*
    $ZIP incr.n
fi
if test -r info.n; then
    rm -f info.n.*
    $ZIP info.n
fi
if test -r interp.n; then
    rm -f interp.n.*
    $ZIP interp.n
fi
if test -r join.n; then
    rm -f join.n.*
    $ZIP join.n
fi
if test -r lappend.n; then
    rm -f lappend.n.*
    $ZIP lappend.n
fi
if test -r library.n; then
    rm -f library.n.*
    $ZIP library.n
    rm -f auto_execok.n auto_execok.n.* 
    rm -f auto_import.n auto_import.n.* 
    rm -f auto_load.n auto_load.n.* 
    rm -f auto_mkindex.n auto_mkindex.n.* 
    rm -f auto_mkindex_old.n auto_mkindex_old.n.* 
    rm -f auto_qualify.n auto_qualify.n.* 
    rm -f auto_reset.n auto_reset.n.* 
    rm -f tcl_findLibrary.n tcl_findLibrary.n.* 
    rm -f parray.n parray.n.* 
    rm -f tcl_endOfWord.n tcl_endOfWord.n.* 
    rm -f tcl_startOfNextWord.n tcl_startOfNextWord.n.* 
    rm -f tcl_startOfPreviousWord.n tcl_startOfPreviousWord.n.* 
    rm -f tcl_wordBreakAfter.n tcl_wordBreakAfter.n.* 
    rm -f tcl_wordBreakBefore.n tcl_wordBreakBefore.n.* 
    ln $S library.n$Z auto_execok.n$Z 
    ln $S library.n$Z auto_import.n$Z 
    ln $S library.n$Z auto_load.n$Z 
    ln $S library.n$Z auto_mkindex.n$Z 
    ln $S library.n$Z auto_mkindex_old.n$Z 
    ln $S library.n$Z auto_qualify.n$Z 
    ln $S library.n$Z auto_reset.n$Z 
    ln $S library.n$Z tcl_findLibrary.n$Z 
    ln $S library.n$Z parray.n$Z 
    ln $S library.n$Z tcl_endOfWord.n$Z 
    ln $S library.n$Z tcl_startOfNextWord.n$Z 
    ln $S library.n$Z tcl_startOfPreviousWord.n$Z 
    ln $S library.n$Z tcl_wordBreakAfter.n$Z 
    ln $S library.n$Z tcl_wordBreakBefore.n$Z 
fi
if test -r lindex.n; then
    rm -f lindex.n.*
    $ZIP lindex.n
fi
if test -r linsert.n; then
    rm -f linsert.n.*
    $ZIP linsert.n
fi
if test -r list.n; then
    rm -f list.n.*
    $ZIP list.n
fi
if test -r llength.n; then
    rm -f llength.n.*
    $ZIP llength.n
fi
if test -r load.n; then
    rm -f load.n.*
    $ZIP load.n
fi
if test -r lrange.n; then
    rm -f lrange.n.*
    $ZIP lrange.n
fi
if test -r lreplace.n; then
    rm -f lreplace.n.*
    $ZIP lreplace.n
fi
if test -r lsearch.n; then
    rm -f lsearch.n.*
    $ZIP lsearch.n
fi
if test -r lset.n; then
    rm -f lset.n.*
    $ZIP lset.n
fi
if test -r lsort.n; then
    rm -f lsort.n.*
    $ZIP lsort.n
fi
if test -r memory.n; then
    rm -f memory.n.*
    $ZIP memory.n
fi
if test -r msgcat.n; then
    rm -f msgcat.n.*
    $ZIP msgcat.n
fi
if test -r namespace.n; then
    rm -f namespace.n.*
    $ZIP namespace.n
fi
if test -r open.n; then
    rm -f open.n.*
    $ZIP open.n
fi
if test -r package.n; then
    rm -f package.n.*
    $ZIP package.n
fi
if test -r packagens.n; then
    rm -f packagens.n.*
    $ZIP packagens.n
    rm -f pkg::create.n pkg::create.n.* 
    ln $S packagens.n$Z pkg::create.n$Z 
fi
if test -r pid.n; then
    rm -f pid.n.*
    $ZIP pid.n
fi
if test -r pkgMkIndex.n; then
    rm -f pkgMkIndex.n.*
    $ZIP pkgMkIndex.n
    rm -f pkg_mkIndex.n pkg_mkIndex.n.* 
    ln $S pkgMkIndex.n$Z pkg_mkIndex.n$Z 
fi
if test -r proc.n; then
    rm -f proc.n.*
    $ZIP proc.n
fi
if test -r puts.n; then
    rm -f puts.n.*
    $ZIP puts.n
fi
if test -r pwd.n; then
    rm -f pwd.n.*
    $ZIP pwd.n
fi
if test -r re_syntax.n; then
    rm -f re_syntax.n.*
    $ZIP re_syntax.n
fi
if test -r read.n; then
    rm -f read.n.*
    $ZIP read.n
fi
if test -r regexp.n; then
    rm -f regexp.n.*
    $ZIP regexp.n
fi
if test -r registry.n; then
    rm -f registry.n.*
    $ZIP registry.n
fi
if test -r regsub.n; then
    rm -f regsub.n.*
    $ZIP regsub.n
fi
if test -r rename.n; then
    rm -f rename.n.*
    $ZIP rename.n
fi
if test -r resource.n; then
    rm -f resource.n.*
    $ZIP resource.n
fi
if test -r return.n; then
    rm -f return.n.*
    $ZIP return.n
fi
if test -r safe.n; then
    rm -f safe.n.*
    $ZIP safe.n
    rm -f SafeBase.n SafeBase.n.* 
    ln $S safe.n$Z SafeBase.n$Z 
fi
if test -r scan.n; then
    rm -f scan.n.*
    $ZIP scan.n
fi
if test -r seek.n; then
    rm -f seek.n.*
    $ZIP seek.n
fi
if test -r set.n; then
    rm -f set.n.*
    $ZIP set.n
fi
if test -r socket.n; then
    rm -f socket.n.*
    $ZIP socket.n
fi
if test -r source.n; then
    rm -f source.n.*
    $ZIP source.n
fi
if test -r split.n; then
    rm -f split.n.*
    $ZIP split.n
fi
if test -r string.n; then
    rm -f string.n.*
    $ZIP string.n
fi
if test -r subst.n; then
    rm -f subst.n.*
    $ZIP subst.n
fi
if test -r switch.n; then
    rm -f switch.n.*
    $ZIP switch.n
fi
if test -r tclsh.1; then
    rm -f tclsh.1.*
    $ZIP tclsh.1
fi
if test -r tcltest.n; then
    rm -f tcltest.n.*
    $ZIP tcltest.n
fi
if test -r tclvars.n; then
    rm -f tclvars.n.*
    $ZIP tclvars.n
fi
if test -r tell.n; then
    rm -f tell.n.*
    $ZIP tell.n
fi
if test -r time.n; then
    rm -f time.n.*
    $ZIP time.n
fi
if test -r trace.n; then
    rm -f trace.n.*
    $ZIP trace.n
fi
if test -r unknown.n; then
    rm -f unknown.n.*
    $ZIP unknown.n
fi
if test -r unset.n; then
    rm -f unset.n.*
    $ZIP unset.n
fi
if test -r update.n; then
    rm -f update.n.*
    $ZIP update.n
fi
if test -r uplevel.n; then
    rm -f uplevel.n.*
    $ZIP uplevel.n
fi
if test -r upvar.n; then
    rm -f upvar.n.*
    $ZIP upvar.n
fi
if test -r variable.n; then
    rm -f variable.n.*
    $ZIP variable.n
fi
if test -r vwait.n; then
    rm -f vwait.n.*
    $ZIP vwait.n
fi
if test -r while.n; then
    rm -f while