Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/LowB/PrimError.hs
module Prelude where import System import NonStdTrace import CExitWith primError :: String -> a primError xs = trace (xs++"\n") (cExitWith (ExitFailure (negate 1)))
