/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: April 21, 1992 2:58:39 pm PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: XlImplSpecialMonitor, module: XlImplSpecialMonitor */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [3270525903,4026492274] XlImplSpecialMonitor";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {word f0, f1;} W2;
#define SOURCE(p, l) /* source p, l */
static void NoName_Q780();
static void XlImplSpecialMonitor_P0();
static word PutEventProp_P60();
static word GetEventProp_P120();
static void PutConnectionProp_P180();
static word GetConnectionProp_P240();
static word GetConnectionPropAndInit_P300();
static word WrapInit_P720();
static void PutScreenProp_P360();
static word GetScreenProp_P420();
static void PutScreenDepthProp_P480();
static word GetScreenDepthProp_P540();
static void PutVisualTypeProp_P600();
static word GetVisualTypeProp_P660();
static struct {unsigned f; char r[4];} string1 = {65540, "\251\000\000"};
static struct {unsigned f; char r[4];} string2 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string3 = {65537, "\001\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[4];} string6 = {65540, "x\000\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\302\360\103\317\300\357\377\145\162\100\164\000\000"};
static struct {unsigned f; char r[4];} string8 = {131074, "\003\014\000"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\256\042\060\232\300\060\151\325\207\100\150\000\000"};
static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\325\254\237\140\300\010\077\265\175\100\150\000\000"};
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[16];} string12 = {851984, "\257\300M2J\336\300Gu\3743@h\000\000"};
static struct {
   word f0[13]; 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; 
   word f32; word f33; word f34; word f35; 
   word f36[4]; 
   } globalframe = {
   {0}, (word) GetVisualTypeProp_P660, 0, (word) PutVisualTypeProp_P600, 
   0, (word) GetScreenDepthProp_P540, 0, (word) PutScreenDepthProp_P480, 
   0, (word) GetScreenProp_P420, 0, (word) PutScreenProp_P360, 
   0, (word) GetConnectionPropAndInit_P300, 0, (word) GetConnectionProp_P240, 
   0, (word) PutConnectionProp_P180, 0, (word) GetEventProp_P120, 
   0, (word) PutEventProp_P60, 0, (word) XlImplSpecialMonitor_P0, 
   {0}
   };

static void NoName_Q780()
   {
   register ptr gf_c069 =  (ptr) &globalframe;
   word var_c11112;
   (* (( (ptr) gf_c069)+8) ) = (word) XR_GetTypeIndexS((word) (&string1));
   (* (( (ptr) gf_c069)+9) ) = (word) XR_GetTypeIndex((word) &string2, 0, (word) &string3);
   (* (( (ptr) gf_c069)+11) ) = (word) XR_GetTypeIndex((word) &string4, 0, (word) &string5);
   (*  (ptr) (( (bPt) gf_c069)+48) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c069)+9) ), (word) &string6);
   (void) XR_DeclareGlobalFrame((word) "XlImplSpecialMonitor", &globalframe, (word) XR_GetTypeIndex((word) &string7, 0, (word) &string8)
      , (word) (( (bPt) gf_c069)+140)/* var_c10632 */ );
   var_c11112 = (word) XR_ImportInterface((word) "PropList", (word) XR_GetTypeIndexS((word) (&string9)), 13);
   (* (( (ptr) gf_c069)+38)/* var_c10760 */  ) = var_c11112;
   (void) XR_ImportProcS(var_c11112, 135268612);
   (void) XR_ImportProcS(var_c11112, 67634434);
   (void) XR_ImportProcS(var_c11112, 67896835);
   var_c11112 = (word) XR_ImportInterface((word) "UnsafePropList", (word) XR_GetTypeIndexS((word) (&string10)), 9);
   (* (( (ptr) gf_c069)+37)/* var_c10696 */  ) = var_c11112;
   (void) XR_ImportProcS(var_c11112, 67633154);
   (void) XR_ImportProcS(var_c11112, 67895555);
   var_c11112 = (word) XR_ExportInterface((word) "Xl", (word) XR_GetTypeIndexS((word) (&string11)), 218);
   (* (( (ptr) gf_c069)+39)/* var_c11144 */  ) = var_c11112;
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+116)/* var_c10536 */ , 792323);
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+108)/* var_c10504 */ , 67639298);
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+100)/* var_c10472 */ , 67901699);
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+92)/* var_c10440 */ , 793091);
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+84)/* var_c10408 */ , 67640066);
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+76)/* var_c10376 */ , 793603);
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+68)/* var_c10344 */ , 67640578);
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+60)/* var_c10312 */ , 794115);
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+52)/* var_c10280 */ , 67641090);
   var_c11112 = (word) XR_ExportInterface((word) "XlEventProperties", (word) XR_GetTypeIndexS((word) (&string12)), 2);
   (* (( (ptr) gf_c069)+39)/* var_c11144 */  ) = var_c11112;
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+124)/* var_c10568 */ , 67633154);
   (void) XR_ExportProcS(var_c11112, (word) (( (bPt) gf_c069)+132)/* var_c10600 */ , 67895555);
   }

static void XlImplSpecialMonitor_P0(formal_c021, formal_c020)
   word formal_c021;
   word formal_c020;
   {
   /* XlImplSpecialMonitor: */ 
   }

static word PutEventProp_P60(ev_v2940, key_v2968, val_v2996)
   word ev_v2940;
   word key_v2968;
   word val_v2996;
   {
   register ptr gf_c11176 =  (ptr) &globalframe;
   word var_c3068;
   word event_v4632;
   /* PutEventProp: */ 
SOURCE(227, 194)
SOURCE(314, 37)
   event_v4632 = ev_v2940;
SOURCE(353, 68)
   {
      word pd13;
      pd13 = (* (( (ptr) (* (( (ptr) gf_c11176)+37)/* var_c10696 */  ))+5) );
      return((word) ( *( (fPt) ((*  (ptr) pd13 ))))((word) (( (bPt) event_v4632)+12), key_v2968, val_v2996, pd13));
      };
   }

static word GetEventProp_P120(ev_v3140, key_v3168)
   word ev_v3140;
   word key_v3168;
   {
   register ptr gf_c11208 =  (ptr) &globalframe;
   word var_c3224;
   word event_v4688;
   /* GetEventProp: */ 
SOURCE(425, 179)
SOURCE(502, 37)
   event_v4688 = ev_v3140;
SOURCE(541, 63)
   {
      word pd14;
      pd14 = (* (( (ptr) (* (( (ptr) gf_c11208)+37)/* var_c10696 */  ))+4) );
      return((word) ( *( (fPt) ((*  (ptr) pd14 ))))((word) (( (bPt) event_v4688)+12), key_v3168, pd14));
      };
   }

static void PutConnectionProp_P180(c_v3296, key_v3324, val_v3352)
   word c_v3296;
   word key_v3324;
   word val_v3352;
   {
   register ptr gf_c11240 =  (ptr) &globalframe;
   /* PutConnectionProp: */ 
SOURCE(608, 120)
SOURCE(682, 46)
   {
      word var_c10792;
      word pd15;
      pd15 = (* (( (ptr) (* (( (ptr) gf_c11240)+38)/* var_c10760 */  ))+10) );
      var_c10792 = (word) ( *( (fPt) ((*  (ptr) pd15 ))))((* (( (ptr) c_v3296)+29) ), key_v3324, val_v3352, pd15);
      };
   }

static word GetConnectionProp_P240(c_v3436, key_v3464)
   word c_v3436;
   word key_v3464;
   {
   register ptr gf_c11272 =  (ptr) &globalframe;
   word var_c3520;
   /* GetConnectionProp: */ 
SOURCE(732, 125)
SOURCE(810, 47)
   {
      word pd16;
      pd16 = (* (( (ptr) (* (( (ptr) gf_c11272)+38)/* var_c10760 */  ))+9) );
      return((word) ( *( (fPt) ((*  (ptr) pd16 ))))((* (( (ptr) c_v3436)+29) ), key_v3464, pd16));
      };
   }

static word GetConnectionPropAndInit_P300(c_v3592, key_v3620, formal_c085)
   word c_v3592;
   word key_v3620;
   word formal_c085;
   {
   W7 var_c11304;
   /* declaration of init_v3648 skipped */ 
   register ptr gf_c11336 =  (ptr) &globalframe;
   word val_v3704;
   /* declaration of var_c10856 skipped */ 
   W2 var_c043;
   var_c11304.f4/* init_v3648 */  = formal_c085;
   /* GetConnectionPropAndInit: */ 
SOURCE(861, 260)
   {
      word tmpAddr17;
      tmpAddr17 = (word) (( (ptr) &var_c11304)+5)/* var_c10856 */ ;
      (*  (ptr) tmpAddr17 ) = ( ((word)  (fPt) WrapInit_P720) );
      (* (( (ptr) tmpAddr17) + 1) ) = 1;
      };
SOURCE(861, 260)
   val_v3704 = 0;
SOURCE(1056, 65)
   {
      word pd18;
      pd18 = (* (( (ptr) (* (( (ptr) gf_c11336)+38)/* var_c10760 */  ))+13) );
      (void) ( *( (fPt) ((*  (ptr) pd18 ))))((word) &var_c043, (* (( (ptr) c_v3592)+29) ), key_v3620, (word) (( (bPt) &var_c11304)+20)
         /* var_c10856 */ , c_v3592, pd18);
      };
   val_v3704 = var_c043.f0;
SOURCE(861, 260)
   return(val_v3704);
   }

static word WrapInit_P720(data_v6920, key_v6948, formal_c11400)
   word data_v6920;
   word key_v6948;
   word formal_c11400;
   {
   register ptr gf_c11368 =  (ptr) &globalframe;
   word val_v6992;
   formal_c11400 = (formal_c11400 - 20);
   /* WrapInit: */ 
SOURCE(981, 72)
SOURCE(981, 72)
   val_v6992 = (* (( (ptr) gf_c11368)+12) );
SOURCE(1023, 30)
   {
      word var_c10888;
      var_c10888 = XR_Narrow(data_v6920, (* (( (ptr) gf_c11368)+11) ));
      {
         word pd19;
         pd19 = (* (( (ptr) formal_c11400)+4) );
         val_v6992 = (word) ( *( (fPt) ((*  (ptr) pd19 ))))(var_c10888, key_v6948, pd19);
         };
      };
SOURCE(981, 72)
   return(val_v6992);
   }

static void PutScreenProp_P360(screen_v3776, key_v3804, val_v3832)
   word screen_v3776;
   word key_v3804;
   word val_v3832;
   {
   register ptr gf_c11432 =  (ptr) &globalframe;
   /* PutScreenProp: */ 
SOURCE(1125, 128)
SOURCE(1202, 51)
   {
      word var_c10920;
      word pd20;
      pd20 = (* (( (ptr) (* (( (ptr) gf_c11432)+38)/* var_c10760 */  ))+10) );
      var_c10920 = (word) ( *( (fPt) ((*  (ptr) pd20 ))))((* (( (ptr) screen_v3776)+18) ), key_v3804, val_v3832, pd20);
      };
   }

static word GetScreenProp_P420(screen_v3916, key_v3944)
   word screen_v3916;
   word key_v3944;
   {
   register ptr gf_c11464 =  (ptr) &globalframe;
   word val_v4000;
   /* GetScreenProp: */ 
SOURCE(1257, 132)
SOURCE(1257, 132)
   val_v4000 = 0;
SOURCE(1337, 52)
   {
      word pd21;
      pd21 = (* (( (ptr) (* (( (ptr) gf_c11464)+38)/* var_c10760 */  ))+9) );
      return((word) ( *( (fPt) ((*  (ptr) pd21 ))))((* (( (ptr) screen_v3916)+18) ), key_v3944, pd21));
      };
   }

static void PutScreenDepthProp_P480(sd_v4072, key_v4100, val_v4128)
   word sd_v4072;
   word key_v4100;
   word val_v4128;
   {
   register ptr gf_c11496 =  (ptr) &globalframe;
   /* PutScreenDepthProp: */ 
SOURCE(1392, 130)
SOURCE(1475, 47)
   {
      word var_c10984;
      word pd22;
      pd22 = (* (( (ptr) (* (( (ptr) gf_c11496)+38)/* var_c10760 */  ))+10) );
      var_c10984 = (word) ( *( (fPt) ((*  (ptr) pd22 ))))((* (( (ptr) sd_v4072)+2) ), key_v4100, val_v4128, pd22);
      };
   }

static word GetScreenDepthProp_P540(sd_v4212, key_v4240)
   word sd_v4212;
   word key_v4240;
   {
   register ptr gf_c11528 =  (ptr) &globalframe;
   word val_v4296;
   /* GetScreenDepthProp: */ 
SOURCE(1526, 134)
SOURCE(1526, 134)
   val_v4296 = 0;
SOURCE(1612, 48)
   {
      word pd23;
      pd23 = (* (( (ptr) (* (( (ptr) gf_c11528)+38)/* var_c10760 */  ))+9) );
      return((word) ( *( (fPt) ((*  (ptr) pd23 ))))((* (( (ptr) sd_v4212)+2) ), key_v4240, pd23));
      };
   }

static void PutVisualTypeProp_P600(vt_v4368, key_v4396, val_v4424)
   word vt_v4368;
   word key_v4396;
   word val_v4424;
   {
   register ptr gf_c11560 =  (ptr) &globalframe;
   /* PutVisualTypeProp: */ 
SOURCE(1663, 128)
SOURCE(1744, 47)
   {
      word var_c11048;
      word pd24;
      pd24 = (* (( (ptr) (* (( (ptr) gf_c11560)+38)/* var_c10760 */  ))+10) );
      var_c11048 = (word) ( *( (fPt) ((*  (ptr) pd24 ))))((* (( (ptr) vt_v4368)+7) ), key_v4396, val_v4424, pd24);
      };
   }

static word GetVisualTypeProp_P660(vt_v4508, key_v4536)
   word vt_v4508;
   word key_v4536;
   {
   register ptr gf_c11592 =  (ptr) &globalframe;
   word val_v4592;
   /* GetVisualTypeProp: */ 
SOURCE(1795, 132)
SOURCE(1795, 132)
   val_v4592 = 0;
SOURCE(1879, 48)
   {
      word pd25;
      pd25 = (* (( (ptr) (* (( (ptr) gf_c11592)+38)/* var_c10760 */  ))+9) );
      return((word) ( *( (fPt) ((*  (ptr) pd25 ))))((* (( (ptr) vt_v4508)+7) ), key_v4536, pd25));
      };
   }

/* file: XlImplSpecialMonitor, module: XlImplSpecialMonitor, compiled at: April 21, 1992 2:58:38 pm PDT */ 
extern void XR_install_XlImplSpecialMonitor() {
   NoName_Q780();
   }
extern void XR_run_XlImplSpecialMonitor() { XR_Start(&globalframe); }