id.605953.mal

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

# Monet Mil to Mal compiler
# Copyright (c) 2001-2004, CWI. All rights reserved.

#Predefined code segment
#The compiler can not guarantee an accurate compilation,
#because MIL unlike MAL is a dynamically typed language.
#A few guidelines to maximize usefullness.
#- make the type of variables explicit, in particular 'nil'
#- upon advice of M2m to remap identifiers, change it in your program directly
#use the "mil_schema" for additional support routines
	t := bat.new(nil:oid,nil:str);
	aa_a := calc.oid(0);
	ba_a := bat.insert(t,aa_a,"a");
	ca_a := calc.oid(1);
	da_a := bat.insert(t,ca_a,"b");
	ea_a := calc.oid(2);
	fa_a := bat.insert(t,ea_a,"c");
	ga_a := calc.oid(3);
	ha_a := bat.insert(t,ga_a,"d");
	ia_a := calc.oid(4);
	ja_a := bat.insert(t,ia_a,"e");
	ka_a := calc.oid(5);
	la_a := bat.insert(t,ka_a,"f");
	ma_a := calc.oid(6);
	na_a := bat.insert(t,ma_a,"g");
	oa_a := calc.oid(7);
	pa_a := bat.insert(t,oa_a,"h");
	qa_a := algebra.markT(t,nil:oid);
	ra_a := io.print(t);
	t2 := bat.new(nil:void,nil:str);
	ua_a := nil:void;
	va_a := bat.insert(t2,ua_a,"a");
	wa_a := nil:void;
	xa_a := bat.insert(t2,wa_a,"b");
	ya_a := nil:void;
	ab_a := bat.insert(t2,ya_a,"c");
	bb_a := nil:void;
	cb_a := bat.insert(t2,bb_a,"d");
	db_a := nil:void;
	eb_a := bat.insert(t2,db_a,"e");
	fb_a := nil:void;
	gb_a := bat.insert(t2,fb_a,"f");
	hb_a := nil:void;
	ib_a := bat.insert(t2,hb_a,"g");
	jb_a := nil:void;
	kb_a := bat.insert(t2,jb_a,"h");
	lb_a := algebra.markT(t2,nil:oid);
	mb_a := io.print(lb_a);
#Identifer 'seqbase' mapped to 'bat.setSequenceBase'