mirror of
https://github.com/luau-lang/luau.git
synced 2024-12-13 05:20:38 +00:00
16 lines
449 B
Agda
16 lines
449 B
Agda
module FFI.Data.HaskellString where
|
|
|
|
open import Agda.Builtin.String using (String)
|
|
|
|
{-# FOREIGN GHC import qualified Data.String #-}
|
|
{-# FOREIGN GHC import qualified Data.Text #-}
|
|
|
|
postulate HaskellString : Set
|
|
{-# COMPILE GHC HaskellString = type Data.String.String #-}
|
|
|
|
postulate pack : HaskellString → String
|
|
{-# COMPILE GHC pack = Data.Text.pack #-}
|
|
|
|
postulate unpack : String → HaskellString
|
|
{-# COMPILE GHC unpack = Data.Text.unpack #-}
|
|
|