fork download

 
local MyMap in
MyMap = proc {$ Ls F R}
case Ls of
`|`(1:H 2:T) then local Res in
{F H Res}
local RestAns in
R=`|`(1:Res 2:RestAns)
{MyMap T F RestAns}
end
end
else R=nil
end
end
{MyMap MyList MyFun MyRes}
end

Mozart Compiler 1.4.0 (20080704) playing Oz 3

%%% feeding file prog.oz

%********************* binding analysis error *******************
%**
%** variable `|` not introduced
%**
%** in file "./prog.oz", line 5, column 0

%********************* binding analysis error *******************
%**
%** variable MyList not introduced
%**
%** in file "./prog.oz", line 15, column 7

%********************* binding analysis error *******************
%**
%** variable MyFun not introduced
%**
%** in file "./prog.oz", line 15, column 14

%********************* binding analysis error *******************
%**
%** variable MyRes not introduced
%**
%** in file "./prog.oz", line 15, column 20
%** ------------------ rejected (4 errors)

Standard output is empty