Copyright (C) 1992, Digital Equipment Corporation
All rights reserved.
See the file COPYRIGHT for a full description.
by Steve Glassman, Mark Manasse and Greg Nelson
Last modified on Mon Oct 26 16:55:02 PST 1992 by msm
modified on Mon Feb 24 13:59:46 PST 1992 by muller
<*PRAGMA LL*>
UNSAFE INTERFACE XInput;
Module which accepts input from X, and filters the result onto a local
event queue
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.