21 lines
406 B
C
21 lines
406 B
C
#include "tlang.h"
|
|
|
|
|
|
tobject_t* __break_node_exec(node_t* n,scope_t* sc,retarg_t* retArg)
|
|
{
|
|
retArg->isBreaking=true;
|
|
return tobject_basic(sc->rt,tnull);
|
|
}
|
|
void __node_none_free(node_t* n)
|
|
{
|
|
|
|
}
|
|
node_t* node_break_create()
|
|
{
|
|
node_t* node = (node_t*)malloc(sizeof(node_t));
|
|
node->type = breaknode;
|
|
|
|
node->execute = __break_node_exec;
|
|
node->free = __node_none_free;
|
|
return node;
|
|
} |