(PROGN (TYIPEEK -1) (READ)) If you then type a character, say an X, it does not get put into the redisplay buffer. Also, typing any whitespace will not cause the READ to return. However, some read macros and "(" or ")" will give completion.