/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: March 20, 1992 2:15:13 pm PST */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: FanoutStreamImpl, module: FanoutStreamImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [1814087323,2970648990] FanoutStreamImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; W8 r;} W16;
typedef struct {word f0, f1, f2;} W3;
typedef struct {W16 f; W3 r;} W19;
typedef word (*fPt)();
typedef struct {W8 f; word r;} W9;
typedef struct {W8 f; W3 r;} W11;
typedef W3 *W3Pt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
#define SOURCE(p, l) /* source p, l */
static void NoName←Q1692();
static void FanoutStreamImpl←P0();
static word Create←P60();
static void EntryAdd←P120();
static void EntryRemove←P180();
static void AddSlave←P240();
static void RemoveSlave←P300();
static void FanoutStreamPutChar←P360();
static void ProtectedFanoutStreamPutChar←P420();
static word NoName←Q1752();
static void FanoutStreamPutBlock←P480();
static void ProtectedFanoutStreamPutBlock←P540();
static word NoName←Q1812();
static void FanoutStreamUnsafePutBlock←P600();
static void ProtectedFanoutStreamUnsafePutBlock←P660();
static word NoName←Q1872();
static void FanoutStreamFlush←P720();
static void ProtectedFanoutStreamFlush←P780();
static word NoName←Q1932();
static void ProtectedFanoutStreamEraseChar←P840();
static word NoName←Q1992();
static void ProtectedFanoutStreamReset←P900();
static word NoName←Q2052();
static void ProtectedFanoutStreamClose←P960();
static word NoName←Q2112();
static void NoName←Q2172();
static void NoName←Q2232();
static void NoName←Q2292();
static void NoName←Q2352();
static void NoName←Q2412();
static void NoName←Q2472();
static void NoName←Q2532();
static struct {unsigned f; char r[4];} string1 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"};
static struct {unsigned f; char r[48];} string3 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\015\277\004\146\300\034\367\146\045\112\064\005\004\162\145\163\164\214\216\257\300\015\277\004\146\300\034\367\146\045\112\064\261\000\000\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\154\040\306\233\300\261\020\201\236\100\200\000\000"};
static struct {unsigned f; char r[4];} string6 = {131074, "\003\002\000"};
static struct {unsigned f; char r[16];} string7 = {917520, "DribbleOutput2\000"};
static struct {unsigned f; char r[16];} string8 = {851984, "DribbleOutput\000\000"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\154\040\306\233\300\261\020\201\236\100\164\000\000"};
static struct {unsigned f; char r[12];} string10 = {589833, "\006\003 \001$\001<\004\003\000\000"};
static struct {unsigned f; char r[16];} string11 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string12 = {851984, "\257\300\165\000\243\166\300\177\026\106\323\100\150\000\000"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\176\205\123\106\300\155\262\343\054\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; word f29; word f30; word f31; 
   word f32; word f33; word f34; word f35; 
   word f36; word f37; word f38; word f39; 
   word f40; word f41; word f42; word f43; 
   word f44; word f45; word f46; word f47; 
   word f48; word f49; word f50[4]; 
   } globalframe = {
   {0}, (word) ProtectedFanoutStreamClose←P960, 0, (word) ProtectedFanoutStreamReset←P900, 
   0, (word) ProtectedFanoutStreamEraseChar←P840, 0, (word) ProtectedFanoutStreamFlush←P780, 
   0, (word) FanoutStreamFlush←P720, 0, (word) ProtectedFanoutStreamUnsafePutBlock←P660, 
   0, (word) FanoutStreamUnsafePutBlock←P600, 0, (word) ProtectedFanoutStreamPutBlock←P540, 
   0, (word) FanoutStreamPutBlock←P480, 0, (word) ProtectedFanoutStreamPutChar←P420, 
   0, (word) FanoutStreamPutChar←P360, 0, (word) RemoveSlave←P300, 
   0, (word) AddSlave←P240, 0, (word) EntryRemove←P180, 
   0, (word) EntryAdd←P120, 0, (word) Create←P60, 
   0, (word) FanoutStreamImpl←P0, {0}
   };

static void NoName←Q1692()
   {
   register ptr gf←c0178 =  (ptr) &globalframe;
   word var←c14136;
   (* (( (ptr) gf←c0178)+10) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf←c0178)+11) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf←c0178)+13) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string6);
   (*  (ptr) (( (bPt) gf←c0178)+60) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0178)+10) ), (word) &string7);
   (*  (ptr) (( (bPt) gf←c0178)+64) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0178)+10) ), (word) &string8);
   (void) XR←DeclareGlobalFrame((word) "FanoutStreamImpl", &globalframe, (word) XR←GetTypeIndex((word) &string9, 0, (word) &string10)
      , (word) (( (bPt) gf←c0178)+196)/* var←c13912 */ );
   var←c14136 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string11)), 103);
   (* (( (ptr) gf←c0178)+51)/* var←c13944 */  ) = var←c14136;
   (void) XR←ImportProcS(var←c14136, 530434);
   (void) XR←ImportProcS(var←c14136, 268033);
   (void) XR←ImportProcS(var←c14136, 529922);
   (void) XR←ImportProcS(var←c14136, 267521);
   (void) XR←ImportProcS(var←c14136, 1053698);
   (void) XR←ImportProcS(var←c14136, 1053444);
   (void) XR←ImportProcS(var←c14136, 528642);
   (void) XR←ImportProcS(var←c14136, 67921155);
   (void) XR←ImportProcS(var←c14136, 72115219);
   var←c14136 = (word) XR←ImportInterface((word) "IOUtils", (word) XR←GetTypeIndexS((word) (&string12)), 27);
   (* (( (ptr) gf←c0178)+52)/* var←c14104 */  ) = var←c14136;
   var←c14136 = (word) XR←ExportInterface((word) "FanoutStream", (word) XR←GetTypeIndexS((word) (&string13)), 3);
   (* (( (ptr) gf←c0178)+53)/* var←c14168 */  ) = var←c14136;
   (void) XR←ExportProcS(var←c14136, (word) (( (bPt) gf←c0178)+188)/* var←c13880 */ , 67633154);
   (void) XR←ExportProcS(var←c14136, (word) (( (bPt) gf←c0178)+164)/* var←c13784 */ , 524546);
   (void) XR←ExportProcS(var←c14136, (word) (( (bPt) gf←c0178)+156)/* var←c13752 */ , 524802);
   }

static void FanoutStreamImpl←P0(formal←c051, formal←c048)
   word formal←c051;
   word formal←c048;
   {
   register ptr gf←c14200 =  (ptr) &globalframe;
   /* FanoutStreamImpl: */ 
SOURCE(222, 5345)
SOURCE(540, 348)
   {
      W19 var←c049;
      (*  (ptr) (word) &var←c049 ) = 1;
      (* (( (ptr) (word) &var←c049) + 1) ) = (* (( (ptr) gf←c14200)+16) );
      (* (( (ptr) (word) &var←c049) + 2) ) = 0;
      (* (( (ptr) (word) &var←c049) + 3) ) = 0;
      (* (( (ptr) (word) &var←c049) + 4) ) = 0;
      (* (( (ptr) (word) &var←c049) + 5) ) = 0;
      (* (( (ptr) (word) &var←c049) + 6) ) = 0;
      (* (( (ptr) (word) &var←c049) + 7) ) = 0;
      (* (( (ptr) (word) &var←c049) + 8) ) = (word) (( (bPt) gf←c14200)+148)/* var←c13720 */ ;
      (* (( (ptr) (word) &var←c049) + 9) ) = (word) (( (bPt) gf←c14200)+132)/* var←c13656 */ ;
      (* (( (ptr) (word) &var←c049) + 10) ) = (word) (( (bPt) gf←c14200)+116)/* var←c13592 */ ;
      (* (( (ptr) (word) &var←c049) + 11) ) = (word) (( (bPt) gf←c14200)+100)/* var←c13528 */ ;
      (* (( (ptr) (word) &var←c049) + 12) ) = (word) (( (bPt) gf←c14200)+76)/* var←c13432 */ ;
      (* (( (ptr) (word) &var←c049) + 13) ) = (word) (( (bPt) gf←c14200)+68)/* var←c13400 */ ;
      (* (( (ptr) (word) &var←c049) + 14) ) = 0;
      (* (( (ptr) (word) &var←c049) + 15) ) = 0;
      (* (( (ptr) (word) &var←c049) + 16) ) = 0;
      (* (( (ptr) (word) &var←c049) + 17) ) = 0;
      (* (( (ptr) (word) &var←c049) + 18) ) = (word) (( (bPt) gf←c14200)+84)/* var←c13464 */ ;
      {
         word pd14;
         pd14 = (* (( (ptr) (* (( (ptr) gf←c14200)+51)/* var←c13944 */  ))+104) );
         (* (( (ptr) gf←c14200)+8)/* fanoutStreamProcs←v2636 */  ) = (word) ( *( (fPt) ((*  (ptr) pd14 ))))((word) (&var←c049), pd14)
         ;
         };
      };
SOURCE(891, 394)
   {
      W19 var←c050;
      (*  (ptr) (word) &var←c050 ) = 1;
      (* (( (ptr) (word) &var←c050) + 1) ) = (* (( (ptr) gf←c14200)+15) );
      (* (( (ptr) (word) &var←c050) + 2) ) = 0;
      (* (( (ptr) (word) &var←c050) + 3) ) = 0;
      (* (( (ptr) (word) &var←c050) + 4) ) = 0;
      (* (( (ptr) (word) &var←c050) + 5) ) = 0;
      (* (( (ptr) (word) &var←c050) + 6) ) = 0;
      (* (( (ptr) (word) &var←c050) + 7) ) = 0;
      (* (( (ptr) (word) &var←c050) + 8) ) = (word) (( (bPt) gf←c14200)+140)/* var←c13688 */ ;
      (* (( (ptr) (word) &var←c050) + 9) ) = (word) (( (bPt) gf←c14200)+124)/* var←c13624 */ ;
      (* (( (ptr) (word) &var←c050) + 10) ) = (word) (( (bPt) gf←c14200)+108)/* var←c13560 */ ;
      (* (( (ptr) (word) &var←c050) + 11) ) = (word) (( (bPt) gf←c14200)+92)/* var←c13496 */ ;
      (* (( (ptr) (word) &var←c050) + 12) ) = (word) (( (bPt) gf←c14200)+76)/* var←c13432 */ ;
      (* (( (ptr) (word) &var←c050) + 13) ) = (word) (( (bPt) gf←c14200)+68)/* var←c13400 */ ;
      (* (( (ptr) (word) &var←c050) + 14) ) = 0;
      (* (( (ptr) (word) &var←c050) + 15) ) = 0;
      (* (( (ptr) (word) &var←c050) + 16) ) = 0;
      (* (( (ptr) (word) &var←c050) + 17) ) = 0;
      (* (( (ptr) (word) &var←c050) + 18) ) = (word) (( (bPt) gf←c14200)+84)/* var←c13464 */ ;
      {
         word pd15;
         pd15 = (* (( (ptr) (* (( (ptr) gf←c14200)+51)/* var←c13944 */  ))+104) );
         (* (( (ptr) gf←c14200)+9)/* protectedFanoutStreamProcs←v2664 */  ) = (word) ( *( (fPt) ((*  (ptr) pd15 ))))((word) (&var←c050), pd15)
         ;
         };
      };
   }

static word Create←P60(reportErrors←v3412, forwardClose←v3440)
   word reportErrors←v3412;
   word forwardClose←v3440;
   {
   register ptr gf←c14232 =  (ptr) &globalframe;
   word var←c3484;
   /* Create: */ 
SOURCE(1288, 304)
SOURCE(1386, 206)
   {
      word var←c14040;
      word var←c14008;
      var←c14040 = XR←NewObject(12, (* (( (ptr) gf←c14232)+13) ));
      (*  (ptr) var←c14040 ) = reportErrors←v3412;
      (* (( (ptr) var←c14040)+1) ) = forwardClose←v3440;
      var←c14008 = var←c14040;
      {
         word pd16;
         pd16 = (* (( (ptr) (* (( (ptr) gf←c14232)+51)/* var←c13944 */  ))+105) );
         return((word) ( *( (fPt) ((*  (ptr) pd16 ))))( ( (0 != reportErrors←v3412) ? (* (( (ptr) gf←c14232)+8)/* fanoutStreamProcs←v2636 */  ) : (* (
               ( (ptr) gf←c14232)+9)/* protectedFanoutStreamProcs←v2664 */  ) ) , var←c14008, 0, pd16));
         };
      };
   }

static void EntryAdd←P120(data←v3544, slave←v3572)
   word data←v3544;
   word slave←v3572;
   {
   register ptr gf←c14264 =  (ptr) &globalframe;
   /* EntryAdd: */ 
SOURCE(1598, 225)
   (void) (XR←MonitorEntry((word) (( (bPt) gf←c14264)+16)/* LOCK←v2524 */ ));
SOURCE(1666, 157)
   if ((data←v3544 != 0)) {
SOURCE(1685, 89)
      {
         register word l←v4884;
         l←v4884 = (* (( (ptr) data←v3544)+2) );
         lab←L100003: ;
         if ((l←v4884 != 0)) {
            }
         else {
            goto lab←L100000;
            };
SOURCE(1744, 30)
         if (((*  (ptr) l←v4884 ) == slave←v3572)) {
SOURCE(1768, 6)
            (void) (XR←MonitorExit((word) (( (bPt) gf←c14264)+16)/* LOCK←v2524 */ ));
            return;
            };
         l←v4884 = (* (( (ptr) l←v4884)+1) );
         goto lab←L100003;
         lab←L100000: ;
         };
SOURCE(1785, 38)
      {
         word var←c14072;
         var←c14072 = XR←NewObject(8, (* (( (ptr) gf←c14264)+11) ));
         (*  (ptr) var←c14072 ) = slave←v3572;
         (* (( (ptr) var←c14072)+1) ) = (* (( (ptr) data←v3544)+2) );
         (* (( (ptr) data←v3544)+2) ) = var←c14072;
         };
      };
SOURCE(1598, 225)
   (void) (XR←MonitorExit((word) (( (bPt) gf←c14264)+16)/* LOCK←v2524 */ ));
   return;
   }

static void EntryRemove←P180(data←v3632, slave←v3660)
   word data←v3632;
   word slave←v3660;
   {
   register ptr gf←c14296 =  (ptr) &globalframe;
   /* EntryRemove: */ 
SOURCE(1832, 341)
   (void) (XR←MonitorEntry((word) (( (bPt) gf←c14296)+16)/* LOCK←v2524 */ ));
SOURCE(1903, 270)
   if ((data←v3632 != 0)) {
SOURCE(1922, 91)
      lab←L100006: ;
      if ( ( ((* (( (ptr) data←v3632)+2) ) != 0) ? ((*  (ptr) (* (( (ptr) data←v3632)+2) ) ) == slave←v3660) : 0 ) ) {
         }
      else {
         goto lab←L100004;
         };
SOURCE(1975, 38)
      (* (( (ptr) data←v3632)+2) ) = (* (( (ptr) (* (( (ptr) data←v3632)+2) ))+1) );
      goto lab←L100006;
      lab←L100004: ;
SOURCE(2015, 158)
      {
         word lag←v5012;
SOURCE(2021, 5)
         lag←v5012 = (* (( (ptr) data←v3632)+2) );
SOURCE(2056, 117)
         lab←L100009: ;
         if ( ( (lag←v5012 != 0) ? ((* (( (ptr) lag←v5012)+1) ) != 0) : 0 ) ) {
            }
         else {
            goto lab←L100007;
            };
SOURCE(2090, 83)
         if (((*  (ptr) (* (( (ptr) lag←v5012)+1) ) ) == slave←v3660)) {
SOURCE(2119, 30)
            (* (( (ptr) lag←v5012)+1) ) = (* (( (ptr) (* (( (ptr) lag←v5012)+1) ))+1) );
            }
         else {
SOURCE(2149, 24)
            lag←v5012 = (* (( (ptr) lag←v5012)+1) );
            };
         goto lab←L100009;
         lab←L100007: ;
         };
      };
SOURCE(1832, 341)
   (void) (XR←MonitorExit((word) (( (bPt) gf←c14296)+16)/* LOCK←v2524 */ ));
   return;
   }

static void AddSlave←P240(master←v3720, slave←v3748)
   word master←v3720;
   word slave←v3748;
   {
   register ptr gf←c14328 =  (ptr) &globalframe;
   word data←v5140;
   /* AddSlave: */ 
SOURCE(2184, 137)
SOURCE(2248, 50)
   data←v5140 = XR←Narrow((* (( (ptr) master←v3720)+1) ), (* (( (ptr) gf←c14328)+13) ));
SOURCE(2300, 21)
   (void) EntryAdd←P120(data←v5140, slave←v3748);
   }

static void RemoveSlave←P300(master←v3808, slave←v3836)
   word master←v3808;
   word slave←v3836;
   {
   register ptr gf←c14360 =  (ptr) &globalframe;
   /* RemoveSlave: */ 
SOURCE(2326, 178)
SOURCE(2393, 111)
   if ( ( (master←v3808 != 0) ? (slave←v3836 != 0) : 0 ) ) {
SOURCE(2426, 80)
      {
         word data←v5184;
SOURCE(2428, 50)
         data←v5184 = XR←Narrow((* (( (ptr) master←v3808)+1) ), (* (( (ptr) gf←c14360)+13) ));
SOURCE(2480, 24)
         (void) EntryRemove←P180(data←v5184, slave←v3836);
         };
      };
   }

static void FanoutStreamPutChar←P360(self←v3896, char←v3924)
   word self←v3896;
   word char←v3924;
   {
   register ptr gf←c14392 =  (ptr) &globalframe;
   word data←v5228;
   /* FanoutStreamPutChar: */ 
SOURCE(2513, 191)
SOURCE(2570, 48)
   data←v5228 = XR←Narrow((* (( (ptr) self←v3896)+1) ), (* (( (ptr) gf←c14392)+13) ));
SOURCE(2620, 84)
   {
      register word l←v5272;
      l←v5272 = (* (( (ptr) data←v5228)+2) );
      lab←L100013: ;
      if ((l←v5272 != 0)) {
         }
      else {
         goto lab←L100010;
         };
SOURCE(2679, 25)
      {
         word pd17;
         pd17 = (* (( (ptr) (* (( (ptr) gf←c14392)+51)/* var←c13944 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd17 ))))((*  (ptr) l←v5272 ), char←v3924, pd17);
         };
      l←v5272 = (* (( (ptr) l←v5272)+1) );
      goto lab←L100013;
      lab←L100010: ;
      };
   }

static void ProtectedFanoutStreamPutChar←P420(self←v3984, formal←c0231)
   word self←v3984;
   word formal←c0231;
   {
   W9 var←c14424;
   /* declaration of char←v4012 skipped */ 
   register ptr gf←c14456 =  (ptr) &globalframe;
   /* declaration of data←v5400 skipped */ 
   (* (( (ptr) &var←c14424)+4)/* char←v4012 */  ) = formal←c0231;
   /* ProtectedFanoutStreamPutChar: */ 
SOURCE(2718, 270)
SOURCE(2784, 48)
   (* (( (ptr) &var←c14424)+5)/* data←v5400 */  ) = XR←Narrow((* (( (ptr) self←v3984)+1) ), (* (( (ptr) gf←c14456)+13) ));
SOURCE(2834, 154)
   {
      /* declaration of l←v5444 skipped */ 
      (* (( (ptr) &var←c14424)+6)/* l←v5444 */  ) = (* (( (ptr) (* (( (ptr) &var←c14424)+5)/* data←v5400 */  ))+2) );
      lab←L100017: ;
      if (((* (( (ptr) &var←c14424)+6)/* l←v5444 */  ) != 0)) {
         }
      else {
         goto lab←L100014;
         };
SOURCE(2893, 95)
SOURCE(2893, 95)
      {
         /* declaration of var←c01 skipped */ 
         /* declaration of var←c02 skipped */ 
         (* (( (ptr) &var←c14424)+7)/* var←c01 */  ) = (*  (ptr) (* (( (ptr) &var←c14424)+6)/* l←v5444 */  ) );
         (* (( (ptr) &var←c14424)+8)/* var←c02 */  ) = (* (( (ptr) (* (( (ptr) gf←c14456)+51)/* var←c13944 */  ))+21) );
         {
            word var←c03;
            {
               word var←c0210;
               var←c0210 = (word) &var←c14424;
               var←c03 = (word) XR←Enable(( ((word)  (fPt) NoName←Q1752) ), ( ((word)  (fPt) NoName←Q2532) ), var←c0210);
               };
            /* removed trivial cond node */ 
            };
         };
      (* (( (ptr) &var←c14424)+6)/* l←v5444 */  ) = (* (( (ptr) (* (( (ptr) &var←c14424)+6)/* l←v5444 */  ))+1) );
      goto lab←L100017;
      lab←L100014: ;
      };
   }

static word NoName←Q1752(formal←c0187)
   word formal←c0187;
   {
SOURCE(2893, 95)
   {
      word pd18;
      pd18 = (* (( (ptr) formal←c0187)+8) );
      (void) ( *( (fPt) ((*  (ptr) pd18 ))))((* (( (ptr) formal←c0187)+7) ), (* (( (ptr) formal←c0187)+4) ), pd18);
      };
   return(0);
   }

static void FanoutStreamPutBlock←P480(self←v4072, block←v4100, startIndex←v4128, count←v4156)
   word self←v4072;
   word block←v4100;
   word startIndex←v4128;
   word count←v4156;
   {
   register ptr gf←c14488 =  (ptr) &globalframe;
   word data←v5572;
   /* FanoutStreamPutBlock: */ 
SOURCE(3015, 256)
SOURCE(3116, 48)
   data←v5572 = XR←Narrow((* (( (ptr) self←v4072)+1) ), (* (( (ptr) gf←c14488)+13) ));
SOURCE(3166, 105)
   {
      register word l←v5616;
      l←v5616 = (* (( (ptr) data←v5572)+2) );
      lab←L100025: ;
      if ((l←v5616 != 0)) {
         }
      else {
         goto lab←L100022;
         };
SOURCE(3225, 46)
      {
         word pd19;
         pd19 = (* (( (ptr) (* (( (ptr) gf←c14488)+51)/* var←c13944 */  ))+23) );
         (void) ( *( (fPt) ((*  (ptr) pd19 ))))((*  (ptr) l←v5616 ), block←v4100, startIndex←v4128, count←v4156, pd19);
         };
      l←v5616 = (* (( (ptr) l←v5616)+1) );
      goto lab←L100025;
      lab←L100022: ;
      };
   }

static void ProtectedFanoutStreamPutBlock←P540(self←v4228, formal←c0232, formal←c0233, formal←c0234)
   word self←v4228;
   word formal←c0232;
   word formal←c0233;
   word formal←c0234;
   {
   W11 var←c14520;
   /* declaration of block←v4256 skipped */ 
   /* declaration of startIndex←v4284 skipped */ 
   /* declaration of count←v4312 skipped */ 
   register ptr gf←c14552 =  (ptr) &globalframe;
   /* declaration of data←v5744 skipped */ 
   (* (( (ptr) &var←c14520)+4)/* block←v4256 */  ) = formal←c0232;
   (* (( (ptr) &var←c14520)+5)/* startIndex←v4284 */  ) = formal←c0233;
   (* (( (ptr) &var←c14520)+6)/* count←v4312 */  ) = formal←c0234;
   /* ProtectedFanoutStreamPutBlock: */ 
SOURCE(3285, 333)
SOURCE(3395, 48)
   (* (( (ptr) &var←c14520)+7)/* data←v5744 */  ) = XR←Narrow((* (( (ptr) self←v4228)+1) ), (* (( (ptr) gf←c14552)+13) ));
SOURCE(3445, 173)
   {
      /* declaration of l←v5788 skipped */ 
      (* (( (ptr) &var←c14520)+8)/* l←v5788 */  ) = (* (( (ptr) (* (( (ptr) &var←c14520)+7)/* data←v5744 */  ))+2) );
      lab←L100029: ;
      if (((* (( (ptr) &var←c14520)+8)/* l←v5788 */  ) != 0)) {
         }
      else {
         goto lab←L100026;
         };
SOURCE(3504, 114)
SOURCE(3504, 114)
      {
         /* declaration of var←c04 skipped */ 
         /* declaration of var←c05 skipped */ 
         (* (( (ptr) &var←c14520)+9)/* var←c04 */  ) = (*  (ptr) (* (( (ptr) &var←c14520)+8)/* l←v5788 */  ) );
         (* (( (ptr) &var←c14520)+10)/* var←c05 */  ) = (* (( (ptr) (* (( (ptr) gf←c14552)+51)/* var←c13944 */  ))+23) );
         {
            word var←c06;
            {
               word var←c0211;
               var←c0211 = (word) &var←c14520;
               var←c06 = (word) XR←Enable(( ((word)  (fPt) NoName←Q1812) ), ( ((word)  (fPt) NoName←Q2472) ), var←c0211);
               };
            /* removed trivial cond node */ 
            };
         };
      (* (( (ptr) &var←c14520)+8)/* l←v5788 */  ) = (* (( (ptr) (* (( (ptr) &var←c14520)+8)/* l←v5788 */  ))+1) );
      goto lab←L100029;
      lab←L100026: ;
      };
   }

static word NoName←Q1812(formal←c0190)
   word formal←c0190;
   {
SOURCE(3504, 114)
   {
      word pd20;
      pd20 = (* (( (ptr) formal←c0190)+10) );
      (void) ( *( (fPt) ((*  (ptr) pd20 ))))((* (( (ptr) formal←c0190)+9) ), (* (( (ptr) formal←c0190)+4) ), (* (( (ptr) formal←c0190)+5)
          ), (* (( (ptr) formal←c0190)+6) ), pd20);
      };
   return(0);
   }

static void FanoutStreamUnsafePutBlock←P600(self←v4384, block←v4412)
   word self←v4384;
   W3 block←v4412;
   {
   register ptr gf←c14584 =  (ptr) &globalframe;
   word data←v5916;
   /* FanoutStreamUnsafePutBlock: */ 
SOURCE(3645, 217)
SOURCE(3720, 48)
   data←v5916 = XR←Narrow((* (( (ptr) self←v4384)+1) ), (* (( (ptr) gf←c14584)+13) ));
SOURCE(3770, 92)
   {
      register word l←v5960;
      l←v5960 = (* (( (ptr) data←v5916)+2) );
      lab←L100037: ;
      if ((l←v5960 != 0)) {
         }
      else {
         goto lab←L100034;
         };
SOURCE(3829, 33)
      {
         word pd21;
         pd21 = (* (( (ptr) (* (( (ptr) gf←c14584)+51)/* var←c13944 */  ))+24) );
         (void) ( *( (fPt) ((*  (ptr) pd21 ))))((*  (ptr) l←v5960 ), block←v4412, pd21);
         };
      l←v5960 = (* (( (ptr) l←v5960)+1) );
      goto lab←L100037;
      lab←L100034: ;
      };
   }

static void ProtectedFanoutStreamUnsafePutBlock←P660(self←v4472, formal←c0235)
   word self←v4472;
   W3 formal←c0235;
   {
   W11 var←c14616;
   /* declaration of block←v4500 skipped */ 
   register ptr gf←c14648 =  (ptr) &globalframe;
   /* declaration of data←v6088 skipped */ 
   (*  (W3Pt) (( (ptr) &var←c14616)+4)/* block←v4500 */  ) = formal←c0235;
   /* ProtectedFanoutStreamUnsafePutBlock: */ 
SOURCE(3876, 294)
SOURCE(3960, 48)
   (* (( (ptr) &var←c14616)+7)/* data←v6088 */  ) = XR←Narrow((* (( (ptr) self←v4472)+1) ), (* (( (ptr) gf←c14648)+13) ));
SOURCE(4010, 160)
   {
      /* declaration of l←v6132 skipped */ 
      (* (( (ptr) &var←c14616)+8)/* l←v6132 */  ) = (* (( (ptr) (* (( (ptr) &var←c14616)+7)/* data←v6088 */  ))+2) );
      lab←L100041: ;
      if (((* (( (ptr) &var←c14616)+8)/* l←v6132 */  ) != 0)) {
         }
      else {
         goto lab←L100038;
         };
SOURCE(4069, 101)
SOURCE(4069, 101)
      {
         /* declaration of var←c07 skipped */ 
         /* declaration of var←c08 skipped */ 
         (* (( (ptr) &var←c14616)+9)/* var←c07 */  ) = (*  (ptr) (* (( (ptr) &var←c14616)+8)/* l←v6132 */  ) );
         (* (( (ptr) &var←c14616)+10)/* var←c08 */  ) = (* (( (ptr) (* (( (ptr) gf←c14648)+51)/* var←c13944 */  ))+24) );
         {
            word var←c09;
            {
               word var←c0212;
               var←c0212 = (word) &var←c14616;
               var←c09 = (word) XR←Enable(( ((word)  (fPt) NoName←Q1872) ), ( ((word)  (fPt) NoName←Q2412) ), var←c0212);
               };
            /* removed trivial cond node */ 
            };
         };
      (* (( (ptr) &var←c14616)+8)/* l←v6132 */  ) = (* (( (ptr) (* (( (ptr) &var←c14616)+8)/* l←v6132 */  ))+1) );
      goto lab←L100041;
      lab←L100038: ;
      };
   }

static word NoName←Q1872(formal←c0193)
   word formal←c0193;
   {
SOURCE(4069, 101)
   {
      word pd22;
      pd22 = (* (( (ptr) formal←c0193)+10) );
      (void) ( *( (fPt) ((*  (ptr) pd22 ))))((* (( (ptr) formal←c0193)+9) ), (*  (W3Pt) (( (ptr) formal←c0193)+4) ), pd22);
      };
   return(0);
   }

static void FanoutStreamFlush←P720(self←v4560)
   word self←v4560;
   {
   register ptr gf←c14680 =  (ptr) &globalframe;
   word data←v6260;
   /* FanoutStreamFlush: */ 
SOURCE(4197, 169)
SOURCE(4240, 48)
   data←v6260 = XR←Narrow((* (( (ptr) self←v4560)+1) ), (* (( (ptr) gf←c14680)+13) ));
SOURCE(4290, 76)
   {
      register word l←v6304;
      l←v6304 = (* (( (ptr) data←v6260)+2) );
      lab←L100049: ;
      if ((l←v6304 != 0)) {
         }
      else {
         goto lab←L100046;
         };
SOURCE(4349, 17)
      {
         word pd23;
         pd23 = (* (( (ptr) (* (( (ptr) gf←c14680)+51)/* var←c13944 */  ))+25) );
         (void) ( *( (fPt) ((*  (ptr) pd23 ))))((*  (ptr) (l←v6304) ), pd23);
         };
      l←v6304 = (* (( (ptr) l←v6304)+1) );
      goto lab←L100049;
      lab←L100046: ;
      };
   }

static void ProtectedFanoutStreamFlush←P780(self←v4620)
   word self←v4620;
   {
   W8 var←c14712;
   register ptr gf←c14744 =  (ptr) &globalframe;
   /* declaration of data←v6432 skipped */ 
   /* ProtectedFanoutStreamFlush: */ 
SOURCE(4380, 246)
SOURCE(4432, 48)
   var←c14712.f4/* data←v6432 */  = XR←Narrow((* (( (ptr) self←v4620)+1) ), (* (( (ptr) gf←c14744)+13) ));
SOURCE(4482, 144)
   {
      /* declaration of l←v6476 skipped */ 
      var←c14712.f5/* l←v6476 */  = (* (( (ptr) var←c14712.f4/* data←v6432 */ )+2) );
      lab←L100053: ;
      if ((var←c14712.f5/* l←v6476 */  != 0)) {
         }
      else {
         goto lab←L100050;
         };
SOURCE(4541, 85)
SOURCE(4541, 85)
      {
         /* declaration of var←c010 skipped */ 
         /* declaration of var←c011 skipped */ 
         var←c14712.f6/* var←c010 */  = (*  (ptr) var←c14712.f5/* l←v6476 */  );
         var←c14712.f7/* var←c011 */  = (* (( (ptr) (* (( (ptr) gf←c14744)+51)/* var←c13944 */  ))+25) );
         {
            word var←c012;
            {
               word var←c0213;
               var←c0213 = (word) &var←c14712;
               var←c012 = (word) XR←Enable(( ((word)  (fPt) NoName←Q1932) ), ( ((word)  (fPt) NoName←Q2352) ), var←c0213);
               };
            /* removed trivial cond node */ 
            };
         };
      var←c14712.f5/* l←v6476 */  = (* (( (ptr) var←c14712.f5/* l←v6476 */ )+1) );
      goto lab←L100053;
      lab←L100050: ;
      };
   }

static word NoName←Q1932(formal←c0196)
   word formal←c0196;
   {
SOURCE(4541, 85)
   {
      word pd24;
      pd24 = (* (( (ptr) formal←c0196)+7) );
      (void) ( *( (fPt) ((*  (ptr) pd24 ))))((* ((( (ptr) formal←c0196)+6)) ), pd24);
      };
   return(0);
   }

static void ProtectedFanoutStreamEraseChar←P840(self←v4680, formal←c0236)
   word self←v4680;
   word formal←c0236;
   {
   W9 var←c14776;
   /* declaration of char←v4708 skipped */ 
   register ptr gf←c14808 =  (ptr) &globalframe;
   /* declaration of data←v6604 skipped */ 
   (* (( (ptr) &var←c14776)+4)/* char←v4708 */  ) = formal←c0236;
   /* ProtectedFanoutStreamEraseChar: */ 
SOURCE(4653, 272)
SOURCE(4721, 48)
   (* (( (ptr) &var←c14776)+5)/* data←v6604 */  ) = XR←Narrow((* (( (ptr) self←v4680)+1) ), (* (( (ptr) gf←c14808)+13) ));
SOURCE(4771, 154)
   {
      /* declaration of l←v6648 skipped */ 
      (* (( (ptr) &var←c14776)+6)/* l←v6648 */  ) = (* (( (ptr) (* (( (ptr) &var←c14776)+5)/* data←v6604 */  ))+2) );
      lab←L100061: ;
      if (((* (( (ptr) &var←c14776)+6)/* l←v6648 */  ) != 0)) {
         }
      else {
         goto lab←L100058;
         };
SOURCE(4830, 95)
SOURCE(4830, 95)
      {
         /* declaration of var←c013 skipped */ 
         /* declaration of var←c014 skipped */ 
         (* (( (ptr) &var←c14776)+7)/* var←c013 */  ) = (*  (ptr) (* (( (ptr) &var←c14776)+6)/* l←v6648 */  ) );
         (* (( (ptr) &var←c14776)+8)/* var←c014 */  ) = (* (( (ptr) (* (( (ptr) gf←c14808)+51)/* var←c13944 */  ))+26) );
         {
            word var←c015;
            {
               word var←c0214;
               var←c0214 = (word) &var←c14776;
               var←c015 = (word) XR←Enable(( ((word)  (fPt) NoName←Q1992) ), ( ((word)  (fPt) NoName←Q2292) ), var←c0214);
               };
            /* removed trivial cond node */ 
            };
         };
      (* (( (ptr) &var←c14776)+6)/* l←v6648 */  ) = (* (( (ptr) (* (( (ptr) &var←c14776)+6)/* l←v6648 */  ))+1) );
      goto lab←L100061;
      lab←L100058: ;
      };
   }

static word NoName←Q1992(formal←c0198)
   word formal←c0198;
   {
SOURCE(4830, 95)
   {
      word pd25;
      pd25 = (* (( (ptr) formal←c0198)+8) );
      (void) ( *( (fPt) ((*  (ptr) pd25 ))))((* (( (ptr) formal←c0198)+7) ), (* (( (ptr) formal←c0198)+4) ), pd25);
      };
   return(0);
   }

static void ProtectedFanoutStreamReset←P900(self←v4768)
   word self←v4768;
   {
   W8 var←c14840;
   register ptr gf←c14872 =  (ptr) &globalframe;
   /* declaration of data←v6776 skipped */ 
   /* ProtectedFanoutStreamReset: */ 
SOURCE(4952, 246)
SOURCE(5004, 48)
   var←c14840.f4/* data←v6776 */  = XR←Narrow((* (( (ptr) self←v4768)+1) ), (* (( (ptr) gf←c14872)+13) ));
SOURCE(5054, 144)
   {
      /* declaration of l←v6820 skipped */ 
      var←c14840.f5/* l←v6820 */  = (* (( (ptr) var←c14840.f4/* data←v6776 */ )+2) );
      lab←L100069: ;
      if ((var←c14840.f5/* l←v6820 */  != 0)) {
         }
      else {
         goto lab←L100066;
         };
SOURCE(5113, 85)
SOURCE(5113, 85)
      {
         /* declaration of var←c016 skipped */ 
         /* declaration of var←c017 skipped */ 
         var←c14840.f6/* var←c016 */  = (*  (ptr) var←c14840.f5/* l←v6820 */  );
         var←c14840.f7/* var←c017 */  = (* (( (ptr) (* (( (ptr) gf←c14872)+51)/* var←c13944 */  ))+27) );
         {
            word var←c018;
            {
               word var←c0215;
               var←c0215 = (word) &var←c14840;
               var←c018 = (word) XR←Enable(( ((word)  (fPt) NoName←Q2052) ), ( ((word)  (fPt) NoName←Q2232) ), var←c0215);
               };
            /* removed trivial cond node */ 
            };
         };
      var←c14840.f5/* l←v6820 */  = (* (( (ptr) var←c14840.f5/* l←v6820 */ )+1) );
      goto lab←L100069;
      lab←L100066: ;
      };
   }

static word NoName←Q2052(formal←c0200)
   word formal←c0200;
   {
SOURCE(5113, 85)
   {
      word pd26;
      pd26 = (* (( (ptr) formal←c0200)+7) );
      (void) ( *( (fPt) ((*  (ptr) pd26 ))))((* ((( (ptr) formal←c0200)+6)) ), pd26);
      };
   return(0);
   }

static void ProtectedFanoutStreamClose←P960(self←v4828, abort←v4856)
   word self←v4828;
   word abort←v4856;
   {
   W7 var←c14904;
   register ptr gf←c14936 =  (ptr) &globalframe;
   /* declaration of data←v6948 skipped */ 
   /* ProtectedFanoutStreamClose: */ 
SOURCE(5225, 342)
SOURCE(5290, 48)
   var←c14904.f4/* data←v6948 */  = XR←Narrow((* (( (ptr) self←v4828)+1) ), (* (( (ptr) gf←c14936)+13) ));
SOURCE(5340, 143)
   if ((0 != (* (( (ptr) var←c14904.f4/* data←v6948 */ )+1) ))) {
SOURCE(5366, 117)
      {
         register word l←v6992;
         l←v6992 = (* (( (ptr) var←c14904.f4/* data←v6948 */ )+2) );
         lab←L100077: ;
         if ((l←v6992 != 0)) {
            }
         else {
            goto lab←L100074;
            };
SOURCE(5425, 58)
SOURCE(5425, 58)
         {
            /* declaration of var←c019 skipped */ 
            /* declaration of var←c020 skipped */ 
            var←c14904.f5/* var←c019 */  = (*  (ptr) l←v6992 );
            var←c14904.f6/* var←c020 */  = (* (( (ptr) (* (( (ptr) gf←c14936)+51)/* var←c13944 */  ))+28) );
            {
               word var←c021;
               {
                  word var←c0216;
                  var←c0216 = (word) &var←c14904;
                  var←c021 = (word) XR←Enable(( ((word)  (fPt) NoName←Q2112) ), ( ((word)  (fPt) NoName←Q2172) ), var←c0216);
                  };
               /* removed trivial cond node */ 
               };
            };
         l←v6992 = (* (( (ptr) l←v6992)+1) );
         goto lab←L100077;
         lab←L100074: ;
         };
      };
SOURCE(5504, 17)
   (* (( (ptr) var←c14904.f4/* data←v6948 */ )+2) ) = 0;
SOURCE(5523, 44)
   (*  (ptr) self←v4828 ) = (*  (ptr) (* (( (ptr) (* (( (ptr) gf←c14936)+52)/* var←c14104 */  ))+15) ) );
   }

static word NoName←Q2112(formal←c0202)
   word formal←c0202;
   {
SOURCE(5425, 58)
   {
      word pd27;
      pd27 = (* (( (ptr) formal←c0202)+6) );
      (void) ( *( (fPt) ((*  (ptr) pd27 ))))((* (( (ptr) formal←c0202)+5) ), 0, pd27);
      };
   return(0);
   }

static void NoName←Q2172(formal←c0123, formal←c200024, formal←c200025, formal←c200026, formal←c200027)
   word formal←c0123;
   word formal←c200024;
   word formal←c200025;
   word formal←c200026;
   word formal←c200027;
   {
   register ptr gf←c0203 =  (ptr) &globalframe;
   if ((formal←c200025 == (* (( (ptr) (* (( (ptr) gf←c0203)+51)/* var←c13944 */  ))+5) ))) {
      {
         word ec←v13092;
         word stream←v13120;
         word details←v13148;
         word msg←v13176;
         ec←v13092 = (*  (ptr) formal←c200027 );
         stream←v13120 = (* (( (ptr) formal←c200027)+1) );
         details←v13148 = (* (( (ptr) formal←c200027)+2) );
         msg←v13176 = (* (( (ptr) formal←c200027)+3) );
SOURCE(5456, 27)
         if ((0 == (*  (ptr) (* (( (ptr) formal←c200024)+4) ) ))) {
SOURCE(5483, 10)
            (*  (ptr) formal←c0123 ) = 2;
            (* (( (ptr) formal←c0123)+1) ) = 8;
            return;
            };
         };
      };
   (*  (ptr) formal←c0123 ) = 0;
   (* (( (ptr) formal←c0123)+1) ) = 0;
   return;
   }

static void NoName←Q2232(formal←c0132, formal←c200020, formal←c200021, formal←c200022, formal←c200023)
   word formal←c0132;
   word formal←c200020;
   word formal←c200021;
   word formal←c200022;
   word formal←c200023;
   {
   register ptr gf←c0204 =  (ptr) &globalframe;
   if ((formal←c200021 == (* (( (ptr) (* (( (ptr) gf←c0204)+51)/* var←c13944 */  ))+5) ))) {
      {
         word ec←v12948;
         word stream←v12976;
         word details←v13004;
         word msg←v13032;
         ec←v12948 = (*  (ptr) formal←c200023 );
         stream←v12976 = (* (( (ptr) formal←c200023)+1) );
         details←v13004 = (* (( (ptr) formal←c200023)+2) );
         msg←v13032 = (* (( (ptr) formal←c200023)+3) );
SOURCE(5144, 54)
         if ((0 == (*  (ptr) (* (( (ptr) formal←c200020)+4) ) ))) {
SOURCE(5172, 26)
            (void) EntryRemove←P180((* (( (ptr) formal←c200020)+4) ), (*  (ptr) (* (( (ptr) formal←c200020)+5) ) ));
SOURCE(5200, 8)
            (*  (ptr) formal←c0132 ) = 2;
            (* (( (ptr) formal←c0132)+1) ) = 7;
            return;
            };
         };
      };
   (*  (ptr) formal←c0132 ) = 0;
   (* (( (ptr) formal←c0132)+1) ) = 0;
   return;
   }

static void NoName←Q2292(formal←c0141, formal←c200016, formal←c200017, formal←c200018, formal←c200019)
   word formal←c0141;
   word formal←c200016;
   word formal←c200017;
   word formal←c200018;
   word formal←c200019;
   {
   register ptr gf←c0205 =  (ptr) &globalframe;
   if ((formal←c200017 == (* (( (ptr) (* (( (ptr) gf←c0205)+51)/* var←c13944 */  ))+5) ))) {
      {
         word ec←v12804;
         word stream←v12832;
         word details←v12860;
         word msg←v12888;
         ec←v12804 = (*  (ptr) formal←c200019 );
         stream←v12832 = (* (( (ptr) formal←c200019)+1) );
         details←v12860 = (* (( (ptr) formal←c200019)+2) );
         msg←v12888 = (* (( (ptr) formal←c200019)+3) );
SOURCE(4871, 54)
         if ((0 == (*  (ptr) (* (( (ptr) formal←c200016)+5) ) ))) {
SOURCE(4899, 26)
            (void) EntryRemove←P180((* (( (ptr) formal←c200016)+5) ), (*  (ptr) (* (( (ptr) formal←c200016)+6) ) ));
SOURCE(4927, 8)
            (*  (ptr) formal←c0141 ) = 2;
            (* (( (ptr) formal←c0141)+1) ) = 6;
            return;
            };
         };
      };
   (*  (ptr) formal←c0141 ) = 0;
   (* (( (ptr) formal←c0141)+1) ) = 0;
   return;
   }

static void NoName←Q2352(formal←c0150, formal←c200012, formal←c200013, formal←c200014, formal←c200015)
   word formal←c0150;
   word formal←c200012;
   word formal←c200013;
   word formal←c200014;
   word formal←c200015;
   {
   register ptr gf←c0206 =  (ptr) &globalframe;
   if ((formal←c200013 == (* (( (ptr) (* (( (ptr) gf←c0206)+51)/* var←c13944 */  ))+5) ))) {
      {
         word ec←v12660;
         word stream←v12688;
         word details←v12716;
         word msg←v12744;
         ec←v12660 = (*  (ptr) formal←c200015 );
         stream←v12688 = (* (( (ptr) formal←c200015)+1) );
         details←v12716 = (* (( (ptr) formal←c200015)+2) );
         msg←v12744 = (* (( (ptr) formal←c200015)+3) );
SOURCE(4572, 54)
         if ((0 == (*  (ptr) (* (( (ptr) formal←c200012)+4) ) ))) {
SOURCE(4600, 26)
            (void) EntryRemove←P180((* (( (ptr) formal←c200012)+4) ), (*  (ptr) (* (( (ptr) formal←c200012)+5) ) ));
SOURCE(4628, 8)
            (*  (ptr) formal←c0150 ) = 2;
            (* (( (ptr) formal←c0150)+1) ) = 5;
            return;
            };
         };
      };
   (*  (ptr) formal←c0150 ) = 0;
   (* (( (ptr) formal←c0150)+1) ) = 0;
   return;
   }

static void NoName←Q2412(formal←c0159, formal←c200008, formal←c200009, formal←c200010, formal←c200011)
   word formal←c0159;
   word formal←c200008;
   word formal←c200009;
   word formal←c200010;
   word formal←c200011;
   {
   register ptr gf←c0207 =  (ptr) &globalframe;
   if ((formal←c200009 == (* (( (ptr) (* (( (ptr) gf←c0207)+51)/* var←c13944 */  ))+5) ))) {
      {
         word ec←v12516;
         word stream←v12544;
         word details←v12572;
         word msg←v12600;
         ec←v12516 = (*  (ptr) formal←c200011 );
         stream←v12544 = (* (( (ptr) formal←c200011)+1) );
         details←v12572 = (* (( (ptr) formal←c200011)+2) );
         msg←v12600 = (* (( (ptr) formal←c200011)+3) );
SOURCE(4116, 54)
         if ((0 == (*  (ptr) (* (( (ptr) formal←c200008)+7) ) ))) {
SOURCE(4144, 26)
            (void) EntryRemove←P180((* (( (ptr) formal←c200008)+7) ), (*  (ptr) (* (( (ptr) formal←c200008)+8) ) ));
SOURCE(4172, 8)
            (*  (ptr) formal←c0159 ) = 2;
            (* (( (ptr) formal←c0159)+1) ) = 4;
            return;
            };
         };
      };
   (*  (ptr) formal←c0159 ) = 0;
   (* (( (ptr) formal←c0159)+1) ) = 0;
   return;
   }

static void NoName←Q2472(formal←c0168, formal←c200004, formal←c200005, formal←c200006, formal←c200007)
   word formal←c0168;
   word formal←c200004;
   word formal←c200005;
   word formal←c200006;
   word formal←c200007;
   {
   register ptr gf←c0208 =  (ptr) &globalframe;
   if ((formal←c200005 == (* (( (ptr) (* (( (ptr) gf←c0208)+51)/* var←c13944 */  ))+5) ))) {
      {
         word ec←v12372;
         word stream←v12400;
         word details←v12428;
         word msg←v12456;
         ec←v12372 = (*  (ptr) formal←c200007 );
         stream←v12400 = (* (( (ptr) formal←c200007)+1) );
         details←v12428 = (* (( (ptr) formal←c200007)+2) );
         msg←v12456 = (* (( (ptr) formal←c200007)+3) );
SOURCE(3564, 54)
         if ((0 == (*  (ptr) (* (( (ptr) formal←c200004)+7) ) ))) {
SOURCE(3592, 26)
            (void) EntryRemove←P180((* (( (ptr) formal←c200004)+7) ), (*  (ptr) (* (( (ptr) formal←c200004)+8) ) ));
SOURCE(3620, 8)
            (*  (ptr) formal←c0168 ) = 2;
            (* (( (ptr) formal←c0168)+1) ) = 3;
            return;
            };
         };
      };
   (*  (ptr) formal←c0168 ) = 0;
   (* (( (ptr) formal←c0168)+1) ) = 0;
   return;
   }

static void NoName←Q2532(formal←c0177, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
   word formal←c0177;
   word formal←c200000;
   word formal←c200001;
   word formal←c200002;
   word formal←c200003;
   {
   register ptr gf←c0209 =  (ptr) &globalframe;
   if ((formal←c200001 == (* (( (ptr) (* (( (ptr) gf←c0209)+51)/* var←c13944 */  ))+5) ))) {
      {
         word ec←v12228;
         word stream←v12256;
         word details←v12284;
         word msg←v12312;
         ec←v12228 = (*  (ptr) formal←c200003 );
         stream←v12256 = (* (( (ptr) formal←c200003)+1) );
         details←v12284 = (* (( (ptr) formal←c200003)+2) );
         msg←v12312 = (* (( (ptr) formal←c200003)+3) );
SOURCE(2934, 54)
         if ((0 == (*  (ptr) (* (( (ptr) formal←c200000)+5) ) ))) {
SOURCE(2962, 26)
            (void) EntryRemove←P180((* (( (ptr) formal←c200000)+5) ), (*  (ptr) (* (( (ptr) formal←c200000)+6) ) ));
SOURCE(2990, 8)
            (*  (ptr) formal←c0177 ) = 2;
            (* (( (ptr) formal←c0177)+1) ) = 2;
            return;
            };
         };
      };
   (*  (ptr) formal←c0177 ) = 0;
   (* (( (ptr) formal←c0177)+1) ) = 0;
   return;
   }

/* file: FanoutStreamImpl, module: FanoutStreamImpl, compiled at: March 20, 1992 2:15:12 pm PST */ 
extern void XR←install←FanoutStreamImpl() {
   NoName←Q1692();
   }
extern void XR←run←FanoutStreamImpl() { XR←Start(&globalframe); }