/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: February 3, 1993 12:09:36 pm PST */
/* C2C version: January 29, 1993 (sun4) */
/* ref-counting: off */
/* file: XlFinalizePrivateImpl, module: XlFinalizePrivateImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [3297806125,2302362170] XlFinalizePrivateImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
#define SOURCE(p, l) /* source p, l */
static void NoName_Q696();
static void XlFinalizePrivateImpl_P0();
static void Init_P60();
static word FinalizationStuff_P120();
static void IncRefCount_P180();
static void DecRefCount_P240();
static void TryCloseConnection_P300();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\304\220\207\055\300\211\073\102\072\100\200\000\000"};
static struct {unsigned f; char r[4];} string2 = {131074, "\004\007\000"};
static struct {unsigned f; char r[4];} string3 = {65540, "\241\000\000"};
static struct {unsigned f; char r[16];} string4 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\126\304\000\000"};
static struct {unsigned f; char r[60];} string5 = {3735609, "\006\023\040\001\070\001\100\100\001\100\104\001\100\110\001\100\140\001\100\144\001\100\150\001\100\154\001\100\160\001\100\164\001\100\170\001\100\174\001\100\200\001\100\224\001\100\234\001\100\240\001\100\244\001\100\250\001\000\000"};
static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\123\320\000\000"};
static struct {unsigned f; char r[60];} string7 = {3801146, "\007\100\200\040\047\004\100\354\004\200\140\054\004\014\015\015\015\015\015\015\015\015\004\140\014\015\015\015\015\015\015\015\015\015\015\015\015\015\015\015\015\015\015\015\015\015\015\015\013\004\100\114\004\102\354\004\100\314\000"};
static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\304\220\207\055\300\211\073\102\072\100\164\000\000"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\055\153\222\376\300\327\164\352\142\100\150\000\000"};
static unsigned string10 = 1483472896;
static struct {unsigned f; char r[16];} string11 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"};
static struct {unsigned f; char r[32];} string12 = {1966112, "\211\022\021\103\157\156\156\145\143\164\151\157\156\120\162\151\166\141\164\145\300\351\276\264\273\300\115\104\320\264\000"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\012\063\155\016\300\130\140\234\375\100\164\000\000"};
static struct {unsigned f; char r[40];} string14 = {2424869, "\006\016\000\001\004\001\010\001\014\001\020\001\024\001\030\001\034\001\040\001\044\001\060\001\070\010\000\004\100\100\001\101\070\001\101\074\001\000\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\012\063\155\016\300\130\140\234\375\100\150\000\000"};
static struct {unsigned f; char r[32];} string16 = {1835040, "\211\020\017\106\151\156\141\154\151\172\141\164\151\157\156\122\145\160\300\012\063\155\016\300\130\140\234\375\000\000\000"};
static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\156\242\124\004\300\131\031\215\125\100\150\000\000"};
static struct {
   word f0[17]; word f17; word f18; word f19; 
   word f20; word f21; word f22; word f23; 
   word f24; word f25; word f26; word f27; 
   word f28[5]; 
   } globalframe = {
   {0}, (word) TryCloseConnection_P300, 0, (word) DecRefCount_P240, 
   0, (word) IncRefCount_P180, 0, (word) FinalizationStuff_P120, 
   0, (word) Init_P60, 0, (word) XlFinalizePrivateImpl_P0, 
   {0}
   };

static void NoName_Q696()
   {
   register ptr gf_c048 =  (ptr) &globalframe;
   word var_c21296;
   (* (( (ptr) gf_c048)+9) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf_c048)+10) ) = (word) XR_GetTypeIndexS((word) (&string3));
   (* (( (ptr) gf_c048)+11) ) = (word) XR_GetTypeIndex((word) &string4, 0, (word) &string5);
   (* (( (ptr) gf_c048)+12) ) = (word) XR_GetTypeIndex((word) &string6, 0, (word) &string7);
   (void) XR_DeclareGlobalFrame((word) "XlFinalizePrivateImpl", &globalframe, (word) XR_GetTypeIndexS((word) (&string8)), (word) (
         ( (bPt) gf_c048)+108)/* var_c20912 */ );
   var_c21296 = (word) XR_ImportInterface((word) "Atom", (word) XR_GetTypeIndexS((word) (&string9)), 16);
   (* (( (ptr) gf_c048)+30)/* var_c21136 */  ) = var_c21296;
   (void) XR_ImportProcS(var_c21296, 67636226);
   (void) XR_ImportProcS(var_c21296, 67635202);
   (void) XR_ImportProcS(var_c21296, 67897859);
   var_c21296 = (word) XR_ImportInterface((word) &string10, (word) XR_GetTypeIndexS((word) (&string11)), 218);
   (* (( (ptr) gf_c048)+29)/* var_c21008 */  ) = var_c21296;
   (void) XR_ImportProcS(var_c21296, 271873);
   (void) XR_ImportProcS(var_c21296, 1063940);
   (void) XR_ImportProcS(var_c21296, 67910403);
   var_c21296 = (word) XR_ExportInterface((word) &string10, (word) XR_GetTypeIndexS((word) (&string11)), 218);
   (* (( (ptr) gf_c048)+31)/* var_c21328 */  ) = var_c21296;
   (void) XR_ExportProcS(var_c21296, (word) (( (bPt) gf_c048)+84)/* var_c20816 */ , 533506);
   (void) XR_ExportProcS(var_c21296, (word) (( (bPt) gf_c048)+76)/* var_c20784 */ , 533762);
   (void) XR_ExportType((word) "ConnectionPrivate", (word) XR_GetTypeIndexS((word) (&string12)), (word) XR_GetTypeIndex((word) &string13, 0, (word) &string14)
      );
   var_c21296 = (word) XR_ExportInterface((word) "XlPrivateTypes", (word) XR_GetTypeIndexS((word) (&string15)), 7);
   (* (( (ptr) gf_c048)+32)/* var_c21360 */  ) = var_c21296;
   (void) XR_ExportType((word) "FinalizationRep", (word) XR_GetTypeIndexS((word) (&string16)), (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2)
      );
   var_c21296 = (word) XR_ExportInterface((word) "XlFinalizePrivate", (word) XR_GetTypeIndexS((word) (&string17)), 1);
   (* (( (ptr) gf_c048)+31)/* var_c21328 */  ) = var_c21296;
   (void) XR_ExportProcS(var_c21296, (word) (( (bPt) gf_c048)+100)/* var_c20880 */ , 524290);
   }

static void XlFinalizePrivateImpl_P0(formal_c015, formal_c014)
   word formal_c015;
   word formal_c014;
   {
   /* XlFinalizePrivateImpl: */ 
   }

static void Init_P60(c_v2956, finalMatch_v2984)
   word c_v2956;
   word finalMatch_v2984;
   {
   register ptr gf_c21392 =  (ptr) &globalframe;
   word cPriv_v3332;
   /* Init: */ 
SOURCE(443, 293)
SOURCE(512, 60)
   cPriv_v3332 = (* (( (ptr) c_v2956)+24) );
SOURCE(574, 162)
   {
      word var_c20944;
      {
         word var_c20976;
         word var_c21040;
         word var_c21168;
         {
            word pd18;
            pd18 = (* (( (ptr) (* (( (ptr) gf_c21392)+29)/* var_c21008 */  ))+63) );
            var_c20976 = (word) ( *( (fPt) ((*  (ptr) pd18 ))))(0, 0, 0, pd18);
            };
         {
            word var_c21072;
            {
               word var_c21104;
               var_c21104 = XR_NewObject(4, (* (( (ptr) gf_c21392)+10) ));
               (*  (ptr) var_c21104 ) = 1;
               var_c21072 = var_c21104;
               };
            {
               word pd19;
               pd19 = (* (( (ptr) (* (( (ptr) gf_c21392)+30)/* var_c21136 */  ))+14) );
               var_c21040 = (word) ( *( (fPt) ((*  (ptr) pd19 ))))(0, 0, var_c21072, pd19);
               };
            };
         var_c21168 = XR_NewObject(12, (* (( (ptr) gf_c21392)+9) ));
         (*  (ptr) var_c21168 ) = finalMatch_v2984;
         (* (( (ptr) var_c21168)+1) ) = var_c20976;
         (* (( (ptr) var_c21168)+2) ) = var_c21040;
         var_c20944 = var_c21168;
         };
      (* (( (ptr) cPriv_v3332)+7) ) = var_c20944;
      };
   }

static word FinalizationStuff_P120(c_v3044)
   word c_v3044;
   {
   word var_c3088;
   /* FinalizationStuff: */ 
SOURCE(741, 211)
SOURCE(741, 211)
   var_c3088 = 0;
SOURCE(824, 128)
   if ((c_v3044 != 0)) {
SOURCE(838, 116)
      {
         word cPriv_v3388;
SOURCE(840, 60)
         cPriv_v3388 = (* (( (ptr) c_v3044)+24) );
SOURCE(902, 50)
         if ((cPriv_v3388 != 0)) {
SOURCE(920, 32)
            return((* (( (ptr) cPriv_v3388)+7) ));
            };
         };
      };
SOURCE(741, 211)
   return(var_c3088);
   }

static void IncRefCount_P180(c_v3160, object_v3188)
   word c_v3160;
   word object_v3188;
   {
   register ptr gf_c21424 =  (ptr) &globalframe;
   word finalizationStuff_v3444;
   /* IncRefCount: */ 
SOURCE(961, 395)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c21424)+16)/* LOCK_v2552 */ ));
SOURCE(1034, 61)
   finalizationStuff_v3444 = (word) FinalizationStuff_P120(c_v3160);
SOURCE(1097, 259)
   if ((finalizationStuff_v3444 != 0)) {
SOURCE(1127, 231)
      {
         word count_v3500;
SOURCE(1129, 83)
         {
            word pd20;
            pd20 = (* (( (ptr) (* (( (ptr) gf_c21424)+30)/* var_c21136 */  ))+12) );
            count_v3500 = XR_Narrow((word) ( *( (fPt) ((*  (ptr) pd20 ))))((* (( (ptr) finalizationStuff_v3444)+2) ), object_v3188, pd20)
               , (* (( (ptr) gf_c21424)+10) ));
            };
SOURCE(1214, 142)
         if ((count_v3500 != 0)) {
SOURCE(1233, 23)
            (*  (ptr) count_v3500 ) = ((*  (ptr) count_v3500 ) + 1);
            }
         else {
SOURCE(1256, 100)
            {
               word var_c21200;
               {
                  word var_c21232;
                  var_c21232 = XR_NewObject(4, (* (( (ptr) gf_c21424)+10) ));
                  (*  (ptr) var_c21232 ) = 1;
                  var_c21200 = var_c21232;
                  };
               {
                  word pd21;
                  pd21 = (* (( (ptr) (* (( (ptr) gf_c21424)+30)/* var_c21136 */  ))+14) );
                  (* (( (ptr) finalizationStuff_v3444)+2) ) = (word) ( *( (fPt) ((*  (ptr) pd21 ))))((* (( (ptr) finalizationStuff_v3444)+2)
                      ), object_v3188, var_c21200, pd21);
                  };
               };
            };
         };
      };
SOURCE(961, 395)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c21424)+16)/* LOCK_v2552 */ ));
   return;
   }

static void DecRefCount_P240(c_v3264, object_v3292)
   word c_v3264;
   word object_v3292;
   {
   register ptr gf_c21456 =  (ptr) &globalframe;
   word finalizationStuff_v3556;
   /* DecRefCount: */ 
SOURCE(1364, 668)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c21456)+16)/* LOCK_v2552 */ ));
SOURCE(1437, 61)
   finalizationStuff_v3556 = (word) FinalizationStuff_P120(c_v3264);
SOURCE(1500, 532)
   if ((finalizationStuff_v3556 != 0)) {
SOURCE(1530, 507)
      {
         word count_v3612;
SOURCE(1532, 83)
         {
            word pd22;
            pd22 = (* (( (ptr) (* (( (ptr) gf_c21456)+30)/* var_c21136 */  ))+12) );
            count_v3612 = XR_Narrow((word) ( *( (fPt) ((*  (ptr) pd22 ))))((* (( (ptr) finalizationStuff_v3556)+2) ), object_v3292, pd22)
               , (* (( (ptr) gf_c21456)+10) ));
            };
SOURCE(1617, 150)
         if ((count_v3612 != 0)) {
SOURCE(1637, 130)
            if (((*  (ptr) count_v3612 ) != 1)) {
SOURCE(1655, 25)
               (*  (ptr) count_v3612 ) = ((*  (ptr) count_v3612 ) - 1);
               }
            else {
SOURCE(1680, 87)
               {
                  word pd23;
                  pd23 = (* (( (ptr) (* (( (ptr) gf_c21456)+30)/* var_c21136 */  ))+16) );
                  (* (( (ptr) finalizationStuff_v3556)+2) ) = (word) ( *( (fPt) ((*  (ptr) pd23 ))))((* (( (ptr) finalizationStuff_v3556)+2)
                      ), object_v3292, pd23);
                  };
               };
            };
SOURCE(1773, 259)
         if (((* (( (ptr) finalizationStuff_v3556)+2) ) == 0)) {
SOURCE(1813, 221)
            {
               word tq_v3668 = 0;
               word finalMatch_v3696;
SOURCE(1827, 51)
               finalMatch_v3696 = (*  (ptr) finalizationStuff_v3556 );
SOURCE(1880, 41)
               if ((finalMatch_v3696 != 0)) {
SOURCE(1903, 18)
                  tq_v3668 = (* (( (ptr) finalMatch_v3696)+2) );
                  };
SOURCE(1924, 52)
               if ((tq_v3668 == 0)) {
SOURCE(1939, 37)
                  tq_v3668 = (* (( (ptr) finalizationStuff_v3556)+1) );
                  };
SOURCE(1979, 53)
               {
                  word pd24;
                  pd24 = (* (( (ptr) (* (( (ptr) gf_c21456)+29)/* var_c21008 */  ))+64) );
                  (void) ( *( (fPt) ((*  (ptr) pd24 ))))(tq_v3668, (word) (( (bPt) gf_c21456)+68)/* var_c20752 */ , c_v3264, 0, pd24);
                  };
               };
            };
         };
      };
SOURCE(1364, 668)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c21456)+16)/* LOCK_v2552 */ ));
   return;
   }

static void TryCloseConnection_P300(event_v6380, clientData_v6408, tq_v6436)
   word event_v6380;
   word clientData_v6408;
   word tq_v6436;
   {
   register ptr gf_c21488 =  (ptr) &globalframe;
   word c_v3740;
   word finalizationStuff_v3768;
   /* TryCloseConnection: */ 
SOURCE(2044, 546)
SOURCE(2085, 37)
   c_v3740 = XR_Narrow(clientData_v6408, (* (( (ptr) gf_c21488)+11) ));
SOURCE(2124, 61)
   finalizationStuff_v3768 = (word) FinalizationStuff_P120(c_v3740);
SOURCE(2187, 403)
   if (((* (( (ptr) finalizationStuff_v3768)+2) ) == 0)) {
SOURCE(2227, 365)
      {
         word finalMatch_v3824;
SOURCE(2230, 51)
         finalMatch_v3824 = (*  (ptr) finalizationStuff_v3768 );
SOURCE(2283, 238)
         if ((finalMatch_v3824 != 0)) {
SOURCE(2306, 220)
            {
               word proc_v3868;
SOURCE(2308, 40)
               proc_v3868 = (*  (ptr) finalMatch_v3824 );
SOURCE(2350, 171)
               if ((proc_v3868 != 0)) {
SOURCE(2367, 156)
                  {
                     word event_v3912;
SOURCE(2369, 63)
                     event_v3912 = XR_NewObject(28, (* (( (ptr) gf_c21488)+12) ));
                     (* (( (ptr) event_v3912)+4) ) = 36;
SOURCE(2434, 20)
                     (* (( (ptr) event_v3912)+2) ) = c_v3740;
SOURCE(2456, 31)
                     (* (( (ptr) event_v3912)+5) ) = 1;
SOURCE(2489, 32)
                     (void) ( *( (fPt) ((*  (ptr) proc_v3868 ))))(event_v3912, (* (( (ptr) finalMatch_v3824)+3) ), tq_v6436, proc_v3868);
                     };
                  };
               };
            };
SOURCE(2529, 61)
         if (((* (( (ptr) finalizationStuff_v3768)+2) ) == 0)) {
SOURCE(2569, 21)
            {
               word pd25;
               pd25 = (* (( (ptr) (* (( (ptr) gf_c21488)+29)/* var_c21008 */  ))+42) );
               (void) ( *( (fPt) ((*  (ptr) pd25 ))))(c_v3740, pd25);
               };
            };
         };
      };
   }

/* file: XlFinalizePrivateImpl, module: XlFinalizePrivateImpl, compiled at: February 3, 1993 12:09:35 pm PST */ 
extern void XR_install_XlFinalizePrivateImpl() {
   NoName_Q696();
   }
extern void XR_run_XlFinalizePrivateImpl() { XR_Start(&globalframe); }