/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: June 30, 1993 11:20:38 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: GGValueEventImpl, module: GGValueEventImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [368803912,3168989644] GGValueEventImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2;} W3;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; word r;} W9;
typedef struct {word f0, f1;} W2;
#define SOURCE(p, l) /* source p, l */
static void NoName_Q480();
static void GGValueEventImpl_P0();
static void GetSelectedSlices_P60();
static void GetAreaColor_P120();
static void GetLineColor_P180();
static void GetColorOfSelectedSlice_P240();
static word UniqueColorOrAbort_P420();
static word ReportSelectionProblems_P300();
static void RegisterEventProcs_P360();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\331\034\215\202\300\037\060\307\112\100\164\000\000"};
static struct {unsigned f; char r[4];} string2 = {131074, "\003\004\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 = {131076, "\216\251\000"};
static struct {unsigned f; char r[56];} string6 = {3407928, "%g failed: there is more than one value for this key\000\000\000"};
static struct {unsigned f; char r[12];} string7 = {589836, "Complaint\000\000"};
static struct {unsigned f; char r[16];} string8 = {786448, "GetLineColor\000\000\000"};
static struct {unsigned f; char r[36];} string9 = {2228260, "%g failed: no objects are targeted\000"};
static struct {unsigned f; char r[36];} string10 = {2228260, "%g failed: no objects are selected\000"};
static struct {unsigned f; char r[20];} string11 = {1114132, "GetSelectedSlices\000\000"};
static struct {unsigned f; char r[16];} string12 = {786448, "GetAreaColor\000\000\000"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\025\373\200\110\300\274\342\361\314\100\164\000\000"};
static struct {unsigned f; char r[8];} string14 = {393222, "\006\001(\004A\377\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\322\334\347\304\300\124\107\000\027\100\150\000\000"};
static struct {unsigned f; char r[16];} string16 = {851984, "\257\300\331\034\215\202\300\037\060\307\112\100\150\000\000"};
static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\347\101\365\007\300\150\102\366\020\100\150\000\000"};
static struct {unsigned f; char r[16];} string18 = {851984, "\257\300\336\025\013\356\300\216\115\352\271\100\150\000\000"};
static struct {unsigned f; char r[16];} string19 = {851984, "\257\300\355\324\264\170\300\276\334\312\210\100\150\000\000"};
static struct {unsigned f; char r[16];} string20 = {851984, "\257\300\207\164\301\163\300\327\135\041\305\100\150\000\000"};
static struct {unsigned f; char r[16];} string21 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {
   word f0[19]; 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[8]; 
   } globalframe = {
   {0}, (word) RegisterEventProcs_P360, 0, (word) ReportSelectionProblems_P300, 
   0, (word) GetColorOfSelectedSlice_P240, 0, (word) GetLineColor_P180, 
   0, (word) GetAreaColor_P120, 0, (word) GetSelectedSlices_P60, 
   0, (word) GGValueEventImpl_P0, {0}
   };

static void NoName_Q480()
   {
   register ptr gf_c071 =  (ptr) &globalframe;
   word var_c12772;
   (* (( (ptr) gf_c071)+4) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf_c071)+6) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf_c071)+9) ) = (word) XR_GetTypeIndex((word) &string5, 0, (word) &string4);
   (*  (ptr) (( (bPt) gf_c071)+40) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c071)+6) ), (word) &string6);
   (*  (ptr) (( (bPt) gf_c071)+44) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c071)+9) ), (word) &string7);
   (*  (ptr) (( (bPt) gf_c071)+48) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c071)+6) ), (word) &string8);
   (*  (ptr) (( (bPt) gf_c071)+52) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c071)+6) ), (word) &string9);
   (*  (ptr) (( (bPt) gf_c071)+56) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c071)+6) ), (word) &string10);
   (*  (ptr) (( (bPt) gf_c071)+60) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c071)+9) ), (word) &string11);
   (*  (ptr) (( (bPt) gf_c071)+64) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c071)+9) ), (word) &string12);
   (*  (ptr) (( (bPt) gf_c071)+68) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c071)+9) ), (word) &string8);
   (*  (ptr) (( (bPt) gf_c071)+72) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c071)+6) ), (word) &string12);
   (void) XR_DeclareGlobalFrame((word) "GGValueEventImpl", &globalframe, (word) XR_GetTypeIndex((word) &string13, 0, (word) &string14)
      , (word) (( (bPt) gf_c071)+124)/* var_c12164 */ );
   var_c12772 = (word) XR_ImportInterface((word) "Feedback", (word) XR_GetTypeIndexS((word) (&string15)), 25);
   (* (( (ptr) gf_c071)+38)/* var_c12644 */  ) = var_c12772;
   (void) XR_ImportProcS(var_c12772, 1575429);
   var_c12772 = (word) XR_ImportInterface((word) "FutureValues", (word) XR_GetTypeIndexS((word) (&string16)), 3);
   (* (( (ptr) gf_c071)+34)/* var_c12228 */  ) = var_c12772;
   (void) XR_ImportProcS(var_c12772, 262657);
   var_c12772 = (word) XR_ImportInterface((word) "GGScene", (word) XR_GetTypeIndexS((word) (&string17)), 50);
   (* (( (ptr) gf_c071)+33)/* var_c12196 */  ) = var_c12772;
   (void) XR_ImportProcS(var_c12772, 68426757);
   (void) XR_ImportProcS(var_c12772, 68165124);
   var_c12772 = (word) XR_ImportInterface((word) "GGSliceOps", (word) XR_GetTypeIndexS((word) (&string18)), 73);
   (* (( (ptr) gf_c071)+35)/* var_c12356 */  ) = var_c12772;
   (void) XR_ImportProcS(var_c12772, 134756354);
   (void) XR_ImportProcS(var_c12772, 134756866);
   var_c12772 = (word) XR_ImportInterface((word) "GGUserInput", (word) XR_GetTypeIndexS((word) (&string19)), 13);
   (* (( (ptr) gf_c071)+39)/* var_c12740 */  ) = var_c12772;
   (void) XR_ImportProcS(var_c12772, 1312261);
   var_c12772 = (word) XR_ImportInterface((word) "ImagerColorPrivate", (word) XR_GetTypeIndexS((word) (&string20)), 48);
   (* (( (ptr) gf_c071)+36)/* var_c12516 */  ) = var_c12772;
   (void) XR_ImportProcS(var_c12772, 67637250);
   var_c12772 = (word) XR_ImportInterface((word) "IO", (word) XR_GetTypeIndexS((word) (&string21)), 103);
   (* (( (ptr) gf_c071)+37)/* var_c12580 */  ) = var_c12772;
   (void) XR_ImportProcS(var_c12772, 67910402);
   }

static void GGValueEventImpl_P0(formal_c019, formal_c018)
   word formal_c019;
   word formal_c018;
   {
   /* GGValueEventImpl: */ 
SOURCE(139, 3014)
SOURCE(3133, 20)
   (void) RegisterEventProcs_P360();
   }

static void GetSelectedSlices_P60(ggData_v5548, event_v5576)
   word ggData_v5548;
   word event_v5576;
   {
   register ptr gf_c12804 =  (ptr) &globalframe;
   word fv_v3692;
   word slices_v3720;
   /* GetSelectedSlices: */ 
SOURCE(545, 220)
SOURCE(582, 42)
   fv_v3692 = XR_Narrow((*  (ptr) (* (( (ptr) event_v5576)+1) ) ), (* (( (ptr) gf_c12804)+4) ));
SOURCE(626, 8)
   {
      word pd22;
      pd22 = (* (( (ptr) (* (( (ptr) gf_c12804)+33)/* var_c12196 */  ))+34) );
      slices_v3720 = (word) ( *( (fPt) ((*  (ptr) pd22 ))))((* (( (ptr) ggData_v5548)+11) ), 0, 0, 0, pd22);
      };
SOURCE(717, 17)
   (* (( (ptr) fv_v3692)+4) ) = slices_v3720;
SOURCE(736, 29)
   {
      word pd23;
      pd23 = (* (( (ptr) (* (( (ptr) gf_c12804)+34)/* var_c12228 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd23 ))))(fv_v3692, pd23);
      };
   }

static void GetAreaColor_P120(ggData_v5636, event_v5664)
   word ggData_v5636;
   word event_v5664;
   {
   register ptr gf_c12836 =  (ptr) &globalframe;
   word fv_v3848;
   word errorRope_v3876 = 0;
   word color_v3904 = 0;
   word success_v3932 = 1;
   /* GetAreaColor: */ 
SOURCE(771, 262)
SOURCE(803, 42)
   fv_v3848 = XR_Narrow((*  (ptr) (* (( (ptr) event_v5664)+1) ) ), (* (( (ptr) gf_c12836)+4) ));
SOURCE(901, 83)
   {
      W3 var_c12260;
      (void) GetColorOfSelectedSlice_P240((word) &var_c12260, 1, ggData_v5636, (* (( (ptr) gf_c12836)+18) ));
      errorRope_v3876 = var_c12260.f2;
      success_v3932 = var_c12260.f1;
      color_v3904 = var_c12260.f0;
      };
SOURCE(986, 16)
   (* (( (ptr) fv_v3848)+4) ) = color_v3904;
SOURCE(1004, 29)
   {
      word pd24;
      pd24 = (* (( (ptr) (* (( (ptr) gf_c12836)+34)/* var_c12228 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd24 ))))(fv_v3848, pd24);
      };
   }

static void GetLineColor_P180(ggData_v5724, event_v5752)
   word ggData_v5724;
   word event_v5752;
   {
   register ptr gf_c12868 =  (ptr) &globalframe;
   word fv_v3976;
   word errorRope_v4004 = 0;
   word color_v4032 = 0;
   word success_v4060 = 1;
   /* GetLineColor: */ 
SOURCE(1039, 263)
SOURCE(1071, 42)
   fv_v3976 = XR_Narrow((*  (ptr) (* (( (ptr) event_v5752)+1) ) ), (* (( (ptr) gf_c12868)+4) ));
SOURCE(1169, 84)
   {
      W3 var_c12292;
      (void) GetColorOfSelectedSlice_P240((word) &var_c12292, 0, ggData_v5724, (* (( (ptr) gf_c12868)+12) ));
      errorRope_v4004 = var_c12292.f2;
      success_v4060 = var_c12292.f1;
      color_v4032 = var_c12292.f0;
      };
SOURCE(1255, 16)
   (* (( (ptr) fv_v3976)+4) ) = color_v4032;
SOURCE(1273, 29)
   {
      word pd25;
      pd25 = (* (( (ptr) (* (( (ptr) gf_c12868)+34)/* var_c12228 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd25 ))))(fv_v3976, pd25);
      };
   }

static void GetColorOfSelectedSlice_P240(formal_c049, formal_c082, ggData_v3332, opName_v3360)
   word formal_c049;
   word formal_c082;
   word ggData_v3332;
   word opName_v3360;
   {
   W9 var_c12900;
   /* declaration of fill_v3304 skipped */ 
   register ptr gf_c12932 =  (ptr) &globalframe;
   /* declaration of color_v3404 skipped */ 
   word success_v3432;
   word error_v3460;
   /* declaration of var_c12324 skipped */ 
   word aborted_v4104 = 0;
   /* declaration of sliceD_v4132 skipped */ 
   (* (( (ptr) &var_c12900)+4)/* fill_v3304 */  ) = formal_c082;
   /* GetColorOfSelectedSlice: */ 
SOURCE(1308, 1000)
   {
      word tmpAddr26;
      tmpAddr26 = (word) (( (ptr) &var_c12900)+6)/* var_c12324 */ ;
      (*  (ptr) tmpAddr26 ) = ( ((word)  (fPt) UniqueColorOrAbort_P420) );
      (* (( (ptr) tmpAddr26) + 1) ) = 1;
      };
SOURCE(1308, 1000)
   (* (( (ptr) &var_c12900)+5)/* color_v3404 */  ) = 0;
SOURCE(1308, 1000)
   success_v3432 = 1;
SOURCE(1308, 1000)
   error_v3460 = 0;
SOURCE(1472, 23)
   (* (( (ptr) &var_c12900)+8)/* sliceD_v4132 */  ) = 0;
SOURCE(2106, 85)
   {
      word pd27;
      pd27 = (* (( (ptr) (* (( (ptr) gf_c12932)+33)/* var_c12196 */  ))+32) );
      aborted_v4104 = (word) ( *( (fPt) ((*  (ptr) pd27 ))))((* (( (ptr) ggData_v3332)+11) ), 0, (word) (( (bPt) &var_c12900)+24)
         /* var_c12324 */ , 0, 0, pd27);
      };
SOURCE(2193, 115)
   if ((0 != aborted_v4104) || ((* (( (ptr) &var_c12900)+8)/* sliceD_v4132 */  ) == 0)) {
SOURCE(2227, 64)
      error_v3460 = (word) ReportSelectionProblems_P300(aborted_v4104, (* (( (ptr) &var_c12900)+8)/* sliceD_v4132 */  ), opName_v3360, ggData_v3332)
      ;
SOURCE(2293, 15)
      success_v3432 = 0;
      };
   /* removed tail goto */ 
   (*  (ptr) formal_c049 ) = (* (( (ptr) &var_c12900)+5)/* color_v3404 */  );
   (* (( (ptr) formal_c049)+1) ) = success_v3432;
   (* (( (ptr) formal_c049)+2) ) = error_v3460;
   return;
   }

static word UniqueColorOrAbort_P420(thisD_v4236, formal_c12996)
   word thisD_v4236;
   word formal_c12996;
   {
   register ptr gf_c12964 =  (ptr) &globalframe;
   word done_v4280;
   word thisColor_v4308 = 0;
   word isUnique_v4336 = 1;
   formal_c12996 = (formal_c12996 - 24);
   /* UniqueColorOrAbort: */ 
SOURCE(1497, 603)
SOURCE(1497, 603)
   done_v4280 = 0;
SOURCE(1621, 479)
   if (((* (( (ptr) formal_c12996)+8) ) == 0)) {
SOURCE(1644, 14)
      (* (( (ptr) formal_c12996)+8) ) = thisD_v4236;
SOURCE(1660, 159)
      if ((0 != (* (( (ptr) formal_c12996)+4) ))) {
SOURCE(1673, 75)
         {
            W2 var_c12388;
            {
               word pd28;
               pd28 = (* (( (ptr) (* (( (ptr) gf_c12964)+35)/* var_c12356 */  ))+62) );
               (void) ( *( (fPt) ((*  (ptr) pd28 ))))((word) &var_c12388, (*  (ptr) thisD_v4236 ), (* (( (ptr) thisD_v4236)+1) ), pd28);
               };
            isUnique_v4336 = var_c12388.f1;
            (* (( (ptr) formal_c12996)+5) ) = var_c12388.f0;
            };
         }
      else {
SOURCE(1748, 71)
         {
            W2 var_c12420;
            {
               word pd29;
               pd29 = (* (( (ptr) (* (( (ptr) gf_c12964)+35)/* var_c12356 */  ))+60) );
               (void) ( *( (fPt) ((*  (ptr) pd29 ))))((word) &var_c12420, (*  (ptr) thisD_v4236 ), (* (( (ptr) thisD_v4236)+1) ), pd29);
               };
            isUnique_v4336 = var_c12420.f1;
            (* (( (ptr) formal_c12996)+5) ) = var_c12420.f0;
            };
         };
SOURCE(1821, 19)
      done_v4280 =  (unsigned) (0 == isUnique_v4336);
      }
   else {
SOURCE(1851, 159)
      if ((0 != (* (( (ptr) formal_c12996)+4) ))) {
SOURCE(1864, 75)
         {
            W2 var_c12452;
            {
               word pd30;
               pd30 = (* (( (ptr) (* (( (ptr) gf_c12964)+35)/* var_c12356 */  ))+62) );
               (void) ( *( (fPt) ((*  (ptr) pd30 ))))((word) &var_c12452, (*  (ptr) thisD_v4236 ), (* (( (ptr) thisD_v4236)+1) ), pd30);
               };
            isUnique_v4336 = var_c12452.f1;
            (* (( (ptr) formal_c12996)+5) ) = var_c12452.f0;
            };
         }
      else {
SOURCE(1939, 71)
         {
            W2 var_c12484;
            {
               word pd31;
               pd31 = (* (( (ptr) (* (( (ptr) gf_c12964)+35)/* var_c12356 */  ))+60) );
               (void) ( *( (fPt) ((*  (ptr) pd31 ))))((word) &var_c12484, (*  (ptr) thisD_v4236 ), (* (( (ptr) thisD_v4236)+1) ), pd31);
               };
            isUnique_v4336 = var_c12484.f1;
            (* (( (ptr) formal_c12996)+5) ) = var_c12484.f0;
            };
         };
SOURCE(2012, 88)
      {
         word pd33;
         if ((0 == isUnique_v4336)) { goto then032;};
         pd33 = (* (( (ptr) (* (( (ptr) gf_c12964)+36)/* var_c12516 */  ))+20) );
         if ((0 == (word) ( *( (fPt) ((*  (ptr) pd33 ))))(thisColor_v4308, (* (( (ptr) formal_c12996)+5) ), pd33))) {
            then032: ;
SOURCE(2088, 12)
            done_v4280 = 1;
            };
         };
      };
SOURCE(1497, 603)
   return(done_v4280);
   }

static word ReportSelectionProblems_P300(aborted_v3520, sliceD_v3548, opName_v3576, ggData_v3604)
   word aborted_v3520;
   word sliceD_v3548;
   word opName_v3576;
   word ggData_v3604;
   {
   register ptr gf_c13028 =  (ptr) &globalframe;
   word error_v3648;
   /* ReportSelectionProblems: */ 
SOURCE(2317, 571)
SOURCE(2317, 571)
   error_v3648 = 0;
SOURCE(2444, 444)
   if ((0 != aborted_v3520)) {
SOURCE(2462, 90)
      {
         W2 var_c12548;
         var_c12548.f0 = 11;
         var_c12548.f1 = opName_v3576;
         {
            word pd34;
            pd34 = (* (( (ptr) (* (( (ptr) gf_c13028)+37)/* var_c12580 */  ))+63) );
            error_v3648 = (word) ( *( (fPt) ((*  (ptr) pd34 ))))((* (( (ptr) gf_c13028)+10) ), var_c12548, pd34);
            };
         };
SOURCE(2554, 123)
      {
         W2 var_c12612;
         var_c12612.f0 = 11;
         var_c12612.f1 = opName_v3576;
         {
            word pd35;
            pd35 = (* (( (ptr) (* (( (ptr) gf_c13028)+38)/* var_c12644 */  ))+14) );
            (void) ( *( (fPt) ((*  (ptr) pd35 ))))((* (( (ptr) ggData_v3604)+3) ), 0, (* (( (ptr) gf_c13028)+11) ), (* (( (ptr) gf_c13028)+10)
                ), var_c12612, pd35);
            };
         };
      }
   else {
SOURCE(2686, 202)
      if ((sliceD_v3548 == 0)) {
SOURCE(2709, 72)
         {
            W2 var_c12676;
            var_c12676.f0 = 11;
            var_c12676.f1 = opName_v3576;
            {
               word pd36;
               pd36 = (* (( (ptr) (* (( (ptr) gf_c13028)+37)/* var_c12580 */  ))+63) );
               error_v3648 = (word) ( *( (fPt) ((*  (ptr) pd36 ))))((* (( (ptr) gf_c13028)+13) ), var_c12676, pd36);
               };
            };
SOURCE(2783, 105)
         {
            W2 var_c12708;
            var_c12708.f0 = 11;
            var_c12708.f1 = opName_v3576;
            {
               word pd37;
               pd37 = (* (( (ptr) (* (( (ptr) gf_c13028)+38)/* var_c12644 */  ))+14) );
               (void) ( *( (fPt) ((*  (ptr) pd37 ))))((* (( (ptr) ggData_v3604)+3) ), 0, (* (( (ptr) gf_c13028)+11) ), (* (( (ptr) gf_c13028)+14)
                   ), var_c12708, pd37);
               };
            };
         };
      };
SOURCE(2317, 571)
   return(error_v3648);
   }

static void RegisterEventProcs_P360()
   {
   register ptr gf_c13060 =  (ptr) &globalframe;
   /* RegisterEventProcs: */ 
SOURCE(2897, 230)
SOURCE(2945, 66)
   {
      word pd38;
      pd38 = (* (( (ptr) (* (( (ptr) gf_c13060)+39)/* var_c12740 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd38 ))))((* (( (ptr) gf_c13060)+15) ), (word) (( (bPt) gf_c13060)+116)/* var_c12132 */ , 0, 0, 0, pd38)
      ;
      };
SOURCE(3013, 56)
   {
      word pd39;
      pd39 = (* (( (ptr) (* (( (ptr) gf_c13060)+39)/* var_c12740 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd39 ))))((* (( (ptr) gf_c13060)+16) ), (word) (( (bPt) gf_c13060)+108)/* var_c12100 */ , 0, 0, 0, pd39)
      ;
      };
SOURCE(3071, 56)
   {
      word pd40;
      pd40 = (* (( (ptr) (* (( (ptr) gf_c13060)+39)/* var_c12740 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd40 ))))((* (( (ptr) gf_c13060)+17) ), (word) (( (bPt) gf_c13060)+100)/* var_c12068 */ , 0, 0, 0, pd40)
      ;
      };
   }

/* file: GGValueEventImpl, module: GGValueEventImpl, compiled at: June 30, 1993 11:20:38 pm PDT */ 
extern void XR_install_GGValueEventImpl() {
   NoName_Q480();
   }
extern void XR_run_GGValueEventImpl() { XR_Start(&globalframe); }