Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | fixed a typo in the name of the -verbose flag |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
2d83613c9519e46c91c1fb8491206efe |
| User & Date: | escoffon 1998-07-14 14:49:54.000 |
Context
|
1998-07-15
| ||
| 11:08 | Added check for precompiled ByteCodes, to avoid recompilation if the epoch has changed in the interp... check-in: dcf1220ab8 user: escoffon tags: trunk | |
|
1998-07-14
| ||
| 14:49 | fixed a typo in the name of the -verbose flag check-in: 2d83613c95 user: escoffon tags: trunk | |
| 10:34 | rolled back the check for compiled procs in Tcl_ProcObjCmd, do the unsharing even for compiled procs... check-in: a3578ade10 user: escoffon tags: trunk | |
Changes
Changes to library/init.tcl.
1 2 3 4 5 | # init.tcl -- # # Default system startup file for Tcl-based applications. Defines # "unknown" procedure and auto-load facilities. # | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 | # init.tcl -- # # Default system startup file for Tcl-based applications. Defines # "unknown" procedure and auto-load facilities. # # SCCS: %Z% $Id: init.tcl,v 1.7 1998/07/14 14:49:54 escoffon Exp $ # # Copyright (c) 1991-1993 The Regents of the University of California. # Copyright (c) 1994-1996 Sun Microsystems, Inc. # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # |
| ︙ | ︙ | |||
623 624 625 626 627 628 629 |
switch -glob -- $flag {
-- {
# done with the flags
incr idx
break
}
| | | 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 |
switch -glob -- $flag {
-- {
# done with the flags
incr idx
break
}
-verbose {
set doVerbose 1
}
-direct {
set direct 1
append more " -direct"
}
|
| ︙ | ︙ |