Of course, I tried that before sending a bug,
but it doesn't work.
For example,
> getCh = do {hSetBuffering stdin NoBuffering;
> hSetEcho stdin False;
> x <- getChar;
> hSetEcho stdin True;
> return x}
> getMyLine = do {x <- getCh;
> if x=='\n' then
> do {putChar x; return ""}
> else
> do {if x=='b' then
> putStr "\b \b"
> else putChar x;
> xs <- getMyLine;
> return (x:xs)} }
doesn't work in the expected way.
Hugs wrote:
#78: getCh
----------------------+-----------------------------------------------------
Reporter: guest | Owner: nobody
Type: defect | Status: closed
Priority: minor | Milestone:
Component: hugs | Version: 200609
Resolution: wontfix | Keywords:
----------------------+-----------------------------------------------------
Changes (by ross):
* status: new => closed
* resolution: => wontfix
Comment:
It was a Hugs-only function, and now it's gone. You should be able to get
the same effect with `hSetBuffering` and `hSetEcho` (from `System.IO`).
------------------------------------------------------------------------
_______________________________________________
Hugs-Bugs mailing list
Hugs-Bugs@haskell.org
http://www.haskell.org/mailman/listinfo/hugs-bugs
_______________________________________________
Hugs-Bugs mailing list
Hugs-Bugs@haskell.org
http://www.haskell.org/mailman/listinfo/hugs-bugs