OSDN Git Service
(root)
/
joypy
/
Thun.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
9220361
)
Empty string is not an unknown word.
author
sforman
<sforman@hushmail.com>
Sat, 29 Jul 2023 19:11:43 +0000
(12:11 -0700)
committer
sforman
<sforman@hushmail.com>
Sat, 29 Jul 2023 19:11:43 +0000
(12:11 -0700)
implementations/Elm/src/Joy.elm
patch
|
blob
|
history
diff --git
a/implementations/Elm/src/Joy.elm
b/implementations/Elm/src/Joy.elm
index
4338129
..
dac5dbe
100644
(file)
--- a/
implementations/Elm/src/Joy.elm
+++ b/
implementations/Elm/src/Joy.elm
@@
-36,6
+36,7
@@
joy stack expression =
joy_eval : String -> JList -> JList -> Result String (JList, JList)
joy_eval symbol stack expression =
case symbol of
+ "" -> Ok (stack, expression)
"branch" -> joy_branch stack expression
"i" -> joy_i stack expression