seqlua
annotate seqlualib.h @ 0:47f9b323d68c
Initial commit
| author | jbe |
|---|---|
| date | Wed Aug 20 00:39:10 2014 +0200 (2014-08-20) |
| parents | |
| children | 144f0bddee2b |
| rev | line source |
|---|---|
| jbe@0 | 1 #include <lua.h> |
| jbe@0 | 2 #include <lauxlib.h> |
| jbe@0 | 3 |
| jbe@0 | 4 typedef struct { |
| jbe@0 | 5 lua_State *L; |
| jbe@0 | 6 int itertype; |
| jbe@0 | 7 lua_Integer i; |
| jbe@0 | 8 } seqlua_Iterator; |
| jbe@0 | 9 |
| jbe@0 | 10 extern void seqlua_iterinit(lua_State *L, seqlua_Iterator *iter, int idx); |
| jbe@0 | 11 |
| jbe@0 | 12 extern int seqlua_iternext(seqlua_Iterator *iter); |
| jbe@0 | 13 |
| jbe@0 | 14 #define seqlua_iterloop(L, iter, idx) \ |
| jbe@0 | 15 for ( \ |
| jbe@0 | 16 seqlua_iterinit((L), (iter), (idx)); \ |
| jbe@0 | 17 seqlua_iternext(iter); \ |
| jbe@0 | 18 lua_pop((L), 1) \ |
| jbe@0 | 19 ) |
| jbe@0 | 20 |
| jbe@0 | 21 #define seqlua_itercount(iter) ((iter)->i) |
| jbe@0 | 22 |
| jbe@0 | 23 extern void seqlua_iterclosure(lua_State *L, int idx); |
| jbe@0 | 24 |