-/* int i;
- B_NodoHeader h_der, h_padre, h_nodo;
- B_NodoEntry *c_der, *c_padre, *c_nodo;
-
- b_leer_header(nodo, &h_nodo);
- c_nodo = b_leer_claves(nodo, &h_nodo);
- b_leer_header(der, &h_der);
- c_der = b_leer_claves(der, &h_der);
- b_leer_header(padre, &h_padre);
- c_padre = b_leer_claves(padre, &h_padre);
-
- c_nodo[h_nodo.cant] = c_padre[pos_clave];
- c_nodo[h_nodo.cant].hijo_derecho = -1; / * XXX * /
-
- c_padre[pos_clave] = c_der[0];
- c_padre[pos_clave].hijo_derecho = der_id;
-
- / * Muevo las claves de derecho * /
- for(i=0; i<h_der.cant; i++) {
- c_der[i] = c_der[i+1];
- }
- h_der.cant++;
-
- b_actualizar_header(der, &h_der);
- b_actualizar_header(nodo, &h_nodo);
-*/
+ B_NodoHeader der_h, padre_h;
+ B_NodoEntry *der_entries, *padre_entries;
+ /* Leo claves y cabecera del nodo de la derecha y del padre */
+ b_leer_header(der, &der_h);
+ der_entries = b_leer_claves(der, &der_h);
+ b_leer_header(padre, &padre_h);
+ padre_entries = b_leer_claves(padre, &padre_h);
+ /* Inserto en el hijo derecho la clave del padre */
+ b_insertar_en_nodo_con_lugar(idx, padre_entries[padre_pos].clave, padre_entries[padre_pos].dato,
+ der_id, der, entry.hijo_derecho, der_h.hijo_izquierdo);
+ /* Reemplazo clave del padre por clave nueva */
+ entry.hijo_derecho = der_id;
+ padre_entries[padre_pos] = entry;