如何在Oz中创建列表?

我正在尝试使用以下代码在Oz中创建一个列表:
local Loop10 Xs in
   proc {Loop10 I}
      Xs={List.append Xs I}
      if I == 10 then skip
      else
     {Browse I}
     {Loop10 I+1}
      end
      {Browse Xs}
   end
{Loop10 0}
end
Mozart编译器显示代码已被接受,但没有打开“浏览”窗口。我要做的就是在Oz中创建一个列表。 代码有什么问题?     
已邀请:
不确定这是你想要的,但要创建一个X和Y之间所有整数的列表(包括)你可以这样做:
local
   fun {Loop From To}
      if From > To
      then nil
      else From | {Loop From+1 To}
      end
   end
in
   {Browse {Loop 0 10}} % Displays: [0,1,2,3,4,5,6,7,8,9,10]
end
    
您还没有获得任何浏览器窗口的原因是因为评估线程因此行而暂停:
Xs={List.append Xs I}
如前所述,变量只能分配一次,但此行还有其他错误。 你试图将
Xs
追加到我但
Xs
仍然没有绑定。因此,线程暂停,直到将值赋给
Xs
。 以交互方式输入:
declare Xs in
{Browse {List.append Xs [2 3 4]}}
如您所见,没有任何浏览器打开。现在输入:
Xs= [1]
由于
Xs
成为绑定,它解锁第一个评估“线程”,浏览器将弹出。 附:对于迟到的回答,我很抱歉,我对Oz感兴趣:P     

要回复问题请先登录注册