30 lines
785 B
Text
30 lines
785 B
Text
---input---
|
|
((compile (let [a 1] ~(+ ,a 1))))
|
|
|
|
---tokens---
|
|
'(' Punctuation
|
|
'(' Punctuation
|
|
'compile' Name.Function
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let' Name.Builtin
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'a' Name.Variable
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Float
|
|
']' Punctuation
|
|
' ' Text.Whitespace
|
|
'~' Operator
|
|
'(' Punctuation
|
|
'+' Name.Function
|
|
' ' Text.Whitespace
|
|
',' Operator
|
|
'a' Name.Variable
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Float
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n' Text.Whitespace
|