comparison src/parallel_execution/test/printIterator.cbc @ 401:408b4aab7610

Supported par goto iterate statement for perl script
author Tatsuki IHA <innparusu@cr.ie.u-ryukyu.ac.jp>
date Tue, 29 Aug 2017 21:50:57 +0900
parents
children e958a409943c
comparison
equal deleted inserted replaced
400:2d375c583064 401:408b4aab7610
1 #include "../../context.h"
2 #include <stdio.h>
3 __code printIterator(struct Integer* x, __code next(...)) {
4 printf("%d\n", x->value);
5 goto meta(context, next);
6 }
7
8 __code printIterator_stub(struct Context* context) {
9 goto printIterator(context,
10 &context->data[context->idg]->Integer,
11 context->next);
12 }