然后是 Oz 关键字

Question

我正在尝试编写一个分词器，但遇到解析错误：

%*************************** parse error ************************
%**
%** syntax error, unexpected T_DEFAULT, expecting T_then
%**
%** in file "/Users/xxx/Programmering/Oz/Oving1/Oz_oving1_task8.oz", line 15, column 36
%** ------------------ rejected (1 error)

这是代码，我用 %=ERROR=% 标记了第 15 行和第 36 列

declare
fun {Tokenize L} 
   Keys Ops Token
in
   Keys = ["local", "in", "if", "then", "else", "end"]
   Ops = ["+", "-", "*", "/"]

   case Tokenize of Head|Tail then
      if {Member Head Keys} then
  Token = key(Head)
      elseif {Member Head Ops} then
  Token = op(Head)
      else
  case Head of Forste|_ then
     if Forste >= &a andthen Forste <= &z then % THIS IS LINE 15, COLUMN 36 = ..andthen [here]Forste..
        Token = atom(Forste)
     elseif
        Forste >= &A andthen Forste <= &Z then
        Token = id(Forste)
     end
  end
  Token | {Tokenize Tail}
      end
   else
      nil
   end
end

知道我做错了什么吗？

Answer 1

我已经找到了解决方案：

• 我的列表在每个元素之间应该有空格而不是逗号 (,)。

• 在《奥兹国》中，你会写 >= 然后 =<，而不是像我一样写 >= 然后 <= (>在 = 的反面）。

• 我在 Tokenize 上创建了一个 case，case 应该位于输入 L 上。

干杯!