Empty string is not an unknown word.
This commit is contained in:
parent
9220361871
commit
4d6230e01d
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Reference in New Issue