/*
 * This C module is a reconstruction based on the disassembly of
 * os_evt.obj in frame_na7_db_fl.lib from the Leonardo package.
 */

/* set of included headers from COFF symtab: */
#include <stdio.h>
#include <string.h>
#include "gpfconf.h"	/* FreeCalypso addition */
#include "../../nucleus/nucleus.h"
#include "typedefs.h"
#include "os.h"
#include "gdi.h"
#include "os_types.h"
#include "os_glob.h"

extern T_OS_EVTGRP_TABLE_ENTRY EvtGrpTable[];

GLOBAL LONG
os_SetEvents(OS_HANDLE evt_grp_handle, unsigned event_flags)
{
	if (!EvtGrpTable[evt_grp_handle].Name[0])
		return(OS_ERROR);
	if (NU_Set_Events(&EvtGrpTable[evt_grp_handle].EvtGrp, event_flags,
				NU_OR) == NU_SUCCESS)
		return(OS_OK);
	else
		return(OS_ERROR);
}