Copyright (C) 1994, Digital Equipment Corp.
by Steve Glassman, Mark Manasse and Greg Nelson
<*PRAGMA LL*> UNSAFE INTERFACEModule which accepts input from X, and filters the result onto a local event queueXInput ;
IMPORT XClient; PROCEDURE Start (trsl: XClient.T; stackSize := 20000);
for the given XClient, fork a thread which checks when input from X has arrived. Then fork another thread which accepts the input, and filters the result onto the input queue in the XClient
END XInput.