-
- /*
- printf("COMPACTANDO........\n");
- fp->compactar(fp);
-
-ver_archivo_FS(fp);
-
- for (j=1; j<40; j+=2){
- b_ptr = fp->leer_registro(fp, v[j], ®_size, &err);
- printf("Recuperado %d: %s\n",v[j], b_ptr);
- free(b_ptr);
- }
-
-/*
- for (j=1; j<8; j+=2){
- b_ptr = fp->leer_registro(fp, v[j], ®_size, &err);
- printf("Recuperado : %s\n", b_ptr);
- free(b_ptr);
- }
-
- printf("GRABANDO REGISTROS....\n");
- v[0] = fp->grabar_registro(fp, a, 100, &err);
- v[1] = fp->grabar_registro(fp, c, 100, &err);
- v[2] = fp->grabar_registro(fp, d, 100, &err);
- v[3] = fp->grabar_registro(fp, e, 100, &err);
- v[4] = fp->grabar_registro(fp, f, 100, &err);
- v[5] = fp->grabar_registro(fp, g, 100, &err);
- v[6] = fp->grabar_registro(fp, h, 100, &err);
- v[7] = fp->grabar_registro(fp, i, 100, &err);
- v[4] = fp->grabar_registro(fp, f, 100, &err);
- v[5] = fp->grabar_registro(fp, g, 100, &err);
- v[6] = fp->grabar_registro(fp, h, 100, &err);
- v[7] = fp->grabar_registro(fp, i, 100, &err);
-
-