shithub: MicroHs

ref: 2ab39f5ee3ec52d097989ec8fecac0f6a7c12b16
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"