/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: April 21, 1992 12:42:11 pm PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: XTkNotificationImpl, module: XTkNotificationImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [76824825,735568498] XTkNotificationImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1;} W2;
#define SOURCE(p, l) /* source p, l */
static void NoName_Q432();
static void XTkNotificationImpl_P0();
static void RegisterGlobal_P60();
static void CallNotifierList_P120();
static void CallAll_P180();
static struct {unsigned f; char r[44];} string1 = {2752556, "\260\006\005\146\151\162\163\164\257\300\004\224\100\371\300\053\327\342\162\100\214\005\004\162\145\163\164\214\257\300\004\224\100\371\300\053\327\342\162\100\214\261\000"};
static struct {unsigned f; char r[4];} string2 = {131074, "\004\006\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\004\224\100\371\300\053\327\342\162\100\164\000\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\003\010\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\242\221\264\046\300\105\142\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\242\021\151\152\300\254\342\070\173\100\150\000\000"};
static struct {
   word f0[12]; word f12; word f13; word f14; 
   word f15; word f16; word f17; word f18; 
   word f19[3]; 
   } globalframe = {
   {0}, (word) CallAll_P180, 0, (word) CallNotifierList_P120, 
   0, (word) RegisterGlobal_P60, 0, (word) XTkNotificationImpl_P0, 
   {0}
   };

static void NoName_Q432()
   {
   register ptr gf_c036 =  (ptr) &globalframe;
   word var_c5508;
   (* (( (ptr) gf_c036)+10) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (void) XR_DeclareGlobalFrame((word) "XTkNotificationImpl", &globalframe, (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4)
      , (word) (( (bPt) gf_c036)+72)/* var_c5284 */ );
   var_c5508 = (word) XR_ImportInterface((word) "RefTab", (word) XR_GetTypeIndexS((word) (&string5)), 16);
   (* (( (ptr) gf_c036)+20)/* var_c5316 */  ) = var_c5508;
   (void) XR_ImportProcS(var_c5508, 67896579);
   (void) XR_ImportProcS(var_c5508, 134742786);
   (void) XR_ImportProcS(var_c5508, 67895555);
   var_c5508 = (word) XR_ExportInterface((word) "XTkNotification", (word) XR_GetTypeIndexS((word) (&string6)), 2);
   (* (( (ptr) gf_c036)+21)/* var_c5540 */  ) = var_c5508;
   (void) XR_ExportProcS(var_c5508, (word) (( (bPt) gf_c036)+64)/* var_c5252 */ , 1048580);
   (void) XR_ExportProcS(var_c5508, (word) (( (bPt) gf_c036)+48)/* var_c5188 */ , 1048836);
   }

static void XTkNotificationImpl_P0(formal_c012, formal_c011)
   word formal_c012;
   word formal_c011;
   {
   register ptr gf_c5572 =  (ptr) &globalframe;
   /* XTkNotificationImpl: */ 
SOURCE(42, 1156)
SOURCE(248, 38)
   {
      word pd7;
      pd7 = (* (( (ptr) (* (( (ptr) gf_c5572)+20)/* var_c5316 */  ))+5) );
      (* (( (ptr) gf_c5572)+8)/* registry_v2580 */  ) = (word) ( *( (fPt) ((*  (ptr) pd7 ))))(17, 0, 0, pd7);
      };
   }

static void RegisterGlobal_P60(key_v2916, proc_v2944, registerData_v2972, front_v3000)
   word key_v2916;
   word proc_v2944;
   word registerData_v2972;
   word front_v3000;
   {
   register ptr gf_c5604 =  (ptr) &globalframe;
   word new_v3376;
   /* RegisterGlobal: */ 
SOURCE(289, 413)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c5604)+16)/* LOCK_v2496 */ ));
SOURCE(404, 46)
   {
      word var_c5380;
      new_v3376 = XR_NewObject(12, (* (( (ptr) gf_c5604)+10) ));
      var_c5380 = new_v3376;
      (*  (ptr) var_c5380 ) = XR_CheckProc(proc_v2944);
      (* (( (ptr) var_c5380)+1) ) = registerData_v2972;
      };
SOURCE(452, 181)
   {
      word var_c5412;
      W2 var_c020;
      {
         word pd8;
         pd8 = (* (( (ptr) (* (( (ptr) gf_c5604)+20)/* var_c5316 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd8 ))))((word) &var_c020, (* (( (ptr) gf_c5604)+8)/* registry_v2580 */  ), key_v2916, pd8);
         };
      var_c5412 = var_c020.f1;
      if ((var_c5412 == 0)) {
         goto lab_L100000;
         };
      if (((* (( (ptr) gf_c5604)+10) ) == XR_GetReferentType(var_c5412))) {
         {
            word nl_v3420;
            nl_v3420 = var_c5412;
SOURCE(523, 110)
            if ((0 != front_v3000)) {
SOURCE(538, 19)
               (* (( (ptr) new_v3376)+2) ) = nl_v3420;
               }
            else {
SOURCE(559, 74)
               {
                  register word l_v3464;
                  l_v3464 = nl_v3420;
                  lab_L100004: ;
SOURCE(595, 38)
                  if (((* (( (ptr) l_v3464)+2) ) == 0)) {
SOURCE(615, 10)
                     (* (( (ptr) l_v3464)+2) ) = new_v3376;
SOURCE(627, 6)
                     (void) (XR_MonitorExit((word) (( (bPt) gf_c5604)+16)/* LOCK_v2496 */ ));
                     return;
                     };
                  l_v3464 = (* (( (ptr) l_v3464)+2) );
                  goto lab_L100004;
                  };
               };
            };
         }
      else {
         lab_L100000: ;
         };
      };
SOURCE(665, 37)
   {
      word var_c5444;
      word pd9;
      pd9 = (* (( (ptr) (* (( (ptr) gf_c5604)+20)/* var_c5316 */  ))+9) );
      var_c5444 = (word) ( *( (fPt) ((*  (ptr) pd9 ))))((* (( (ptr) gf_c5604)+8)/* registry_v2580 */  ), key_v2916, new_v3376, pd9)
      ;
      };
SOURCE(289, 413)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c5604)+16)/* LOCK_v2496 */ ));
   return;
   }

static void CallNotifierList_P120(list_v3084, widget_v3112, callData_v3140, event_v3168)
   word list_v3084;
   word widget_v3112;
   word callData_v3140;
   word event_v3168;
   {
   /* CallNotifierList: */ 
SOURCE(708, 261)
SOURCE(821, 148)
   {
      register word l_v3508;
      l_v3508 = list_v3084;
      lab_L100008: ;
      if ((l_v3508 != 0)) {
         }
      else {
         goto lab_L100005;
         };
SOURCE(871, 98)
      {
         word pd10;
         pd10 = (*  (ptr) l_v3508 );
         (void) ( *( (fPt) ((*  (ptr) pd10 ))))(widget_v3112, (* (( (ptr) l_v3508)+1) ), callData_v3140, event_v3168, pd10);
         };
      l_v3508 = (* (( (ptr) l_v3508)+2) );
      goto lab_L100008;
      lab_L100005: ;
      };
   }

static void CallAll_P180(key_v3240, widget_v3268, callData_v3296, event_v3324)
   word key_v3240;
   word widget_v3268;
   word callData_v3296;
   word event_v3324;
   {
   register ptr gf_c5636 =  (ptr) &globalframe;
   /* CallAll: */ 
SOURCE(983, 215)
SOURCE(1084, 114)
   {
      word var_c5476;
      W2 var_c034;
      {
         word pd11;
         pd11 = (* (( (ptr) (* (( (ptr) gf_c5636)+20)/* var_c5316 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd11 ))))((word) &var_c034, (* (( (ptr) gf_c5636)+8)/* registry_v2580 */  ), key_v3240, pd11)
         ;
         };
      var_c5476 = var_c034.f1;
      if ((var_c5476 == 0)) {
         goto lab_L100009;
         };
      if (((* (( (ptr) gf_c5636)+10) ) == XR_GetReferentType(var_c5476))) {
         {
            word nl_v3552;
            nl_v3552 = var_c5476;
SOURCE(1153, 45)
            (void) CallNotifierList_P120(nl_v3552, widget_v3268, callData_v3296, event_v3324);
            };
         }
      else {
         lab_L100009: ;
         };
      };
   }

/* file: XTkNotificationImpl, module: XTkNotificationImpl, compiled at: April 21, 1992 12:42:11 pm PDT */ 
extern void XR_install_XTkNotificationImpl() {
   NoName_Q432();
   }
extern void XR_run_XTkNotificationImpl() { XR_Start(&globalframe); }