#274 "gets stdin myinVar" fails

[Richard Uschold]

Here is a simple script to demonstrate the problem: I named it hello.tcl

#!/usr/brlcad//bin/tclsh

proc TstIn {} {
puts "Hello World"
gets stdin myinVar
puts "myinVar==$myinVar=="
}

--------------------------

Here is a screen trace running it:

mged> source hello.tcl
mged> TstIn
Hello World
my input
myinVar==Hello World==
mged>

-----------------------

Notice that the data I entered was "my input", which should be set to myinVar
However, the 'puts "myinVar==$myinVar"' displays "Hello World"

Gilligan