1 /* vim: set noexpandtab tabstop=4 shiftwidth=4 wrap:
2 *----------------------------------------------------------------------------
4 *----------------------------------------------------------------------------
5 * This file is part of jacu.
7 * jacu is free software; you can redistribute it and/or modify it under the
8 * terms of the GNU General Public License as published by the Free Software
9 * Foundation; either version 2 of the License, or (at your option) any later
12 * jacu is distributed in the hope that it will be useful, but WITHOUT ANY
13 * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
14 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
17 * You should have received a copy of the GNU General Public License along
18 * with jacu; if not, write to the Free Software Foundation, Inc., 59 Temple
19 * Place, Suite 330, Boston, MA 02111-1307 USA
20 *----------------------------------------------------------------------------
21 * Creado: lun jun 21 13:55:48 ART 2004
22 * Autores: Leandro Lucarella <llucare@fi.uba.ar>
23 *----------------------------------------------------------------------------
25 * $Id: vfile.c 748 2004-06-21 00:46:08Z llucare $
29 #include "zerogrouping.h"
35 * Prueba de agrupador de ceros.
39 int main(int argc, char* argv[])
41 size_t pagesize = BUFSIZ;
45 if (argc > 1) pagesize = atoi(argv[1]);
46 if (!(page = malloc(pagesize))) return 1;
47 if (!(pageout = malloc(pagesize/2+pagesize+1))) /* por si se expande */
52 while ((len = fread(page, 1, pagesize, stdin)))
54 len = zg_group(pageout, page, len);
55 fwrite(pageout, 1, len, stdout);