/* Generated from Cedar to C at: June 12, 1988 4:53:10 pm PDT */
/* from module "SparcLoaderTestCodeImpl" */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [1598034501,2992426776] SparcLoaderTestCodeImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bytePtr;
typedef unsigned short half, *halfPtr;
typedef struct {word f0; word f1; word f2; word f3} BIT128;
typedef struct {BIT128 f; BIT128 r} BIT256;
typedef struct {BIT256 f; BIT128 r} BIT384;
typedef word (*funcPtr)();
#define SOURCE(p, l) /* source p, l */
#define IOP2(op, x, y)  ( (word) (((int) (word) (x)) op ((int) (word) (y))) )
static void SparcLoaderTestCodeImpl();
static struct {unsigned f; char r[16];} string1 = {786448, "\257\300\137\100\022\105\300\262\134\317\030\064\000\000\000\000"};
static void L0();
static void P←30();
static BIT384 globalframe;

static void SparcLoaderTestCodeImpl()
   {
   register ptr gf←07 =  (ptr) &globalframe;
   (* (( (ptr) gf←07)+10) ) = ( ((word)  (funcPtr) L0) );
   (* (( (ptr) gf←07)+8) ) = ( ((word)  (funcPtr) P←30) );
   (void) XR←DeclareGlobalFrame((word) "SparcLoaderTestCodeImpl\000", &globalframe, (word) XR←GetTypeIndex((word) &string1, 0, 0), (word) (( (bytePtr) gf←07)+40)/* var←1278 */ );
   };

static void L0(formal←05, formal←04)
   word formal←05;
   word formal←04;
   {
   /* SparcLoaderTestCodeImpl */ 
SOURCE(1, 0);
   };

static void P←30()
   {
   word i←1236 = 0;
   /* P */ 
SOURCE(45, 36);
SOURCE(57, 12);
SOURCE(71, 10);
   i←1236 = IOP2( + , i←1236, 1);
   };

/* transformed in 0.03 seconds. */ 
extern void XR←install←SparcLoaderTestCodeImpl() {
   SparcLoaderTestCodeImpl();
   };
static void XR←install() {XR←install←SparcLoaderTestCodeImpl();};
/* installation sequence */
static void XR←load←SparcLoaderTestCodeImpl() { XR←install←SparcLoaderTestCodeImpl(); };
static void XR←load() { XR←install←SparcLoaderTestCodeImpl(); };
static void XR←run←SparcLoaderTestCodeImpl() { XR←Start(&globalframe); };
static void XR←run() { XR←Start(&globalframe); };