Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!wuarchive!cs.utexas.edu!uunet!mcsun!sunic!dkuug!ambush!leif
From: leif@ambush.dk (Leif Andrew Rump)
Newsgroups: comp.lang.pascal
Subject: Re: Clearing the keyboard buffer
Message-ID: <1559@ambush.dk>
Date: 5 Oct 89 08:39:54 GMT
References: <1169@krafla.rhi.hi.is>
Organization: AmbraSoft, Holte, Denmark
Lines: 12

This does the job!

  while keypressed do
    while readkey = #0 do
      (* nothing *);

And I don't need a dummy variable!

  Leif Andrew Rump, AmbraSoft A/S, Roejelskaer 15, DK-2840 Holte, Denmark
 UUCP: leif@ambra.dk, phone: +45 42424 111, touch phone: +45 42422 817+313

   > > > Why are tall Irish girls with red hair so wonderful ? ? ? < < <