Mercurial > hg > Gears > GearsAgda
comparison src/parallel_execution/origin_cs.c @ 141:4f6a660c14a1 stack-interface
stack interface worked
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Wed, 09 Nov 2016 15:43:22 +0900 |
parents | f31b4e4bf4bb |
children | bd11fa6891b6 |
comparison
equal
deleted
inserted
replaced
140:f31b4e4bf4bb | 141:4f6a660c14a1 |
---|---|
1 #include <stdlib.h> | 1 #include <stdlib.h> |
2 #include <stdio.h> | 2 #include <stdio.h> |
3 #include "context.h" | 3 #include "context.h" |
4 | 4 |
5 __code meta(struct Context* context, enum Code next) { | 5 __code meta(struct Context* context, enum Code next) { |
6 printf("meta %d\n",next); | 6 // printf("meta %d\n",next); |
7 goto (context->code[next])(context); | 7 goto (context->code[next])(context); |
8 } | 8 } |
9 | 9 |
10 __code start_code(struct Context* context) { | 10 __code start_code(struct Context* context) { |
11 goto meta(context, context->next); | 11 goto meta(context, context->next); |