+/* Manejo de la lista doble */
+static t_Reg_Articulo *crear_nodo_articulo(EMUFS_REG_ID reg, unsigned int num);
+static int agregar_nodo_articulo(t_LstArticulos *lst, t_Reg_Articulo *nodo);
+static int eliminar_nodo_articulo(t_LstArticulos *lst, t_Reg_Articulo *nodo);
+
+int eliminar_nodo_articulo(t_LstArticulos *lst, t_Reg_Articulo *nodo)
+{
+ if (nodo == NULL) return 0;
+ if (nodo->ant == NULL) {
+ /* Me piden borrar el primer nodo */
+ if (nodo->sig) {
+ nodo->sig->ant = NULL;
+ }
+ lst->primero = nodo->sig;
+ } else {
+ if (nodo->sig) {
+ nodo->sig->ant = nodo->ant;
+ }
+ nodo->ant->sig = nodo->sig;
+ }
+ free(nodo);
+ return 1;
+}
+
+t_Reg_Articulo *crear_nodo_articulo(EMUFS_REG_ID reg, unsigned int num)
+{
+ t_Reg_Articulo *tmp;
+ if (reg == EMUFS_NOT_FOUND) return NULL;
+ tmp = malloc(sizeof(t_Reg_Articulo));
+ if (tmp == NULL) return NULL;
+ tmp->sig = tmp->ant = NULL;
+ tmp->num_reg = reg;
+ tmp->numero = num;
+
+ return tmp;
+}
+
+int agregar_nodo_articulo(t_LstArticulos *lst, t_Reg_Articulo *nodo)
+{
+ if (nodo == NULL) return 0;
+
+ if (lst->primero) {
+ lst->primero->ant = nodo;
+ nodo->sig = lst->primero;
+ lst->primero = nodo;
+ } else {
+ lst->primero = nodo;
+ }
+ return 1;
+}
+