12 lines
343 B
Text
12 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!"
|