/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: February 21, 1992 9:36:47 pm PST */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: ProcessPropsImpl, module: ProcessPropsImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [3427216296,3856474784] ProcessPropsImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef word (*fPt)();
#define SOURCE(p, l) /* source p, l */
static void NoName_Q444();
static void ProcessPropsImpl_P0();
static void AddPropList_P60();
static word NoName_Q504();
static void PushPropList_P120();
static word NoName_Q564();
static word GetPropList_P180();
static word GetProp_P240();
static void NoName_Q624();
static void NoName_Q684();
static struct {unsigned f; char r[48];} string1 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\055\153\222\376\300\327\164\352\142\100\200\005\004\162\145\163\164\214\216\257\300\055\153\222\376\300\327\164\352\142\100\200\261\000\000\000"};
static struct {unsigned f; char r[4];} string2 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\314\107\053\250\300\345\335\042\240\100\150\000\000"};
static struct {unsigned f; char r[16];} string4 = {851984, "\257\300\314\116\377\204\300\167\024\373\125\100\150\000\000"};
static struct {
   word f0[9]; word f9; word f10; word f11; 
   word f12; word f13; word f14; word f15; 
   word f16; word f17; word f18[2]; 
   } globalframe = {
   {0}, (word) GetProp_P240, 0, (word) GetPropList_P180, 
   0, (word) PushPropList_P120, 0, (word) AddPropList_P60, 
   0, (word) ProcessPropsImpl_P0, {0}
   };

static void NoName_Q444()
   {
   register ptr gf_c036 =  (ptr) &globalframe;
   word var_c4176;
   (* (( (ptr) gf_c036)+8) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (void) XR_DeclareGlobalFrame((word) "ProcessPropsImpl", &globalframe, (word) XR_GetTypeIndexS((word) (&string3)), (word) (
         ( (bPt) gf_c036)+68)/* var_c4048 */ );
   var_c4176 = (word) XR_ExportInterface((word) "ProcessProps", (word) XR_GetTypeIndexS((word) (&string4)), 6);
   (* (( (ptr) gf_c036)+19)/* var_c4144 */  ) = var_c4176;
   (void) XR_ExportProcS(var_c4176, (word) (( (bPt) gf_c036)+60)/* var_c4016 */ , 524290);
   (void) XR_ExportProcS(var_c4176, (word) (( (bPt) gf_c036)+52)/* var_c3984 */ , 524546);
   (void) XR_ExportProcS(var_c4176, (word) (( (bPt) gf_c036)+44)/* var_c3952 */ , 67109376);
   (void) XR_ExportProcS(var_c4176, (word) (( (bPt) gf_c036)+36)/* var_c3920 */ , 67371777);
   }

static void ProcessPropsImpl_P0(formal_c011, formal_c010)
   word formal_c011;
   word formal_c010;
   {
   /* ProcessPropsImpl: */ 
   }

static void AddPropList_P60(propList_v2684, formal_c049)
   word propList_v2684;
   word formal_c049;
   {
   W6 var_c4208;
   /* declaration of inner_v2712 skipped */ 
   register ptr gf_c4240 =  (ptr) &globalframe;
   /* declaration of old_v3196 skipped */ 
   var_c4208.f4/* inner_v2712 */  = formal_c049;
   /* AddPropList: */ 
SOURCE(128, 472)
SOURCE(196, 41)
   var_c4208.f5/* old_v3196 */  = XR_Narrow((word) XR_GetThreadProperty(), (* (( (ptr) gf_c4240)+8) ));
SOURCE(239, 259)
   if ((var_c4208.f5/* old_v3196 */  != 0)) {
SOURCE(257, 243)
      {
         word tail_v3240 = 0;
SOURCE(278, 155)
         {
            register word each_v3284;
            each_v3284 = propList_v2684;
            lab_L100003: ;
            if ((each_v3284 != 0)) {
               }
            else {
               goto lab_L100000;
               };
            {
               word new_v3328;
SOURCE(336, 29)
               new_v3328 = XR_NewObject(8, (* (( (ptr) gf_c4240)+8) ));
               {
                  word var_c4112;
                  var_c4112 = new_v3328;
                  (*  (ptr) var_c4112 ) = (*  (ptr) each_v3284 );
                  };
SOURCE(367, 54)
               if ((tail_v3240 == 0)) {
SOURCE(386, 20)
                  propList_v2684 = new_v3328;
                  }
               else {
SOURCE(406, 15)
                  (* (( (ptr) tail_v3240)+1) ) = new_v3328;
                  };
SOURCE(423, 10)
               tail_v3240 = new_v3328;
               };
            each_v3284 = (* (( (ptr) each_v3284)+1) );
            goto lab_L100003;
            lab_L100000: ;
            };
SOURCE(444, 54)
         if ((tail_v3240 == 0)) {
SOURCE(463, 20)
            propList_v2684 = var_c4208.f5/* old_v3196 */ ;
            }
         else {
SOURCE(483, 15)
            (* (( (ptr) tail_v3240)+1) ) = var_c4208.f5/* old_v3196 */ ;
            };
         };
      };
SOURCE(503, 28)
   (void) XR_SetThreadProperty(propList_v2684);
SOURCE(533, 42)
   {
      word var_c043;
      var_c043 = (word) &var_c4208;
       (void) (word) XR_Enable(( ((word)  (fPt) NoName_Q504) ), ( ((word)  (fPt) NoName_Q684) ), var_c043);
      };
SOURCE(577, 23)
   (void) XR_SetThreadProperty(var_c4208.f5/* old_v3196 */ );
   }

static word NoName_Q504(formal_c038)
   word formal_c038;
   {
SOURCE(533, 42)
   {
      word pd5;
      pd5 = (* (( (ptr) formal_c038)+4) );
      (void) ( *( (fPt) ((*  (ptr) pd5 ))))(pd5);
      };
   return(0);
   }

static void PushPropList_P120(propList_v2788, formal_c050)
   word propList_v2788;
   word formal_c050;
   {
   W6 var_c4272;
   /* declaration of inner_v2816 skipped */ 
   register ptr gf_c4304 =  (ptr) &globalframe;
   /* declaration of old_v3372 skipped */ 
   var_c4272.f4/* inner_v2816 */  = formal_c050;
   /* PushPropList: */ 
SOURCE(606, 201)
SOURCE(667, 41)
   var_c4272.f5/* old_v3372 */  = XR_Narrow((word) XR_GetThreadProperty(), (* (( (ptr) gf_c4304)+8) ));
SOURCE(710, 28)
   (void) XR_SetThreadProperty(propList_v2788);
SOURCE(740, 42)
   {
      word var_c044;
      var_c044 = (word) &var_c4272;
       (void) (word) XR_Enable(( ((word)  (fPt) NoName_Q564) ), ( ((word)  (fPt) NoName_Q624) ), var_c044);
      };
SOURCE(784, 23)
   (void) XR_SetThreadProperty(var_c4272.f5/* old_v3372 */ );
   }

static word NoName_Q564(formal_c040)
   word formal_c040;
   {
SOURCE(740, 42)
   {
      word pd6;
      pd6 = (* (( (ptr) formal_c040)+4) );
      (void) ( *( (fPt) ((*  (ptr) pd6 ))))(pd6);
      };
   return(0);
   }

static word GetPropList_P180()
   {
   register ptr gf_c4336 =  (ptr) &globalframe;
   word propList_v2892;
   /* GetPropList: */ 
SOURCE(812, 108)
SOURCE(812, 108)
   propList_v2892 = 0;
SOURCE(881, 39)
   propList_v2892 = XR_Narrow((word) XR_GetThreadProperty(), (* (( (ptr) gf_c4336)+8) ));
SOURCE(812, 108)
   return(propList_v2892);
   }

static word GetProp_P240(key_v2952)
   word key_v2952;
   {
   register ptr gf_c4368 =  (ptr) &globalframe;
   word prop_v3012;
   word propList_v3416;
   /* GetProp: */ 
SOURCE(926, 228)
SOURCE(926, 228)
   prop_v3012 = 0;
SOURCE(996, 46)
   propList_v3416 = XR_Narrow((word) XR_GetThreadProperty(), (* (( (ptr) gf_c4368)+8) ));
SOURCE(1044, 110)
   lab_L100010: ;
   if ((propList_v3416 != 0)) {
      }
   else {
      goto lab_L100008;
      };
SOURCE(1068, 60)
   if (((*  (ptr) (*  (ptr) propList_v3416 ) ) == key_v2952)) {
SOURCE(1101, 27)
      return((* (( (ptr) (*  (ptr) propList_v3416 ))+1) ));
      };
SOURCE(1130, 24)
   propList_v3416 = (* (( (ptr) propList_v3416)+1) );
   goto lab_L100010;
   lab_L100008: ;
SOURCE(926, 228)
   return(prop_v3012);
   }

static void NoName_Q624(formal_c030, formal_c200004, formal_c200005, formal_c200006, formal_c200007)
   word formal_c030;
   word formal_c200004;
   word formal_c200005;
   word formal_c200006;
   word formal_c200007;
   {
   if ((formal_c200005 == XR_Unwind)) {
SOURCE(758, 24)
      (void) XR_SetThreadProperty((* ((( (ptr) formal_c200004)+5)) ));
      };
   (*  (ptr) formal_c030 ) = 0;
   (* (( (ptr) formal_c030)+1) ) = 0;
   return;
   }

static void NoName_Q684(formal_c035, formal_c200000, formal_c200001, formal_c200002, formal_c200003)
   word formal_c035;
   word formal_c200000;
   word formal_c200001;
   word formal_c200002;
   word formal_c200003;
   {
   if ((formal_c200001 == XR_Unwind)) {
SOURCE(551, 24)
      (void) XR_SetThreadProperty((* ((( (ptr) formal_c200000)+5)) ));
      };
   (*  (ptr) formal_c035 ) = 0;
   (* (( (ptr) formal_c035)+1) ) = 0;
   return;
   }

/* file: ProcessPropsImpl, module: ProcessPropsImpl, compiled at: February 21, 1992 9:36:46 pm PST */ 
extern void XR_install_ProcessPropsImpl() {
   NoName_Q444();
   }
extern void XR_run_ProcessPropsImpl() { XR_Start(&globalframe); }