15 lines
367 B
Agda
15 lines
367 B
Agda
|
{-# OPTIONS --guardedness #-}
|
|||
|
|
|||
|
module main where
|
|||
|
|
|||
|
open import Agda.Builtin.IO using (IO)
|
|||
|
open import Agda.Builtin.Unit using (⊤)
|
|||
|
open import Agda.Builtin.String using (String)
|
|||
|
|
|||
|
postulate putStrLn : String → IO ⊤
|
|||
|
{-# FOREIGN GHC import qualified Data.Text as T #-}
|
|||
|
{-# COMPILE GHC putStrLn = putStrLn . T.unpack #-}
|
|||
|
|
|||
|
main : IO ⊤
|
|||
|
main = putStrLn "Hello world!"
|