|
|
@ -1,5 +1,5 @@ |
|
|
|
/*
|
|
|
|
** $Id: lzio.c,v 1.4 1998/12/28 13:44:54 roberto Exp roberto $ |
|
|
|
** $Id: lzio.c,v 1.5 1999/02/25 19:13:56 roberto Exp roberto $ |
|
|
|
** a generic input stream interface |
|
|
|
** See Copyright Notice in lua.h |
|
|
|
*/ |
|
|
@ -41,9 +41,10 @@ ZIO* zsopen (ZIO* z, char* s, char *name) |
|
|
|
|
|
|
|
/* -------------------------------------------------------------- FILEs --- */ |
|
|
|
|
|
|
|
static int zffilbuf (ZIO* z) |
|
|
|
{ |
|
|
|
int n=fread(z->buffer,1,ZBSIZE,z->u); |
|
|
|
static int zffilbuf (ZIO* z) { |
|
|
|
int n; |
|
|
|
if (feof(z->u)) return EOZ; |
|
|
|
n=fread(z->buffer,1,ZBSIZE,z->u); |
|
|
|
if (n==0) return EOZ; |
|
|
|
z->n=n-1; |
|
|
|
z->p=z->buffer; |
|
|
|