annotate paper/src/ex_stub @ 19:f311c7a14a62 default tip

add src
author mir3636
date Mon, 15 May 2017 18:50:34 +0900
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
19
f311c7a14a62 add src
mir3636
parents:
diff changeset
1 __code clearSingleLinkedStack(struct Context *context,struct SingleLinkedStack* stack,enum Code next) {
f311c7a14a62 add src
mir3636
parents:
diff changeset
2 stack->top = NULL;
f311c7a14a62 add src
mir3636
parents:
diff changeset
3 goto meta(context, next);
f311c7a14a62 add src
mir3636
parents:
diff changeset
4 }
f311c7a14a62 add src
mir3636
parents:
diff changeset
5
f311c7a14a62 add src
mir3636
parents:
diff changeset
6 __code clearSingleLinkedStack_stub(struct Context* context) {
f311c7a14a62 add src
mir3636
parents:
diff changeset
7 SingleLinkedStack* stack = (SingleLinkedStack*)GearImpl(context, Stack, stack);
f311c7a14a62 add src
mir3636
parents:
diff changeset
8 enum Code next = Gearef(context, Stack)->next;
f311c7a14a62 add src
mir3636
parents:
diff changeset
9 goto clearSingleLinkedStack(context, stack, next);
f311c7a14a62 add src
mir3636
parents:
diff changeset
10 }
f311c7a14a62 add src
mir3636
parents:
diff changeset
11