------------------------------------------------------------------------
-- The Agda standard library
--
-- Basic definitions for Characters
------------------------------------------------------------------------
module Data.Char.Base where

open import Data.Nat.Base    using ()
open import Data.Bool.Base   using (Bool)
open import Data.String.Base using (String)

------------------------------------------------------------------------
-- Re-export the type from the Core module

open import Data.Char.Core using (Char) public

------------------------------------------------------------------------
-- Primitive operations

primitive
  primCharToNat    : Char  
  primCharEquality : Char  Char  Bool
  primShowChar     : Char  String

show : Char  String
show = primShowChar

toNat : Char  
toNat = primCharToNat