S-expressions: Difference between revisions
m
→{{header|Haskell}}
(→{{header|Haskell}}: Additional output, expression serialized from parse tree.) |
|||
Line 3,133:
treeFromVal v = Node v []
litVal (Symbol x) = x
Line 3,144 ⟶ 3,140:
litVal (String x) = '"' : x <> "\""
litVal (List [List xs]) = litVal (List xs)
litVal (List xs) =
------------------------- GENERIC ------------------------
|