> specifically, HugsInternals attempts to import "unsafePerformIO" from
> IOExtensions, but that module doesn't export the item.
'Fraid so.
And if you're using HugsInternals, you're probably using CVHAssert too
which needs this patch:
diff -c -r1.3 CVHAssert.hs
*** CVHAssert.hs 1997/02/18 17:52:14 1.3
--- CVHAssert.hs 1998/02/12 18:53:56
***************
*** 65,73 ****
case kind of
Apply fun args -> do
! funarity <- arityOf fun
! return (funarity > length args)
!
_ -> return True
arityOf :: Cell -> IO Int
--- 65,74 ----
case kind of
Apply fun args -> do
! funkind <- classifyCell False fun
! case funkind of
! Fun nm -> return (nameArity nm > length args)
! _ -> return True
_ -> return True
arityOf :: Cell -> IO Int
