--- gforth/kernel/io.fs 2000/08/17 12:46:59 1.18 +++ gforth/kernel/io.fs 2000/08/18 08:56:33 1.19 @@ -72,7 +72,7 @@ Defer key? ( -- flag ) \ facility key-qu \G Determine whether a character is available. If a character is \G available, @var{flag} is true; the next call to @code{key} will \G yield the character. Once @code{key?} returns true, subsequent -\G calls to @code{key?} without calling @code{key} or @code{ekey} will +\G calls to @code{key?} before calling @code{key} or @code{ekey} will \G also return true. [IFDEF] (key?) ' (key?) IS key? [THEN]