20020304-1.c

linux下的gcc编译器

			  {
			    obj_t BgL_auxz00_4202;
			    BgL_auxz00_4202 =
			      ((((obj_t) ((long) BgL_formalsz00_39 - 3))->
				pair_t).cdr);
			    BgL_auxz00_4201 =
			      ((((obj_t) ((long) BgL_auxz00_4202 - 3))->
				pair_t).cdr);
			  }
			  BgL_auxz00_4200 =
			    ((((obj_t) ((long) BgL_auxz00_4201 - 3))->pair_t).
			     car);
			}
			BgL_testz00_4199 =
			  ((((long) BgL_auxz00_4200) & ((1 << 2) - 1)) == 3);
		      }
		      if (BgL_testz00_4199) {
			goto BgL_tagzd21971zd2_948;
		      } else {
			if ((BgL_namedzf3zf3_42 !=
			     ((obj_t) (obj_t)
			      ((long) (((long) (1) << 2) | 2))))) {
			  obj_t BgL_v1050z00_1022;
			  {
			    int BgL_auxz00_4209;
			    BgL_auxz00_4209 = (int) (((long) 3));
			    BgL_v1050z00_1022 =
			      create_vector (BgL_auxz00_4209);
			  }
			  {
			    obj_t BgL_arg1604z00_1024;
			    BgL_arg1604z00_1024 =
			      make_pair (BgL_wherez00_41, BgL_bodyz00_40);
			    {
			      int BgL_auxz00_4213;
			      BgL_auxz00_4213 = (int) (((long) 2));
			      ((&
				(((obj_t) (BgL_v1050z00_1022))->vector_t.
				 obj0))[BgL_auxz00_4213] =
			       BgL_arg1604z00_1024,
			       ((obj_t) (obj_t)
				((long) (((long) (3) << 2) | 2))));
			    }
			  }
			  {
			    int BgL_auxz00_4216;
			    BgL_auxz00_4216 = (int) (((long) 1));
			    ((&(((obj_t) (BgL_v1050z00_1022))->vector_t.obj0))
			     [BgL_auxz00_4216] =
			     BgL_locz00_43,
			     ((obj_t) (obj_t)
			      ((long) (((long) (3) << 2) | 2))));
			  }
			  {
			    obj_t BgL_auxz00_4221;
			    int BgL_auxz00_4219;
			    BgL_auxz00_4221 =
			      (obj_t) ((long)
				       (((long) (((long) 50)) << 2) | 1));
			    BgL_auxz00_4219 = (int) (((long) 0));
			    ((&(((obj_t) (BgL_v1050z00_1022))->vector_t.obj0))
			     [BgL_auxz00_4219] =
			     BgL_auxz00_4221,
			     ((obj_t) (obj_t)
			      ((long) (((long) (3) << 2) | 2))));
			  }
			  return BgL_v1050z00_1022;
			} else {
			  obj_t BgL_v1051z00_1025;
			  {
			    int BgL_auxz00_4224;
			    BgL_auxz00_4224 = (int) (((long) 3));
			    BgL_v1051z00_1025 =
			      create_vector (BgL_auxz00_4224);
			  }
			  {
			    int BgL_auxz00_4227;
			    BgL_auxz00_4227 = (int) (((long) 2));
			    ((&(((obj_t) (BgL_v1051z00_1025))->vector_t.obj0))
			     [BgL_auxz00_4227] =
			     BgL_bodyz00_40,
			     ((obj_t) (obj_t)
			      ((long) (((long) (3) << 2) | 2))));
			  }
			  {
			    int BgL_auxz00_4230;
			    BgL_auxz00_4230 = (int) (((long) 1));
			    ((&(((obj_t) (BgL_v1051z00_1025))->vector_t.obj0))
			     [BgL_auxz00_4230] =
			     BgL_locz00_43,
			     ((obj_t) (obj_t)
			      ((long) (((long) (3) << 2) | 2))));
			  }
			  {
			    obj_t BgL_auxz00_4235;
			    int BgL_auxz00_4233;
			    BgL_auxz00_4235 =
			      (obj_t) ((long)
				       (((long) (((long) 54)) << 2) | 1));
			    BgL_auxz00_4233 = (int) (((long) 0));
			    ((&(((obj_t) (BgL_v1051z00_1025))->vector_t.obj0))
			     [BgL_auxz00_4233] =
			     BgL_auxz00_4235,
			     ((obj_t) (obj_t)
			      ((long) (((long) (3) << 2) | 2))));
			  }
			  return BgL_v1051z00_1025;
			}
		      }
		    }
		  }
		}
	      }
	    } else {
	      int BgL_testz00_4238;
	      {
		obj_t BgL_auxz00_4239;
		BgL_auxz00_4239 =
		  ((((obj_t) ((long) BgL_formalsz00_39 - 3))->pair_t).car);
		BgL_testz00_4238 =
		  ((((long) BgL_auxz00_4239) & ((1 << 2) - 1)) == 3);
	      }
	      if (BgL_testz00_4238) {
		goto BgL_tagzd21971zd2_948;
	      } else {
		int BgL_testz00_4242;
		{
		  obj_t BgL_auxz00_4243;
		  BgL_auxz00_4243 =
		    ((((obj_t) ((long) BgL_cdrzd21979zd2_953 - 3))->pair_t).
		     car);
		  BgL_testz00_4242 =
		    ((((long) BgL_auxz00_4243) & ((1 << 2) - 1)) == 3);
		}
		if (BgL_testz00_4242) {
		  goto BgL_tagzd21971zd2_948;
		} else {
		  if ((BgL_namedzf3zf3_42 !=
		       ((obj_t) (obj_t) ((long) (((long) (1) << 2) | 2))))) {
		    obj_t BgL_v1048z00_1018;
		    {
		      int BgL_auxz00_4248;
		      BgL_auxz00_4248 = (int) (((long) 3));
		      BgL_v1048z00_1018 = create_vector (BgL_auxz00_4248);
		    }
		    {
		      obj_t BgL_arg1602z00_1020;
		      BgL_arg1602z00_1020 =
			make_pair (BgL_wherez00_41, BgL_bodyz00_40);
		      {
			int BgL_auxz00_4252;
			BgL_auxz00_4252 = (int) (((long) 2));
			((&(((obj_t) (BgL_v1048z00_1018))->vector_t.obj0))
			 [BgL_auxz00_4252] =
			 BgL_arg1602z00_1020,
			 ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
		      }
		    }
		    {
		      int BgL_auxz00_4255;
		      BgL_auxz00_4255 = (int) (((long) 1));
		      ((&(((obj_t) (BgL_v1048z00_1018))->vector_t.obj0))
		       [BgL_auxz00_4255] =
		       BgL_locz00_43,
		       ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
		    }
		    {
		      obj_t BgL_auxz00_4260;
		      int BgL_auxz00_4258;
		      BgL_auxz00_4260 =
			(obj_t) ((long) (((long) (((long) 49)) << 2) | 1));
		      BgL_auxz00_4258 = (int) (((long) 0));
		      ((&(((obj_t) (BgL_v1048z00_1018))->vector_t.obj0))
		       [BgL_auxz00_4258] =
		       BgL_auxz00_4260,
		       ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
		    }
		    return BgL_v1048z00_1018;
		  } else {
		    obj_t BgL_v1049z00_1021;
		    {
		      int BgL_auxz00_4263;
		      BgL_auxz00_4263 = (int) (((long) 3));
		      BgL_v1049z00_1021 = create_vector (BgL_auxz00_4263);
		    }
		    {
		      int BgL_auxz00_4266;
		      BgL_auxz00_4266 = (int) (((long) 2));
		      ((&(((obj_t) (BgL_v1049z00_1021))->vector_t.obj0))
		       [BgL_auxz00_4266] =
		       BgL_bodyz00_40,
		       ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
		    }
		    {
		      int BgL_auxz00_4269;
		      BgL_auxz00_4269 = (int) (((long) 1));
		      ((&(((obj_t) (BgL_v1049z00_1021))->vector_t.obj0))
		       [BgL_auxz00_4269] =
		       BgL_locz00_43,
		       ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
		    }
		    {
		      obj_t BgL_auxz00_4274;
		      int BgL_auxz00_4272;
		      BgL_auxz00_4274 =
			(obj_t) ((long) (((long) (((long) 53)) << 2) | 1));
		      BgL_auxz00_4272 = (int) (((long) 0));
		      ((&(((obj_t) (BgL_v1049z00_1021))->vector_t.obj0))
		       [BgL_auxz00_4272] =
		       BgL_auxz00_4274,
		       ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
		    }
		    return BgL_v1049z00_1021;
		  }
		}
	      }
	    }
	  }
	} else {
	  int BgL_testz00_4277;
	  {
	    obj_t BgL_auxz00_4278;
	    BgL_auxz00_4278 =
	      ((((obj_t) ((long) BgL_formalsz00_39 - 3))->pair_t).car);
	    BgL_testz00_4277 =
	      ((((long) BgL_auxz00_4278) & ((1 << 2) - 1)) == 3);
	  }
	  if (BgL_testz00_4277) {
	    goto BgL_tagzd21971zd2_948;
	  } else {
	    if ((BgL_namedzf3zf3_42 !=
		 ((obj_t) (obj_t) ((long) (((long) (1) << 2) | 2))))) {
	      obj_t BgL_v1046z00_1014;
	      {
		int BgL_auxz00_4283;
		BgL_auxz00_4283 = (int) (((long) 3));
		BgL_v1046z00_1014 = create_vector (BgL_auxz00_4283);
	      }
	      {
		obj_t BgL_arg1600z00_1016;
		BgL_arg1600z00_1016 =
		  make_pair (BgL_wherez00_41, BgL_bodyz00_40);
		{
		  int BgL_auxz00_4287;
		  BgL_auxz00_4287 = (int) (((long) 2));
		  ((&(((obj_t) (BgL_v1046z00_1014))->vector_t.obj0))
		   [BgL_auxz00_4287] =
		   BgL_arg1600z00_1016,
		   ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
		}
	      }
	      {
		int BgL_auxz00_4290;
		BgL_auxz00_4290 = (int) (((long) 1));
		((&(((obj_t) (BgL_v1046z00_1014))->vector_t.obj0))
		 [BgL_auxz00_4290] =
		 BgL_locz00_43,
		 ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	      }
	      {
		obj_t BgL_auxz00_4295;
		int BgL_auxz00_4293;
		BgL_auxz00_4295 =
		  (obj_t) ((long) (((long) (((long) 48)) << 2) | 1));
		BgL_auxz00_4293 = (int) (((long) 0));
		((&(((obj_t) (BgL_v1046z00_1014))->vector_t.obj0))
		 [BgL_auxz00_4293] =
		 BgL_auxz00_4295,
		 ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	      }
	      return BgL_v1046z00_1014;
	    } else {
	      obj_t BgL_v1047z00_1017;
	      {
		int BgL_auxz00_4298;
		BgL_auxz00_4298 = (int) (((long) 3));
		BgL_v1047z00_1017 = create_vector (BgL_auxz00_4298);
	      }
	      {
		int BgL_auxz00_4301;
		BgL_auxz00_4301 = (int) (((long) 2));
		((&(((obj_t) (BgL_v1047z00_1017))->vector_t.obj0))
		 [BgL_auxz00_4301] =
		 BgL_bodyz00_40,
		 ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	      }
	      {
		int BgL_auxz00_4304;
		BgL_auxz00_4304 = (int) (((long) 1));
		((&(((obj_t) (BgL_v1047z00_1017))->vector_t.obj0))
		 [BgL_auxz00_4304] =
		 BgL_locz00_43,
		 ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	      }
	      {
		obj_t BgL_auxz00_4309;
		int BgL_auxz00_4307;
		BgL_auxz00_4309 =
		  (obj_t) ((long) (((long) (((long) 52)) << 2) | 1));
		BgL_auxz00_4307 = (int) (((long) 0));
		((&(((obj_t) (BgL_v1047z00_1017))->vector_t.obj0))
		 [BgL_auxz00_4307] =
		 BgL_auxz00_4309,
		 ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	      }
	      return BgL_v1047z00_1017;
	    }
	  }
	}
      }
    } else {
      if ((BgL_namedzf3zf3_42 !=
	   ((obj_t) (obj_t) ((long) (((long) (1) << 2) | 2))))) {
	obj_t BgL_v1044z00_1010;
	{
	  int BgL_auxz00_4314;
	  BgL_auxz00_4314 = (int) (((long) 3));
	  BgL_v1044z00_1010 = create_vector (BgL_auxz00_4314);
	}
	{
	  obj_t BgL_arg1598z00_1012;
	  BgL_arg1598z00_1012 = make_pair (BgL_wherez00_41, BgL_bodyz00_40);
	  {
	    int BgL_auxz00_4318;
	    BgL_auxz00_4318 = (int) (((long) 2));
	    ((&(((obj_t) (BgL_v1044z00_1010))->vector_t.obj0))
	     [BgL_auxz00_4318] =
	     BgL_arg1598z00_1012,
	     ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	  }
	}
	{
	  int BgL_auxz00_4321;
	  BgL_auxz00_4321 = (int) (((long) 1));
	  ((&(((obj_t) (BgL_v1044z00_1010))->vector_t.obj0))[BgL_auxz00_4321]
	   =
	   BgL_locz00_43, ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	}
	{
	  obj_t BgL_auxz00_4326;
	  int BgL_auxz00_4324;
	  BgL_auxz00_4326 =
	    (obj_t) ((long) (((long) (((long) 47)) << 2) | 1));
	  BgL_auxz00_4324 = (int) (((long) 0));
	  ((&(((obj_t) (BgL_v1044z00_1010))->vector_t.obj0))[BgL_auxz00_4324]
	   =
	   BgL_auxz00_4326,
	   ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	}
	return BgL_v1044z00_1010;
      } else {
	obj_t BgL_v1045z00_1013;
	{
	  int BgL_auxz00_4329;
	  BgL_auxz00_4329 = (int) (((long) 3));
	  BgL_v1045z00_1013 = create_vector (BgL_auxz00_4329);
	}
	{
	  int BgL_auxz00_4332;
	  BgL_auxz00_4332 = (int) (((long) 2));
	  ((&(((obj_t) (BgL_v1045z00_1013))->vector_t.obj0))[BgL_auxz00_4332]
	   =
	   BgL_bodyz00_40,
	   ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	}
	{
	  int BgL_auxz00_4335;
	  BgL_auxz00_4335 = (int) (((long) 1));
	  ((&(((obj_t) (BgL_v1045z00_1013))->vector_t.obj0))[BgL_auxz00_4335]
	   =
	   BgL_locz00_43, ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	}
	{
	  obj_t BgL_auxz00_4340;
	  int BgL_auxz00_4338;
	  BgL_auxz00_4340 =
	    (obj_t) ((long) (((long) (((long) 51)) << 2) | 1));
	  BgL_auxz00_4338 = (int) (((long) 0));
	  ((&(((obj_t) (BgL_v1045z00_1013))->vector_t.obj0))[BgL_auxz00_4338]
	   =
	   BgL_auxz00_4340,
	   ((obj_t) (obj_t) ((long) (((long) (3) << 2) | 2))));
	}
	return BgL_v1045z00_1013;
      }
    }
  }
}