Exemplos de RML_TAGFIXNUM em C++ (Cpp)

Exemplo n.º 1

Arquivo: internal.c Projeto: choeger/MetaModelica-autotools

RML_END_LABEL

/* misc_tick.c */
RML_BEGIN_LABEL(RML__tick)
{
    static rml_sint_t counter;
    rmlA0 = RML_IMMEDIATE(RML_TAGFIXNUM(counter));
    ++counter;
    RML_TAILCALLK(rmlSC);
}

Exemplo n.º 2

Arquivo: external.c Projeto: SemiSQ/OpenModelica

RML_END_LABEL


RML_BEGIN_LABEL(External__strcmp)
{
	char *str1 = RML_STRINGDATA(rmlA0);
	char *str2 = RML_STRINGDATA(rmlA1);
	int result = strcmp(str1, str2);
	rmlA0 = RML_IMMEDIATE(RML_TAGFIXNUM(result));
	RML_TAILCALLK(rmlSC);
}

Exemplo n.º 3

Arquivo: list.c Projeto: choeger/MetaModelica-autotools

RML_END_LABEL


/* list_length.c */
RML_BEGIN_LABEL(RML__list_5flength)
{
    void *lst = rmlA0;
    rml_uint_t len = 0;
    for(; RML_GETHDR(lst) == RML_CONSHDR; ++len, lst = RML_CDR(lst))
	;
    rmlA0 = RML_IMMEDIATE(RML_TAGFIXNUM(len));
    RML_TAILCALLK(rmlSC);
}

Exemplo n.º 4

Arquivo: p-gccore.c Projeto: choeger/MetaModelica-autotools

void *mk_icon(int i) {
  return RML_IMMEDIATE(RML_TAGFIXNUM((rml_sint_t)i));
}