mirror of
https://github.com/roc-lang/roc.git
synced 2025-12-22 08:08:28 +00:00
50 lines
818 B
Markdown
50 lines
818 B
Markdown
# META
|
|
~~~ini
|
|
description=Simple lambda execution test to verify basic functionality works
|
|
type=expr
|
|
~~~
|
|
# SOURCE
|
|
~~~roc
|
|
(|x| x + 1)(5)
|
|
~~~
|
|
# EXPECTED
|
|
NIL
|
|
# PROBLEMS
|
|
NIL
|
|
# TOKENS
|
|
~~~zig
|
|
OpenRound,OpBar,LowerIdent,OpBar,LowerIdent,OpPlus,Int,CloseRound,NoSpaceOpenRound,Int,CloseRound,
|
|
EndOfFile,
|
|
~~~
|
|
# PARSE
|
|
~~~clojure
|
|
(e-apply
|
|
(e-tuple
|
|
(e-lambda
|
|
(args
|
|
(p-ident (raw "x")))
|
|
(e-binop (op "+")
|
|
(e-ident (raw "x"))
|
|
(e-int (raw "1")))))
|
|
(e-int (raw "5")))
|
|
~~~
|
|
# FORMATTED
|
|
~~~roc
|
|
NO CHANGE
|
|
~~~
|
|
# CANONICALIZE
|
|
~~~clojure
|
|
(e-call
|
|
(e-lambda
|
|
(args
|
|
(p-assign (ident "x")))
|
|
(e-binop (op "add")
|
|
(e-lookup-local
|
|
(p-assign (ident "x")))
|
|
(e-num (value "1"))))
|
|
(e-num (value "5")))
|
|
~~~
|
|
# TYPES
|
|
~~~clojure
|
|
(expr (type "a where [a.from_numeral : Numeral -> Try(a, [InvalidNumeral(Str)])]"))
|
|
~~~
|