NatMeta.borg

NatMeta.borg


{
Quote()::
    {
    returntrue():: true;
    c:quote(returntrue());
    eval(c)
    };

Symbol()::
    {
    symbol("test")~quote(test)
    };

VOI()::is_voi(void);
REF()::is_ref(make_ref("test"));
APL()::is_apl(make_apl(1,2));
ANY()::is_any(any);
NMG()::is_nmg(nomesg);
NAT()::is_nat(tag);
TAB()::is_tab([10,20,30]);
FUN()::is_fun(FUN);
TXT()::is_txt("hallowa");
FRC()::is_frc(30.5);
NBR()::is_nbr(30);
MES()::is_mes(make_mes(10,20));
DEF()::is_def(make_def(10,20));
DCL()::is_dcl(make_dcl(20,30));

ITEM("quote",Quote,1);
ITEM("symbol",Symbol,1);
ITEM("voi",VOI,1);
ITEM("ref",REF,1);
ITEM("apl",APL,1);
ITEM("any",ANY,1);
ITEM("nmg",NMG,1);
ITEM("nat",NAT,1);
ITEM("tab",TAB,1);
ITEM("fun",FUN,1);
ITEM("txt",TXT,1);
ITEM("frc",FRC,1);
ITEM("nbr",NBR,1);
ITEM("mes",MES,1);
ITEM("def",DEF,1);
ITEM("dcl",DCL,1)
}