Tcl Source Code

Check-in [1ee716a733]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Use the same shebang comment everywhere
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-4-branch
Files: files | file ages | folders
SHA1: 1ee716a733de06892c68bd2c5e2cf3db1a6f145a
User & Date: jan.nijtmans 2011-11-29 20:09:09
Context
2011-11-30
20:45
[Bug 967195]: Make tcltest work when tclsh is compiled without using the setargv() function on mingw... check-in: e695c3505c user: jan.nijtmans tags: core-8-4-branch
06:01
Use the same shebang comment everywhere don't install tommath_(super)?class.h don't install director... check-in: 8bc09f09f9 user: jan.nijtmans tags: core-8-5-branch
2011-11-29
20:09
Use the same shebang comment everywhere check-in: 1ee716a733 user: jan.nijtmans tags: core-8-4-branch
2011-11-22
07:59
[Bug 2935503]: Windows: file mtime sets wrong time check-in: 18d103467f user: jan.nijtmans tags: core-8-4-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to ChangeLog.







1
2
3
4
5
6
7






2011-11-22  Jan Nijtmans  <[email protected]>

	* generic/tclCmdAH.c:   [Bug 2935503] Windows: file mtime
	* generic/tclIOUtil.c:  sets wrong time

2011-10-11  Jan Nijtmans  <[email protected]>

>
>
>
>
>
>







1
2
3
4
5
6
7
8
9
10
11
12
13
2011-11-29  Jan Nijtmans  <[email protected]>

	* doc/tclsh.1:  Use the same shebang comment everywhere.
	* tools/str2c
	* tools/tcltk-man2html.tcl

2011-11-22  Jan Nijtmans  <[email protected]>

	* generic/tclCmdAH.c:   [Bug 2935503] Windows: file mtime
	* generic/tclIOUtil.c:  sets wrong time

2011-10-11  Jan Nijtmans  <[email protected]>

Changes to doc/tclsh.1.

64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
executable can be accessed with a short file name.
.PP
An even better approach is to start your script files with the
following three lines:
.CS
\fB#!/bin/sh
# the next line restarts using tclsh \e
exec tclsh "$0" "$@"\fR
.CE
This approach has three advantages over the approach in the previous
paragraph.  First, the location of the \fBtclsh\fR binary doesn't have
to be hard-wired into the script:  it can be anywhere in your shell
search path.  Second, it gets around the 30-character file name limit
in the previous approach.
Third, this approach will work even if \fBtclsh\fR is







|







64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
executable can be accessed with a short file name.
.PP
An even better approach is to start your script files with the
following three lines:
.CS
\fB#!/bin/sh
# the next line restarts using tclsh \e
exec tclsh "$0" ${1+"$@"}\fR
.CE
This approach has three advantages over the approach in the previous
paragraph.  First, the location of the \fBtclsh\fR binary doesn't have
to be hard-wired into the script:  it can be anywhere in your shell
search path.  Second, it gets around the 30-character file name limit
in the previous approach.
Third, this approach will work even if \fBtclsh\fR is

Changes to tools/str2c.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#! /bin/sh
#
# Transform text (.ps, .tcl,...) into a C string
#
# 1997/10 -- dl
#
# restart with tclsh \
exec tclsh8.0 "$0" "$@"

# Max string length
# (some C compiler have a 2048 chars limits (so 2047 real chars with
#  the tariling 0) so we use 2000 to make the count nice)
set MAX 2000

if {$argc} {







|







1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#! /bin/sh
#
# Transform text (.ps, .tcl,...) into a C string
#
# 1997/10 -- dl
#
# restart with tclsh \
exec tclsh "$0" ${1+"$@"}

# Max string length
# (some C compiler have a 2048 chars limits (so 2047 real chars with
#  the tariling 0) so we use 2000 to make the count nice)
set MAX 2000

if {$argc} {

Changes to tools/tcltk-man2html.tcl.

1
2
3
4
5
6
7
8
9
10
#!/bin/sh
# The next line is executed by /bin/sh, but not tcl \
exec tclsh8.4 "$0" ${1+"$@"}

package require Tcl 8.4

# Convert Ousterhout format man pages into highly crosslinked
# hypertext.
#
# Along the way detect many unmatched font changes and other odd


|







1
2
3
4
5
6
7
8
9
10
#!/bin/sh
# The next line is executed by /bin/sh, but not tcl \
exec tclsh "$0" ${1+"$@"}

package require Tcl 8.4

# Convert Ousterhout format man pages into highly crosslinked
# hypertext.
#
# Along the way detect many unmatched font changes and other odd