Empty string is not an unknown word.
This commit is contained in:
@@ -36,6 +36,7 @@ joy stack expression =
|
|||||||
joy_eval : String -> JList -> JList -> Result String (JList, JList)
|
joy_eval : String -> JList -> JList -> Result String (JList, JList)
|
||||||
joy_eval symbol stack expression =
|
joy_eval symbol stack expression =
|
||||||
case symbol of
|
case symbol of
|
||||||
|
"" -> Ok (stack, expression)
|
||||||
|
|
||||||
"branch" -> joy_branch stack expression
|
"branch" -> joy_branch stack expression
|
||||||
"i" -> joy_i stack expression
|
"i" -> joy_i stack expression
|
||||||
|
|||||||
Reference in New Issue
Block a user