From af882e2be449b95c0fa0a0a71e6c9f630c0005b3 Mon Sep 17 00:00:00 2001 From: sforman Date: Sat, 29 Jul 2023 08:57:58 -0700 Subject: [PATCH] Minor cleanup. --- README.md | 2 ++ implementations/Elm/src/Joy.elm | 4 ++-- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/README.md b/README.md index 9065614..2bcad62 100644 --- a/README.md +++ b/README.md @@ -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) -------------------------------------------------- diff --git a/implementations/Elm/src/Joy.elm b/implementations/Elm/src/Joy.elm index 7486224..147f791 100644 --- a/implementations/Elm/src/Joy.elm +++ b/implementations/Elm/src/Joy.elm @@ -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 -- 2.11.0