test_30.mils

一个内存数据库的源代码这是服务器端还有客户端

setoid(oid(20000000));
# definition and use of Monet procs and variables
# Note that complex procs should normally be prepared in block mode.

unknown("hello");

#simple procedure with withdrawal
proc c() : void { "clock".print();}
c();
undef c;
c();

# block administration

# how about variables in a block
{ var i:=123; print(i);}

# and in a procedure
# we choose variables names containint 'z' since there are not
# standard variable names that contain 'z'
proc xyz() : void {var z1; z1:=23; var z2:=234; vars("z");}
xyz();
quit();