/**
*.Name         ems_clos
*.Title        Закрытие индекса пула страниц EMS
*
*.Descr        Эта функция закрывает индекс пула страниц,
*              полученный функцией ems_open().
*
*.Proto        int ems_clos(int *handle);
*
*.Params       int *handle - указатель на слово, в которое
*                 будет записан индекс полученного пула.
*
*.Return       Байт состояния драйвера EMS
*
*.Sample       ems_test.c
**/

#include <stdio.h>
#include <dos.h>
#include "sysp.h"

int ems_clos(int *handle) {

	union REGS reg;

	reg.x.ax = 0x4500;
	reg.x.dx = *handle;
	int86(0x67, &reg, &reg);

	return(reg.h.ah);
}

