_DefaultProcess( ) API Library Routine Example
The following example is a loop consisting of a call to _GetNextEvent( ) followed by a call to _DefaultProcess( ). All events during this procedure receive their default processing.
SET LIBRARY TO DEFAPROC
#include <pro_ext.h>
FAR Example(ParamBlk FAR *parm)
{
   EventRec ev;
   int i;
   for (i = 0; i < 16; i++) 
{
      _GetNextEvent(&ev);
      _DefaultProcess(&ev);
   }
}
FoxInfo myFoxInfo[] = {
   {"ONLOAD", Example, CALLONLOAD, ""},
};
FoxTable _FoxTable = {
   (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo
};