mirror of
https://github.com/roc-lang/roc.git
synced 2025-07-24 06:55:15 +00:00
25 lines
396 B
Text
25 lines
396 B
Text
app "expects-test"
|
|
packages { pf: "zig-platform/main.roc" }
|
|
imports []
|
|
provides [main] to pf
|
|
|
|
expect
|
|
a = 1
|
|
b = 2
|
|
|
|
a == b
|
|
|
|
polyDbg = \x ->
|
|
dbg x
|
|
x
|
|
|
|
main =
|
|
x = 42
|
|
expect x != x
|
|
dbg x
|
|
dbg "Fjoer en ferdjer frieten oan dyn geve lea"
|
|
|
|
r = {x : polyDbg "abc", y: polyDbg 10u8, z : polyDbg (A (B C))}
|
|
|
|
when r is
|
|
_ -> "Program finished!\n"
|