* Se agregan compactar facturas y notas (notas no estoy seguro de tener

[z.facultad/75.06/emufs.git] / emufs / tipo1.c

diff --git a/emufs/tipo1.c b/emufs/tipo1.c
index 17cfa53e20795c3f387b60d66409dddb2b598174..0c3f32dd2b55b1ca075b671e8ff0b4500efb428a 100644 (file)
--- a/emufs/tipo1.c
+++ b/emufs/tipo1.c
@@ -467,6 +467,8 @@ void emufs_tipo1_compactar(EMUFS* efs)
                        free(reg);
                }
        }
+       free(reg_ids); /* libero lista de ids */
+
        /* truncamos el archivo si hay bloques libres al final */
        {
                EMUFS_FREE fs; /* espacio libre en el bloque */