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

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

#include "Memo.h"

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

/*--------------------------------------------------------------------
 * FUNCION:  Mmo_Limpia()
 * OBJETIVO: Limpiar el bloque en memoria de un objeto memo
 * ENTRADAS: El objeto memo
 * SALIDAS:  Ninguna
 * EJEMPLO:  Mmo_Limpia ( Dato )
 *------------------------------------------------------------------*/
void Mmo_Limpia (Memo)
memo Memo;
  {
  Mem_Asigna (Mmo_Dato(Memo), 0, MMO_TAMANOBLOQUE);
  Mmo_PonPosicion (Memo, 0);
  }