+++ /dev/null
-#include "extcdef.h"
-
-/*************************************************************************
-
- main
-
-*************************************************************************/
-
-pascal SInt32 main(SInt16 varCode , ControlHandle theControl , ControlDefProcMessage message, SInt32 param )
-{
- long returnValue = 0L;
- char state = HGetState((Handle)theControl);
-
- if ( message != initCntl )
- {
- ExtCDEFInfo* info = (ExtCDEFInfo* ) (**theControl).contrlRfCon ;
- if ( info )
- {
- returnValue = info->defProc( info->procID, theControl, message, param) ;
- }
- }
- else
- {
- (**theControl).contrlRfCon = NULL ;
- }
- HSetState((Handle)theControl,state);
-
- return(returnValue); /* tell them what happened */
-}