/*--------------------------------------------------------------------
 * FICHERO:  MmoLeeBl.c
 * OBJETIVO: Definir la funcin Mmo_LeeBloque()
 * AUTOR:    Pedro Reina
 * FECHA:    X.12.7.1995
 *------------------------------------------------------------------*/

/*--------------------------------------------------------------------
 * Ficheros de cabecera
 *------------------------------------------------------------------*/

#include "Memo.h"
#include <stdio.h>   /* fread() */

/*--------------------------------------------------------------------
 * Definicin de funciones
 *------------------------------------------------------------------*/

/*--------------------------------------------------------------------
 * FUNCION:  Mmo_LeeBloque()
 * OBJETIVO: Leer en memoria un bloque de un fichero memo
 * ENTRADAS: El objeto memo y el nmero de bloque
 * SALIDAS:  Un entero que indica el nmero de octetos ledos
 * EJEMPLO:  Mmo_LeeBloque ( Dato, 17 )
 *------------------------------------------------------------------*/
entero Mmo_LeeBloque (Memo, Numero)
memo     Memo;
contador Numero;
  {
  Fch_Coloca (Mmo_Fichero(Memo), (entero)Numero*MMO_TAMANOBLOQUE);
  return ( fread (Mmo_Dato(Memo), (size_t)1, (size_t)MMO_TAMANOBLOQUE,
                  Fch_Manejador(Mmo_Fichero(Memo))) );
  }