tst4600.mal

来自「一个内存数据库的源代码这是服务器端还有客户端」· MAL 代码 · 共 16 行

# the first test for macro expansions and inversions
function welcome(lim:int):void;
    i:= 0;
barrier j:= i<lim;
    io.print("Welcome");
    i:= i+1;
    redo j:= i<lim;
exit j;
end welcome;

optimizer.macro("user","welcome");

io.print("test expansion");
user.welcome(2);
mdb.list();