/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: October 19, 1993 1:00:58 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: TJaMRopeImpl, module: TJaMRopeImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [1054651072,2895913862] TJaMRopeImpl";
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_Q564();
static void TJaMRopeImpl_P0();
static void ApplySearch_P60();
static void ApplyASearch_P120();
static void ApplyConvertToString_P180();
static void ApplySGet_P240();
static void ApplyConcat_P300();
static void ApplySubstr_P360();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\104\304\000\000"};
static struct {unsigned f; char r[24];} string2 = {1376277, "\007\000\001\002\007\020\001\002\000\007\036\002\004\003\002\004\014\016\015\003\001\000\000"};
static struct {unsigned f; char r[16];} string3 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[4];} string4 = {65537, "\001\000\000"};
static struct {unsigned f; char r[4];} string5 = {65540, "\251\000\000"};
static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\243\004\305\073\300\011\303\367\103\100\230\000\000"};
static struct {unsigned f; char r[12];} string7 = {720908, ".ropeconcat"};
static struct {unsigned f; char r[12];} string8 = {655372, ".substring\000"};
static struct {unsigned f; char r[8];} string9 = {262152, ".cvs\000\000\000"};
static struct {unsigned f; char r[12];} string10 = {524300, ".asearch\000\000\000"};
static struct {unsigned f; char r[16];} string11 = {983056, "--nostringval--"};
static struct {unsigned f; char r[8];} string12 = {458760, ".search"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\076\334\262\300\300\254\234\043\206\100\164\000\000"};
static struct {unsigned f; char r[8];} string14 = {262148, "\004\200~\000\000\000\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\255\053\300\023\300\142\135\315\105\100\150\000\000"};
static struct {unsigned f; char r[16];} string16 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\243\004\305\073\300\011\303\367\103\100\150\000\000"};
static struct {
   word f0[15]; 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[4]; 
   } globalframe = {
   {0}, (word) ApplySubstr_P360, 0, (word) ApplyConcat_P300, 
   0, (word) ApplySGet_P240, 0, (word) ApplyConvertToString_P180, 
   0, (word) ApplyASearch_P120, 0, (word) ApplySearch_P60, 
   0, (word) TJaMRopeImpl_P0, {0}
   };

static void NoName_Q564()
   {
   register ptr gf_c057 =  (ptr) &globalframe;
   word var_c11312;
   (* (( (ptr) gf_c057)+4) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf_c057)+5) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf_c057)+7) ) = (word) XR_GetTypeIndexS((word) (&string5));
   (* (( (ptr) gf_c057)+8) ) = (word) XR_GetTypeIndexS((word) (&string6));
   (*  (ptr) (( (bPt) gf_c057)+36) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c057)+5) ), (word) &string7);
   (*  (ptr) (( (bPt) gf_c057)+40) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c057)+5) ), (word) &string8);
   (*  (ptr) (( (bPt) gf_c057)+44) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c057)+5) ), (word) &string9);
   (*  (ptr) (( (bPt) gf_c057)+48) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c057)+5) ), (word) &string10);
   (*  (ptr) (( (bPt) gf_c057)+52) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c057)+5) ), (word) &string11);
   (*  (ptr) (( (bPt) gf_c057)+56) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c057)+5) ), (word) &string12);
   (void) XR_DeclareGlobalFrame((word) "TJaMRopeImpl", &globalframe, (word) XR_GetTypeIndex((word) &string13, 0, (word) &string14)
      , (word) (( (bPt) gf_c057)+108)/* var_c10896 */ );
   var_c11312 = (word) XR_ImportInterface((word) "Convert", (word) XR_GetTypeIndexS((word) (&string15)), 73);
   (* (( (ptr) gf_c057)+31)/* var_c11216 */  ) = var_c11312;
   (void) XR_ImportProcS(var_c11312, 67902211);
   (void) XR_ImportProcS(var_c11312, 67901187);
   var_c11312 = (word) XR_ImportInterface((word) "Rope", (word) XR_GetTypeIndexS((word) (&string16)), 43);
   (* (( (ptr) gf_c057)+30)/* var_c10960 */  ) = var_c11312;
   (void) XR_ImportProcS(var_c11312, 67633666);
   (void) XR_ImportProcS(var_c11312, 67634434);
   (void) XR_ImportProcS(var_c11312, 67896323);
   (void) XR_ImportProcS(var_c11312, 67898627);
   (void) XR_ImportProcS(var_c11312, 68159236);
   (void) XR_ImportProcS(var_c11312, 67373569);
   var_c11312 = (word) XR_ImportInterface((word) "TJaM", (word) XR_GetTypeIndexS((word) (&string17)), 101);
   (* (( (ptr) gf_c057)+29)/* var_c10928 */  ) = var_c11312;
   (void) XR_ImportProcS(var_c11312, 530178);
   (void) XR_ImportProcS(var_c11312, 67379969);
   (void) XR_ImportProcS(var_c11312, 67375361);
   (void) XR_ImportProcS(var_c11312, 285441);
   (void) XR_ImportProcS(var_c11312, 67379457);
   (void) XR_ImportProcS(var_c11312, 529922);
   (void) XR_ImportProcS(var_c11312, 531202);
   (void) XR_ImportProcS(var_c11312, 67380993);
   (void) XR_ImportProcS(var_c11312, 812035);
   }

static void TJaMRopeImpl_P0(formal_c015, formal_c014)
   word formal_c015;
   word formal_c014;
   {
   register ptr gf_c11344 =  (ptr) &globalframe;
   /* TJaMRopeImpl: */ 
SOURCE(250, 1879)
SOURCE(1901, 41)
   {
      word pd18;
      pd18 = (* (( (ptr) (* (( (ptr) gf_c11344)+29)/* var_c10928 */  ))+104) );
      (void) ( *( (fPt) ((*  (ptr) pd18 ))))((* (( (ptr) gf_c11344)+14) ), (word) (( (bPt) gf_c11344)+100)/* var_c10864 */ , 0, pd18)
      ;
      };
SOURCE(1944, 43)
   {
      word pd19;
      pd19 = (* (( (ptr) (* (( (ptr) gf_c11344)+29)/* var_c10928 */  ))+104) );
      (void) ( *( (fPt) ((*  (ptr) pd19 ))))((* (( (ptr) gf_c11344)+12) ), (word) (( (bPt) gf_c11344)+92)/* var_c10832 */ , 0, pd19)
      ;
      };
SOURCE(1989, 47)
   {
      word pd20;
      pd20 = (* (( (ptr) (* (( (ptr) gf_c11344)+29)/* var_c10928 */  ))+104) );
      (void) ( *( (fPt) ((*  (ptr) pd20 ))))((* (( (ptr) gf_c11344)+11) ), (word) (( (bPt) gf_c11344)+84)/* var_c10800 */ , 0, pd20)
      ;
      };
SOURCE(2038, 45)
   {
      word pd21;
      pd21 = (* (( (ptr) (* (( (ptr) gf_c11344)+29)/* var_c10928 */  ))+104) );
      (void) ( *( (fPt) ((*  (ptr) pd21 ))))((* (( (ptr) gf_c11344)+9) ), (word) (( (bPt) gf_c11344)+68)/* var_c10736 */ , 0, pd21)
      ;
      };
SOURCE(2085, 44)
   {
      word pd22;
      pd22 = (* (( (ptr) (* (( (ptr) gf_c11344)+29)/* var_c10928 */  ))+104) );
      (void) ( *( (fPt) ((*  (ptr) pd22 ))))((* (( (ptr) gf_c11344)+10) ), (word) (( (bPt) gf_c11344)+60)/* var_c10704 */ , 0, pd22)
      ;
      };
   }

static void ApplySearch_P60(frame_v7232, cmd_v7260)
   word frame_v7232;
   word cmd_v7260;
   {
   register ptr gf_c11376 =  (ptr) &globalframe;
   word s_v2768;
   word t_v2796;
   word slen_v2824;
   word i_v2852;
   /* ApplySearch: */ 
SOURCE(351, 409)
SOURCE(380, 24)
   {
      word pd23;
      pd23 = (* (( (ptr) (* (( (ptr) gf_c11376)+29)/* var_c10928 */  ))+43) );
      s_v2768 = (word) ( *( (fPt) ((*  (ptr) pd23 ))))(frame_v7232, pd23);
      };
SOURCE(406, 24)
   {
      word pd24;
      pd24 = (* (( (ptr) (* (( (ptr) gf_c11376)+29)/* var_c10928 */  ))+43) );
      t_v2796 = (word) ( *( (fPt) ((*  (ptr) pd24 ))))(frame_v7232, pd24);
      };
SOURCE(432, 22)
   {
      word pd25;
      pd25 = (* (( (ptr) (* (( (ptr) gf_c11376)+30)/* var_c10960 */  ))+14) );
      slen_v2824 = (word) ( *( (fPt) ((*  (ptr) pd25 ))))(s_v2768, pd25);
      };
SOURCE(456, 18)
   {
      word pd26;
      pd26 = (* (( (ptr) (* (( (ptr) gf_c11376)+30)/* var_c10960 */  ))+11) );
      i_v2852 = (word) ( *( (fPt) ((*  (ptr) pd26 ))))(t_v2796, s_v2768, 0, 1, pd26);
      };
SOURCE(476, 284)
   if (( (int)i_v2852 >=  (int)0)) {
SOURCE(491, 33)
      {
         word var_c10992;
         {
            word pd27;
            pd27 = (* (( (ptr) (* (( (ptr) gf_c11376)+30)/* var_c10960 */  ))+17) );
            var_c10992 = (word) ( *( (fPt) ((*  (ptr) pd27 ))))(t_v2796, (i_v2852 + slen_v2824), 2147483647, pd27);
            };
         {
            word pd28;
            pd28 = (* (( (ptr) (* (( (ptr) gf_c11376)+29)/* var_c10928 */  ))+31) );
            (void) ( *( (fPt) ((*  (ptr) pd28 ))))(frame_v7232, var_c10992, pd28);
            };
         };
SOURCE(555, 18)
      {
         word pd29;
         pd29 = (* (( (ptr) (* (( (ptr) gf_c11376)+29)/* var_c10928 */  ))+31) );
         (void) ( *( (fPt) ((*  (ptr) pd29 ))))(frame_v7232, s_v2768, pd29);
         };
SOURCE(599, 31)
      {
         word var_c11024;
         {
            word pd30;
            pd30 = (* (( (ptr) (* (( (ptr) gf_c11376)+30)/* var_c10960 */  ))+17) );
            var_c11024 = (word) ( *( (fPt) ((*  (ptr) pd30 ))))(t_v2796, 0, i_v2852, pd30);
            };
         {
            word pd31;
            pd31 = (* (( (ptr) (* (( (ptr) gf_c11376)+29)/* var_c10928 */  ))+31) );
            (void) ( *( (fPt) ((*  (ptr) pd31 ))))(frame_v7232, var_c11024, pd31);
            };
         };
SOURCE(661, 21)
      {
         word pd32;
         pd32 = (* (( (ptr) (* (( (ptr) gf_c11376)+29)/* var_c10928 */  ))+26) );
         (void) ( *( (fPt) ((*  (ptr) pd32 ))))(frame_v7232, 1, pd32);
         };
      }
   else {
SOURCE(693, 18)
      {
         word pd33;
         pd33 = (* (( (ptr) (* (( (ptr) gf_c11376)+29)/* var_c10928 */  ))+31) );
         (void) ( *( (fPt) ((*  (ptr) pd33 ))))(frame_v7232, t_v2796, pd33);
         };
SOURCE(738, 22)
      {
         word pd34;
         pd34 = (* (( (ptr) (* (( (ptr) gf_c11376)+29)/* var_c10928 */  ))+26) );
         (void) ( *( (fPt) ((*  (ptr) pd34 ))))(frame_v7232, 0, pd34);
         };
      };
   }

static void ApplyASearch_P120(frame_v7320, cmd_v7348)
   word frame_v7320;
   word cmd_v7348;
   {
   register ptr gf_c11408 =  (ptr) &globalframe;
   word s_v2896;
   word t_v2924;
   word slen_v2952;
   word var_c11056;
   /* ApplyASearch: */ 
SOURCE(769, 348)
SOURCE(799, 24)
   {
      word pd35;
      pd35 = (* (( (ptr) (* (( (ptr) gf_c11408)+29)/* var_c10928 */  ))+43) );
      s_v2896 = (word) ( *( (fPt) ((*  (ptr) pd35 ))))(frame_v7320, pd35);
      };
SOURCE(825, 24)
   {
      word pd36;
      pd36 = (* (( (ptr) (* (( (ptr) gf_c11408)+29)/* var_c10928 */  ))+43) );
      t_v2924 = (word) ( *( (fPt) ((*  (ptr) pd36 ))))(frame_v7320, pd36);
      };
SOURCE(851, 22)
   {
      word pd37;
      pd37 = (* (( (ptr) (* (( (ptr) gf_c11408)+30)/* var_c10960 */  ))+14) );
      slen_v2952 = (word) ( *( (fPt) ((*  (ptr) pd37 ))))(s_v2896, pd37);
      };
SOURCE(875, 242)
   {
      word pd39;
      {
         word pd38;
         pd38 = (* (( (ptr) (* (( (ptr) gf_c11408)+30)/* var_c10960 */  ))+17) );
         var_c11056 = (word) ( *( (fPt) ((*  (ptr) pd38 ))))(t_v2924, 0, slen_v2952, pd38);
         };
      pd39 = (* (( (ptr) (* (( (ptr) gf_c11408)+30)/* var_c10960 */  ))+8) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd39 ))))(s_v2896, var_c11056, 1, pd39))) {
SOURCE(912, 31)
         {
            word var_c11088;
            {
               word pd40;
               pd40 = (* (( (ptr) (* (( (ptr) gf_c11408)+30)/* var_c10960 */  ))+17) );
               var_c11088 = (word) ( *( (fPt) ((*  (ptr) pd40 ))))(t_v2924, slen_v2952, 2147483647, pd40);
               };
            {
               word pd41;
               pd41 = (* (( (ptr) (* (( (ptr) gf_c11408)+29)/* var_c10928 */  ))+31) );
               (void) ( *( (fPt) ((*  (ptr) pd41 ))))(frame_v7320, var_c11088, pd41);
               };
            };
SOURCE(974, 18)
         {
            word pd42;
            pd42 = (* (( (ptr) (* (( (ptr) gf_c11408)+29)/* var_c10928 */  ))+31) );
            (void) ( *( (fPt) ((*  (ptr) pd42 ))))(frame_v7320, s_v2896, pd42);
            };
SOURCE(1018, 21)
         {
            word pd43;
            pd43 = (* (( (ptr) (* (( (ptr) gf_c11408)+29)/* var_c10928 */  ))+26) );
            (void) ( *( (fPt) ((*  (ptr) pd43 ))))(frame_v7320, 1, pd43);
            };
         }
      else {
SOURCE(1050, 18)
         {
            word pd44;
            pd44 = (* (( (ptr) (* (( (ptr) gf_c11408)+29)/* var_c10928 */  ))+31) );
            (void) ( *( (fPt) ((*  (ptr) pd44 ))))(frame_v7320, t_v2924, pd44);
            };
SOURCE(1095, 22)
         {
            word pd45;
            pd45 = (* (( (ptr) (* (( (ptr) gf_c11408)+29)/* var_c10928 */  ))+26) );
            (void) ( *( (fPt) ((*  (ptr) pd45 ))))(frame_v7320, 0, pd45);
            };
         };
      };
   }

static void ApplyConvertToString_P180(frame_v7408, cmd_v7436)
   word frame_v7408;
   word cmd_v7436;
   {
   register ptr gf_c11440 =  (ptr) &globalframe;
   word x_v2996;
   word rope_v3024 = 0;
   /* ApplyConvertToString: */ 
SOURCE(1126, 356)
SOURCE(1164, 19)
   {
      word pd46;
      pd46 = (* (( (ptr) (* (( (ptr) gf_c11440)+29)/* var_c10928 */  ))+37) );
      x_v2996 = (word) ( *( (fPt) ((*  (ptr) pd46 ))))(frame_v7408, pd46);
      };
SOURCE(1197, 262)
   {
      word var_c11120;
      word var_c11152;
      var_c11120 = x_v2996;
      if ((var_c11120 == 0)) {
         goto lab_L100000;
         };
      var_c11152 = XR_GetReferentType(var_c11120);
      {
         word tc51;
         if (((* (( (ptr) gf_c11440)+8) ) == var_c11152)) {
            {
               word x_v3084;
               x_v3084 = var_c11120;
SOURCE(1229, 137)
               {
                  word var_c11184;
                  var_c11184 = (*  (ptr) x_v3084 );
                  if ((var_c11184 == 0)) {
SOURCE(1258, 33)
                     {
                        word pd48;
                        pd48 = (* (( (ptr) (* (( (ptr) gf_c11440)+31)/* var_c11216 */  ))+27) );
                        rope_v3024 = (word) ( *( (fPt) ((*  (ptr) pd48 ))))((* (( (ptr) x_v3084)+1) ), 8, 1, pd48);
                        };
                     }
                  else {
                     if ((var_c11184 == 1)) {
SOURCE(1301, 35)
                        {
                           word pd49;
                           pd49 = (* (( (ptr) (* (( (ptr) gf_c11440)+31)/* var_c11216 */  ))+31) );
                           rope_v3024 = (word) ( *( (fPt) ((*  (ptr) pd49 ))))((* (( (ptr) x_v3084)+1) ), 7, 0, pd49);
                           };
                        }
                     else {
SOURCE(1349, 17)
                        {
                           word pd50;
                           pd50 = (* (( (ptr) (* (( (ptr) gf_c11440)+29)/* var_c10928 */  ))+95) );
                           (void) ( *( (fPt) ((*  (ptr) pd50 ))))(14, pd50);
                           };
                        };
                     };
                  };
               };
            goto endif047;
            };
         if (((* (( (ptr) gf_c11440)+4) ) == var_c11152)) {
            tc51 =  (word) ( (unsigned) (*(int*)var_c11120<0) == 0);
            }
         else {
            tc51 =  (word) 0;
            };
         if (tc51) {
            {
               word x_v3128;
               x_v3128 = var_c11120;
SOURCE(1379, 8)
               rope_v3024 = x_v3128;
               };
            goto endif047;
            };
         if (((* (( (ptr) gf_c11440)+7) ) == var_c11152)) {
            {
               word x_v3172;
               x_v3172 = var_c11120;
SOURCE(1400, 22)
               {
                  word pd52;
                  pd52 = (* (( (ptr) (* (( (ptr) gf_c11440)+29)/* var_c10928 */  ))+21) );
                  rope_v3024 = (word) ( *( (fPt) ((*  (ptr) pd52 ))))(x_v3172, pd52);
                  };
               };
            goto endif047;
            };
         lab_L100000: ;
SOURCE(1435, 24)
         rope_v3024 = (* (( (ptr) gf_c11440)+13) );
         goto endif047;
         endif047: ;
         };
      };
SOURCE(1461, 21)
   {
      word pd53;
      pd53 = (* (( (ptr) (* (( (ptr) gf_c11440)+29)/* var_c10928 */  ))+31) );
      (void) ( *( (fPt) ((*  (ptr) pd53 ))))(frame_v7408, rope_v3024, pd53);
      };
   }

static void ApplySGet_P240(frame_v7496, cmd_v7524)
   word frame_v7496;
   word cmd_v7524;
   {
   register ptr gf_c11472 =  (ptr) &globalframe;
   word i_v3216;
   word rope_v3244;
   word c_v3272;
   /* ApplySGet: */ 
SOURCE(1488, 127)
SOURCE(1515, 22)
   {
      word pd54;
      pd54 = (* (( (ptr) (* (( (ptr) gf_c11472)+29)/* var_c10928 */  ))+39) );
      i_v3216 = (word) ( *( (fPt) ((*  (ptr) pd54 ))))(frame_v7496, pd54);
      };
SOURCE(1539, 27)
   {
      word pd55;
      pd55 = (* (( (ptr) (* (( (ptr) gf_c11472)+29)/* var_c10928 */  ))+43) );
      rope_v3244 = (word) ( *( (fPt) ((*  (ptr) pd55 ))))(frame_v7496, pd55);
      };
SOURCE(1568, 23)
   {
      word pd56;
      pd56 = (* (( (ptr) (* (( (ptr) gf_c11472)+30)/* var_c10960 */  ))+9) );
      c_v3272 = (word) ( *( (fPt) ((*  (ptr) pd56 ))))(rope_v3244, i_v3216, pd56);
      };
SOURCE(1593, 22)
   {
      word pd57;
      pd57 = (* (( (ptr) (* (( (ptr) gf_c11472)+29)/* var_c10928 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd57 ))))(frame_v7496, c_v3272, pd57);
      };
   }

static void ApplyConcat_P300(frame_v7584, cmd_v7612)
   word frame_v7584;
   word cmd_v7612;
   {
   register ptr gf_c11504 =  (ptr) &globalframe;
   word b_v3316;
   word a_v3344;
   /* ApplyConcat: */ 
SOURCE(1621, 115)
SOURCE(1650, 24)
   {
      word pd58;
      pd58 = (* (( (ptr) (* (( (ptr) gf_c11504)+29)/* var_c10928 */  ))+43) );
      b_v3316 = (word) ( *( (fPt) ((*  (ptr) pd58 ))))(frame_v7584, pd58);
      };
SOURCE(1676, 24)
   {
      word pd59;
      pd59 = (* (( (ptr) (* (( (ptr) gf_c11504)+29)/* var_c10928 */  ))+43) );
      a_v3344 = (word) ( *( (fPt) ((*  (ptr) pd59 ))))(frame_v7584, pd59);
      };
SOURCE(1702, 34)
   {
      word var_c11248;
      {
         word pd60;
         pd60 = (* (( (ptr) (* (( (ptr) gf_c11504)+30)/* var_c10960 */  ))+6) );
         var_c11248 = (word) ( *( (fPt) ((*  (ptr) pd60 ))))(a_v3344, b_v3316, pd60);
         };
      {
         word pd61;
         pd61 = (* (( (ptr) (* (( (ptr) gf_c11504)+29)/* var_c10928 */  ))+31) );
         (void) ( *( (fPt) ((*  (ptr) pd61 ))))(frame_v7584, var_c11248, pd61);
         };
      };
   }

static void ApplySubstr_P360(frame_v7672, cmd_v7700)
   word frame_v7672;
   word cmd_v7700;
   {
   register ptr gf_c11536 =  (ptr) &globalframe;
   word len_v3388;
   word start_v3416;
   word rope_v3444;
   /* ApplySubstr: */ 
SOURCE(1742, 152)
SOURCE(1771, 24)
   {
      word pd62;
      pd62 = (* (( (ptr) (* (( (ptr) gf_c11536)+29)/* var_c10928 */  ))+39) );
      len_v3388 = (word) ( *( (fPt) ((*  (ptr) pd62 ))))(frame_v7672, pd62);
      };
SOURCE(1797, 26)
   {
      word pd63;
      pd63 = (* (( (ptr) (* (( (ptr) gf_c11536)+29)/* var_c10928 */  ))+39) );
      start_v3416 = (word) ( *( (fPt) ((*  (ptr) pd63 ))))(frame_v7672, pd63);
      };
SOURCE(1825, 27)
   {
      word pd64;
      pd64 = (* (( (ptr) (* (( (ptr) gf_c11536)+29)/* var_c10928 */  ))+43) );
      rope_v3444 = (word) ( *( (fPt) ((*  (ptr) pd64 ))))(frame_v7672, pd64);
      };
SOURCE(1854, 40)
   {
      word var_c11280;
      {
         word pd65;
         pd65 = (* (( (ptr) (* (( (ptr) gf_c11536)+30)/* var_c10960 */  ))+17) );
         var_c11280 = (word) ( *( (fPt) ((*  (ptr) pd65 ))))(rope_v3444, start_v3416, len_v3388, pd65);
         };
      {
         word pd66;
         pd66 = (* (( (ptr) (* (( (ptr) gf_c11536)+29)/* var_c10928 */  ))+31) );
         (void) ( *( (fPt) ((*  (ptr) pd66 ))))(frame_v7672, var_c11280, pd66);
         };
      };
   }

/* file: TJaMRopeImpl, module: TJaMRopeImpl, compiled at: October 19, 1993 1:00:57 pm PDT */ 
extern void XR_install_TJaMRopeImpl() {
   NoName_Q564();
   }
extern void XR_run_TJaMRopeImpl() { XR_Start(&globalframe); }