/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: July 21, 1992 2:26:28 pm PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: FinalizeImpl, module: FinalizeImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [3676287681,1793344293] FinalizeImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
#define SOURCE(p, l) /* source p, l */
static void NoName_Q780();
static void FinalizeImpl_P0();
static word IsHandle_P60();
static word NarrowHandle_P120();
static word NewFQ_P180();
static word FQEmpty_P240();
static word FQNextNoAbort_P300();
static word FQNext_P360();
static word EnableFinalization_P420();
static word DisableFinalization_P480();
static word ReenableFinalization_P540();
static word GetFinalizationState_P600();
static word HandleToObject_P660();
static word GetClientData_P720();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\333\037\262\301\300\152\344\103\045\100\164\000\000"};
static struct {unsigned f; char r[4];} string2 = {131074, "\004\034\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\333\037\262\301\300\152\344\103\045\100\150\000\000"};
static struct {unsigned f; char r[16];} string4 = {851984, "\257\300\250\013\333\033\300\120\151\334\170\100\150\000\000"};
static struct {unsigned f; char r[32];} string5 = {1966112, "\211\022\021\106\151\156\141\154\151\172\141\142\154\145\117\142\152\145\143\164\300\250\013\333\033\300\120\151\334\170\000"};
static struct {unsigned f; char r[36];} string6 = {2162724, "\211\025\024\106\151\156\141\154\151\172\141\164\151\157\156\121\165\145\165\145\122\145\160\300\250\013\333\033\300\120\151\334\170\000\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\333\037\262\301\300\152\344\103\045\100\200\000\000"};
static struct {unsigned f; char r[4];} string8 = {131074, "\004\003\000"};
static struct {
   word f0[6]; word f6; word f7; word f8; 
   word f9; word f10; word f11; word f12; 
   word f13; word f14; word f15; word f16; 
   word f17; word f18; word f19; word f20; 
   word f21; word f22; word f23; word f24; 
   word f25; word f26; word f27; word f28; 
   word f29; word f30; word f31[2]; 
   } globalframe = {
   {0}, (word) GetClientData_P720, 0, (word) HandleToObject_P660, 
   0, (word) GetFinalizationState_P600, 0, (word) ReenableFinalization_P540, 
   0, (word) DisableFinalization_P480, 0, (word) EnableFinalization_P420, 
   0, (word) FQNext_P360, 0, (word) FQNextNoAbort_P300, 
   0, (word) FQEmpty_P240, 0, (word) NewFQ_P180, 
   0, (word) NarrowHandle_P120, 0, (word) IsHandle_P60, 
   0, (word) FinalizeImpl_P0, {0}
   };

static void NoName_Q780()
   {
   register ptr gf_c046 =  (ptr) &globalframe;
   word var_c6644;
   (* (( (ptr) gf_c046)+4) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (void) XR_DeclareGlobalFrame((word) "FinalizeImpl", &globalframe, (word) XR_GetTypeIndexS((word) (&string3)), (word) (( (bPt) gf_c046)+120)
      /* var_c6292 */ );
   var_c6644 = (word) XR_ExportInterface((word) "Finalize", (word) XR_GetTypeIndexS((word) (&string4)), 14);
   (* (( (ptr) gf_c046)+32)/* var_c6612 */  ) = var_c6644;
   (void) XR_ExportType((word) "FinalizableObject", (word) XR_GetTypeIndexS((word) (&string5)), (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2)
      );
   (void) XR_ExportType((word) "FinalizationQueueRep", (word) XR_GetTypeIndexS((word) (&string6)), (word) XR_GetTypeIndex((word) &string7, 0, (word) &string8)
      );
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+112)/* var_c6260 */ , 67371521);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+104)/* var_c6228 */ , 67371777);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+64)/* var_c6068 */ , 67896323);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+56)/* var_c6036 */ , 67372289);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+48)/* var_c6004 */ , 67634690);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+40)/* var_c5972 */ , 67372801);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+32)/* var_c5940 */ , 67373057);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+24)/* var_c5908 */ , 67373313);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+96)/* var_c6196 */ , 67111424);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+72)/* var_c6100 */ , 67373825);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+80)/* var_c6132 */ , 67374081);
   (void) XR_ExportProcS(var_c6644, (word) (( (bPt) gf_c046)+88)/* var_c6164 */ , 67374337);
   }

static void FinalizeImpl_P0(formal_c018, formal_c017)
   word formal_c018;
   word formal_c017;
   {
   /* FinalizeImpl: */ 
   }

static word IsHandle_P60(x_v3260)
   word x_v3260;
   {
   register ptr gf_c6676 =  (ptr) &globalframe;
   word var_c3316;
   /* IsHandle: */ 
SOURCE(531, 93)
SOURCE(581, 43)
   {
      word tc9;
      if ((x_v3260 == 0)) {
         tc9 =  (word) 1;
         }
      else {
         tc9 =  (word) ((* (( (ptr) gf_c6676)+4) ) == XR_GetReferentType(x_v3260));
         };
      return(tc9);
      };
   }

static word NarrowHandle_P120(x_v3376)
   word x_v3376;
   {
   register ptr gf_c6708 =  (ptr) &globalframe;
   word var_c3432;
   /* NarrowHandle: */ 
SOURCE(628, 99)
SOURCE(684, 43)
   return(XR_Narrow(x_v3376, (* (( (ptr) gf_c6708)+4) )));
   }

static word NewFQ_P180()
   {
   word var_c3492;
   /* NewFQ: */ 
SOURCE(731, 151)
SOURCE(863, 19)
   return((word) XR_NewFQ());
   }

static word FQEmpty_P240(fq_v3552)
   word fq_v3552;
   {
   word var_c3596;
   /* FQEmpty: */ 
SOURCE(888, 182)
SOURCE(1046, 24)
   return((word) XR_FQEmpty(fq_v3552));
   }

static word FQNextNoAbort_P300(fq_v3760)
   word fq_v3760;
   {
   word handle_v3804;
   /* FQNextNoAbort: */ 
SOURCE(1194, 109)
SOURCE(1194, 109)
   handle_v3804 = 0;
SOURCE(1273, 30)
   return((word) XR_FQNextNoAbort(fq_v3760));
   }

static word FQNext_P360(fq_v3864)
   word fq_v3864;
   {
   word handle_v3908;
   /* FQNext: */ 
SOURCE(1309, 142)
SOURCE(1309, 142)
   handle_v3908 = 0;
SOURCE(1387, 28)
   handle_v3908 = (word) XR_FQNextNoAbort(fq_v3864);
SOURCE(1417, 34)
   if ((handle_v3908 == 0)) {
SOURCE(1438, 13)
      (void) XR_RaiseError(XR_Aborted, 0);
      };
SOURCE(1309, 142)
   return(handle_v3908);
   }

static word EnableFinalization_P420(object_v3968, fq_v3996, clientData_v4024)
   word object_v3968;
   word fq_v3996;
   word clientData_v4024;
   {
   register ptr gf_c6740 =  (ptr) &globalframe;
   word handle_v4092;
   /* EnableFinalization: */ 
SOURCE(1456, 357)
SOURCE(1456, 357)
   handle_v4092 = 0;
SOURCE(1709, 62)
   {
      word var_c6452;
      var_c6452 = XR_NewObject(20, (* (( (ptr) gf_c6740)+4) ));
      (* (( (ptr) var_c6452)+2) ) = fq_v3996;
      (* (( (ptr) var_c6452)+4) ) = clientData_v4024;
      handle_v4092 = var_c6452;
      };
SOURCE(1773, 40)
   (void) XR_EnableFinalization(object_v3968, fq_v3996, handle_v4092);
SOURCE(1456, 357)
   return(handle_v4092);
   }

static word DisableFinalization_P480(handle_v4152)
   word handle_v4152;
   {
   word oldState_v4196;
   /* DisableFinalization: */ 
SOURCE(1819, 267)
SOURCE(2047, 39)
   return((word) XR_DisableFinalization(handle_v4152));
   }

static word ReenableFinalization_P540(handle_v4256, fq_v4284)
   word handle_v4256;
   word fq_v4284;
   {
   word oldState_v4328;
   /* ReenableFinalization: */ 
SOURCE(2092, 321)
SOURCE(2369, 44)
   return((word) XR_ReenableFinalization(handle_v4256, fq_v4284));
   }

static word GetFinalizationState_P600(handle_v4388)
   word handle_v4388;
   {
   word state_v4432;
   /* GetFinalizationState: */ 
SOURCE(2419, 265)
SOURCE(2644, 40)
   return((word) XR_GetFinalizationState(handle_v4388));
   }

static word HandleToObject_P660(handle_v4492)
   word handle_v4492;
   {
   word object_v4536;
   /* HandleToObject: */ 
SOURCE(2690, 215)
SOURCE(2690, 215)
   object_v4536 = 0;
SOURCE(2871, 34)
   return((word) XR_HandleToObject(handle_v4492));
   }

static word GetClientData_P720(handle_v4608)
   word handle_v4608;
   {
   word var_c4652;
   /* GetClientData: */ 
SOURCE(2911, 89)
SOURCE(2973, 27)
   return((* (( (ptr) handle_v4608)+4) ));
   }

/* file: FinalizeImpl, module: FinalizeImpl, compiled at: July 21, 1992 2:26:28 pm PDT */ 
extern void XR_install_FinalizeImpl() {
   NoName_Q780();
   }
extern void XR_run_FinalizeImpl() { XR_Start(&globalframe); }