import System.IO
import Data.Char
main = do
hSetEcho stdin False
hSetBuffering stdin NoBuffering
hSetBuffering stdout NoBuffering
scanLine
where scanLine = do
c <- hGetChar stdin
putChar . toUpper $ c
scanLine
Am Sonntag, den 31.01.2010, 19:17 +1030 schrieb Mark Spezzano:
> Hi,
>
> Is there any way of trapping keystrokes in Haskell, modifying them, and then
> echoing?
>
> Basically I want to give the user a prompt like:
> >
>
> and then have whatever they type appear in UPPERCASE regardless of whether
> caps lock was on or not.
>
> By default Haskell seems to echo characters in whatever case they were typed.
> I want to sneak in a toUpper in before the Chars get echoed.
>
> Thanks
>
> Mark Spezzano
>
>
> _______________________________________________
> Haskell-Cafe mailing list
> Haskell-Cafe@haskell.org
> http://www.haskell.org/mailman/listinfo/haskell-cafe
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe
