Commit 23eeb743 authored by sof's avatar sof
Browse files

[project @ 1998-08-14 13:08:18 by sof]

trivial syserr fix
parent 7d9d8a59
......@@ -12,7 +12,12 @@ import PrelIOBase -- IOError representation
import Addr
import Foreign
import CCall
import PrelBase
import PrelAddr
import PrelBase ( Int(..), Int#, (==#)
, newIntArray#, unsafeFreezeByteArray#, newCharArray#
, RealWorld
)
import MutableArray
import ByteArray
import Array
......@@ -64,7 +69,8 @@ errno.
syserr :: String -> IO a
syserr str = fail (IOError Nothing -- ToDo: better
SystemError
str)
str
"")
-- Allocate a mutable array of characters with no indices.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment