X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/1e4a85495eb5703c5c2caa0558e2bcfd548938f1..5c39a8b8061f2ae5c22a12e40d1b9f4ffea42c68:/emufs/tipo1.c

diff --git a/emufs/tipo1.c b/emufs/tipo1.c
index 17cfa53..0c3f32d 100644
--- 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 */