Minor cleanup.
This commit is contained in:
parent
e9f971460f
commit
af882e2be4
|
|
@ -261,8 +261,10 @@ dialect of Joy are defined in terms of these:
|
|||
|
||||
< > >= <= != <> =
|
||||
|
||||
and or xor (These are the bitwise ops.)
|
||||
lshift rshift
|
||||
|
||||
/\ \/ _\/_ (These are the logical ops. Booleans)
|
||||
|
||||
|
||||
--------------------------------------------------
|
||||
|
|
|
|||
|
|
@ -184,9 +184,9 @@ text_to_expression text = parse (tokenize text)
|
|||
|
||||
doit text =
|
||||
case text_to_expression text of
|
||||
Err msg -> Err msg
|
||||
Ok ast ->
|
||||
case joy [] ast of
|
||||
Err msg -> Err msg
|
||||
Ok expr -> Ok (joyExpressionToString expr)
|
||||
Err msg -> Err msg
|
||||
Err msg -> Err msg
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue