Mercurial > hg > Papers > 2016 > kkb-master
view src/twice.c @ 12:2d6755608f67
revision
author | Shohei KOKUBO <e105744@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 15 Feb 2016 08:22:50 +0900 |
parents | |
children |
line wrap: on
line source
// Code Gear __code twice(struct Context* context, struct LoopCounter* loopCounter, int index, int alignment, int* array) { int i = loopCounter->i; if (i < alignment) { array[i+index*alignment] = array[i+index*alignment]*2; loopCounter->i++; goto meta(context, Twice); } loopCounter->i = 0; stack_pop(context->code_stack, &context->next); goto meta(context, context->next); } // Meta Code Gear(stub) __code twice_stub(struct Context* context) { goto twice(context, &context->data[LoopCounter]->loopCounter, context->data[Node]->node.value->array.index, context->data[Node]->node.value->array.alignment, context->data[Node]->node.value->array.array); }