diff options
author | Ben Elliston <bje@gnu.org> | 2003-08-07 04:11:01 +0000 |
---|---|---|
committer | Ben Elliston <bje@gnu.org> | 2003-08-07 04:11:01 +0000 |
commit | 9a6dea036a574bcb2a7cff149a2938950cd6b8e2 (patch) | |
tree | e11a424dbde5bf40727cb63e71126f07fe9a3705 /lib | |
parent | 360dd4f6262ca54ea33bf745ff5559a913748a46 (diff) | |
download | dejagnu-9a6dea036a574bcb2a7cff149a2938950cd6b8e2.zip dejagnu-9a6dea036a574bcb2a7cff149a2938950cd6b8e2.tar.gz dejagnu-9a6dea036a574bcb2a7cff149a2938950cd6b8e2.tar.bz2 |
* lib/remote.exp: Replace "TCL" with "Tcl".
Diffstat (limited to 'lib')
-rw-r--r-- | lib/remote.exp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/remote.exp b/lib/remote.exp index 0b3748e..537e606 100644 --- a/lib/remote.exp +++ b/lib/remote.exp @@ -75,7 +75,7 @@ proc remote_raw_open { args } { # the kill command will be invoked. # proc local_exec { commandline inp outp timeout } { - # TCL's exec is a pile of crap. It does two very inappropriate things + # Tcl's exec is a pile of crap. It does two very inappropriate things # firstly, it has no business returning an error if the program being # executed happens to write to stderr. Secondly, it appends its own # error messages to the output of the command if the process exits with @@ -111,7 +111,7 @@ proc local_exec { commandline inp outp timeout } { } set use_tee 0 - # We add |& cat so that TCL exec doesn't freak out if the + # We add |& cat so that Tcl exec doesn't freak out if the # program writes to stderr. if { $outp == "" } { set outp "|& cat" @@ -175,7 +175,7 @@ proc local_exec { commandline inp outp timeout } { # Uuuuuuugh. Now I'm getting really sick. # If we didn't get an EOF, we have to kill the poor defenseless program. - # However, TCL has no kill primitive, so we have to execute an external + # However, Tcl has no kill primitive, so we have to execute an external # command in order to execute the execution. (English. Gotta love it.) if { ! $got_eof } { verbose "killing $pid $pgid" |