procesar = procesar_registro_tipo1;
break;
case T2:
- waddstr(padre, "Registro variable con sin bloques.");
+ waddstr(padre, "Registro variable sin bloques.");
procesar = procesar_registro_tipo2;
break;
case T3:
memset(salida, '.', *size);
PERR("Voy por el espacio antes");
+#ifdef DEBUG
fprintf(stderr, "Pos Inicial %d\n", *pos_actual);
+#endif
+ tmp = salida;
+ in = ptr;
for(i=0; i < *pos_actual; i++) {
- /* Los datos que tengo por ahora los pongo enmascarados! */
- copy_char(&salida[i], in);
+ copy_char(tmp, in);
in++;
+ tmp++;
}
- tmp = salida + *pos_actual;
- in = ptr + *pos_actual;
PERR("Voy por el header");
/* ID de registro */
i++;
}
PERR("Voy por el espacio despues");
+ for(i=0; i < 100-*pos_actual; i++) {
+ copy_char(tmp, in);
+ in++;
+ tmp++;
+ }
free(ptr);
PERR("LISTO");