URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [insight/] [expect/] [example/] [read1char] - Blame information for rev 578


#!../expect --
 
# read a single character
# Author: Don Libes, NIST
 
stty raw
expect ?
send_user $expect_out(buffer)

Line No.	Rev	Author	Line
1	578	markom	`#!../expect --`
2
3			`# read a single character`
4			`# Author: Don Libes, NIST`
5
6			`stty raw`
7			`expect ?`
8			`send_user $expect_out(buffer)`