annotate Paper/src/interface.cbc @ 12:e20725cd6d8a default tip

fix slides
author ryokka
date Mon, 21 May 2018 00:29:29 +0900
parents bf2887cd22c1
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
1 typedef struct Stack<Type, Impl>{
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
2 union Data* stack;
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
3 union Data* data;
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
4 union Data* data1;
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
5
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
6 __code whenEmpty(...);
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
7 __code clear(Impl* stack,__code next(...));
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
8 __code push(Impl* stack,Type* data, __code next(...));
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
9 __code pop(Impl* stack, __code next(Type* data, ...));
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
10 __code get(Impl* stack, __code next(Type* data, ...));
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
11 __code next(...);
bf2887cd22c1 fix Paper
ryokka
parents:
diff changeset
12 } Stack;