mirror of
https://github.com/luau-lang/luau.git
synced 2024-11-16 06:45:44 +08:00
041838a942
* First cut reading JSON into an Agda representation of Luau syntax
9 lines
241 B
Agda
9 lines
241 B
Agda
module FFI.Data.Maybe where
|
|
|
|
{-# FOREIGN GHC import qualified Data.Maybe #-}
|
|
|
|
data Maybe (A : Set) : Set where
|
|
nothing : Maybe A
|
|
just : A → Maybe A
|
|
{-# COMPILE GHC Maybe = data Data.Maybe.Maybe (Data.Maybe.Nothing|Data.Maybe.Just) #-}
|