11 lines
275 B
Plaintext
11 lines
275 B
Plaintext
!import "../../lib/base.tri" !Local
|
|
!import "../../lib/list.tri" !Local
|
|
!import "../../lib/io.tri" !Local
|
|
|
|
-- Greet and return a pure value.
|
|
-- putStrLn writes to stdout; pure lifts "done" into IO.
|
|
|
|
main = io <|
|
|
bind (putStrLn (append "Hello, " "tricu"))
|
|
(_ : pure "")
|