The current necromancy would probably be:
import System.IO.Unsafe
import System.IO
myReadFile :: String -> String
myReadFile fname =
unsafePerformIO $ readFile fname `catch` const (return "")
On which subject allow me to comment that zombies smell bad.
/g
On 12/11/06, Rahul Naik <[EMAIL PROTECTED]> wrote:
Hello,
I am trying to rewrite some older (2001) haskell :
myReadFile :: String -> String
myReadFile f = case hugsIORun (readFile f) of
Right s -> s
Left _ -> ""
Can someone provide me with a up to date version of the above
bit of code without using code from the old Prelude?
Thanks,
R
_________________________________________________________________
Visit MSN Holiday Challenge for your chance to win up to $50,000 in Holiday
cash from MSN today!
http://www.msnholidaychallenge.com/index.aspx?ocid=tagline&locale=en-us
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe
--
It is myself I have never met, whose face is pasted on the underside of my mind.
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe
