luau/prototyping/FFI/Data/Bool.agda
2022-02-03 17:45:22 -06:00

8 lines
207 B
Agda

module FFI.Data.Bool where
{-# FOREIGN GHC import qualified Data.Bool #-}
data Bool : Set where
false : Bool
true : Bool
{-# COMPILE GHC Bool = data Data.Bool.Bool (Data.Bool.True|Data.Bool.False) #-}