]>
Commit | Line | Data |
---|---|---|
1 | #include "extcdef.h" | |
2 | ||
3 | /************************************************************************* | |
4 | ||
5 | main | |
6 | ||
7 | *************************************************************************/ | |
8 | ||
9 | pascal SInt32 main(SInt16 varCode , ControlHandle theControl , ControlDefProcMessage message, SInt32 param ) | |
10 | { | |
11 | long returnValue = 0L; | |
12 | char state = HGetState((Handle)theControl); | |
13 | ||
14 | if ( message != initCntl ) | |
15 | { | |
16 | ExtCDEFInfo* info = (ExtCDEFInfo* ) (**theControl).contrlRfCon ; | |
17 | if ( info ) | |
18 | { | |
19 | returnValue = info->defProc( info->procID, theControl, message, param) ; | |
20 | } | |
21 | } | |
22 | else | |
23 | { | |
24 | (**theControl).contrlRfCon = NULL ; | |
25 | } | |
26 | HSetState((Handle)theControl,state); | |
27 | ||
28 | return(returnValue); /* tell them what happened */ | |
29 | } |