21 int luaZ_fill (ZIO *z) {  in luaZ_fill()  argument
23   lua_State *L = z->L;  in luaZ_fill()
26   buff = z->reader(L, z->data, &size);  in luaZ_fill()
29   z->n = size - 1;  in luaZ_fill()
30   z->p = buff;  in luaZ_fill()
31   return char2int(*(z->p++));  in luaZ_fill()
35 int luaZ_lookahead (ZIO *z) {  in luaZ_lookahead()  argument
36   if (z->n == 0) {  in luaZ_lookahead()
37     if (luaZ_fill(z) == EOZ)  in luaZ_lookahead()
40       z->n++;  /* luaZ_fill removed first byte; put back it */  in luaZ_lookahead()
41       z->p--;  in luaZ_lookahead()
44   return char2int(*z->p);  in luaZ_lookahead()
48 void luaZ_init (lua_State *L, ZIO *z, lua_Reader reader, void *data) {  in luaZ_init()  argument
49   z->L = L;  in luaZ_init()
50   z->reader = reader;  in luaZ_init()
51   z->data = data;  in luaZ_init()
52   z->n = 0;  in luaZ_init()
53   z->p = NULL;  in luaZ_init()
58 size_t luaZ_read (ZIO *z, void *b, size_t n) {  in luaZ_read()  argument
61     if (luaZ_lookahead(z) == EOZ)  in luaZ_read()
63     m = (n <= z->n) ? n : z->n;  /* min. between n and z->n */  in luaZ_read()
64     memcpy(b, z->p, m);  in luaZ_read()
65     z->n -= m;  in luaZ_read()
66     z->p += m;  in luaZ_read()