shithub: MicroHs

ref: 4bfbc3d969f7a427d0b95d0ad681ae4f0ca2aa83
dir: /lib/Control/Error.hs/

View raw version 
-- Copyright 2023 Lennart Augustsson
-- See LICENSE file for full license.
module Control.Error(module Control.Error) where
import Prelude()              -- do not import Prelude
import Primitives
import Data.Char_Type

error :: forall a . String -> a
error = primError

undefined :: forall a . a
undefined = error "undefined"