13 lines
343 B
Text
13 lines
343 B
Text
|
module hello-world 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!"
|