/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */
/* time: March 10, 1992 11:57:20 am PST */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: AISStubsImpl, module: AISStubsImpl */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [457722807,3326375583] AISStubsImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef struct {word f0, f1;} W2;
#define SOURCE(p, l) /* source p, l */
static void NoName←Q1320();
static void AISStubsImpl←P0();
static word CreateFile←P60();
static void DeleteFile←P120();
static word OpenFile←P180();
static void CloseFile←P240();
static word ReadComment←P300();
static void WriteComment←P360();
static word ReadPlacement←P420();
static void WritePlacement←P480();
static word ReadPhotometry←P540();
static word ReadHistogram←P600();
static void WritePhotometry←P660();
static word ReadRaster←P720();
static word OpenWindow←P780();
static void CloseWindow←P840();
static void GetWindowParams←P900();
static word MinBufferSize←P960();
static word EndOfWindow←P1020();
static void UnsafeReadLine←P1080();
static void UnsafeWriteLine←P1140();
static word ReadSample←P1200();
static void WriteSample←P1260();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\033\110\113\267\300\306\104\166\237\100\150\000\000"};
static struct {unsigned f; char r[16];} string2 = {851984, "\257\300\054\250\365\165\300\020\246\121\061\100\150\000\000"};
static struct {
word f0[5]; word f5; word f6; word f7;
word f8; word f9; word f10; word f11;
word f12; word f13; word f14; 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; 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[2];
} globalframe = {
{0}, (word) WriteSample←P1260, 0, (word) ReadSample←P1200,
0, (word) UnsafeWriteLine←P1140, 0, (word) UnsafeReadLine←P1080,
0, (word) EndOfWindow←P1020, 0, (word) MinBufferSize←P960,
0, (word) GetWindowParams←P900, 0, (word) CloseWindow←P840,
0, (word) OpenWindow←P780, 0, (word) ReadRaster←P720,
0, (word) WritePhotometry←P660, 0, (word) ReadHistogram←P600,
0, (word) ReadPhotometry←P540, 0, (word) WritePlacement←P480,
0, (word) ReadPlacement←P420, 0, (word) WriteComment←P360,
0, (word) ReadComment←P300, 0, (word) CloseFile←P240,
0, (word) OpenFile←P180, 0, (word) DeleteFile←P120,
0, (word) CreateFile←P60, 0, (word) AISStubsImpl←P0,
{0}
};
static void NoName←Q1320()
{
register ptr gf←c0106 = (ptr) &globalframe;
word var←c7760;
(void) XR←DeclareGlobalFrame((word) "AISStubsImpl", &globalframe, (word) XR←GetTypeIndexS((word) (&string1)), (word) (( (bPt) gf←c0106)+188)
/* var←c7696 */ );
var←c7760 = (word) XR←ExportInterface((word) "AIS", (word) XR←GetTypeIndexS((word) (&string2)), 22);
(* (( (ptr) gf←c0106)+49)/* var←c7728 */ ) = var←c7760;
(void) XR←ExportVar(var←c7760, 0, (word) (( (bPt) gf←c0106)+16)/* var←c6992 */ );
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+180)/* var←c7664 */ , 67895555);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+172)/* var←c7632 */ , 262657);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+164)/* var←c7600 */ , 67633922);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+156)/* var←c7568 */ , 263169);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+148)/* var←c7536 */ , 67372289);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+140)/* var←c7504 */ , 525826);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+132)/* var←c7472 */ , 67372801);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+124)/* var←c7440 */ , 526338);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+116)/* var←c7408 */ , 67373313);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+108)/* var←c7376 */ , 67373569);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+100)/* var←c7344 */ , 789251);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+92)/* var←c7312 */ , 67374081);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+84)/* var←c7280 */ , 68422917);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+76)/* var←c7248 */ , 265729);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+68)/* var←c7216 */ , 268701441);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+60)/* var←c7184 */ , 67375105);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+52)/* var←c7152 */ , 67375361);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+44)/* var←c7120 */ , 1053187);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+36)/* var←c7088 */ , 1053443);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+28)/* var←c7056 */ , 67900419);
(void) XR←ExportProcS(var←c7760, (word) (( (bPt) gf←c0106)+20)/* var←c7024 */ , 1053956);
}
static void AISStubsImpl←P0(formal←c027, formal←c026)
word formal←c027;
word formal←c026;
{
/* AISStubsImpl: */
}
static word CreateFile←P60(name←v3472, raster←v3500, attributeLength←v3528)
word name←v3472;
word raster←v3500;
word attributeLength←v3528;
{
register ptr gf←c7792 = (ptr) &globalframe;
word f←v3572;
/* CreateFile: */
SOURCE(402, 133)
SOURCE(402, 133)
f←v3572 = 0;
SOURCE(508, 27)
{
word var←c032 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c7792)+16)/* var←c6992 */ , (word) &var←c032);
};
}
static void DeleteFile←P120(name←v3632)
word name←v3632;
{
register ptr gf←c7824 = (ptr) &globalframe;
/* DeleteFile: */
SOURCE(541, 68)
SOURCE(582, 27)
{
word var←c034 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c7824)+16)/* var←c6992 */ , (word) &var←c034);
};
}
static word OpenFile←P180(name←v3692, write←v3720)
word name←v3692;
word write←v3720;
{
register ptr gf←c7856 = (ptr) &globalframe;
word f←v3764;
/* OpenFile: */
SOURCE(615, 108)
SOURCE(615, 108)
f←v3764 = 0;
SOURCE(696, 27)
{
word var←c038 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c7856)+16)/* var←c6992 */ , (word) &var←c038);
};
}
static void CloseFile←P240(f←v3824)
word f←v3824;
{
register ptr gf←c7888 = (ptr) &globalframe;
/* CloseFile: */
SOURCE(729, 64)
SOURCE(766, 27)
{
word var←c040 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c7888)+16)/* var←c6992 */ , (word) &var←c040);
};
}
static word ReadComment←P300(f←v3884)
word f←v3884;
{
register ptr gf←c7920 = (ptr) &globalframe;
word var←c3928;
/* ReadComment: */
SOURCE(799, 81)
SOURCE(853, 27)
{
word var←c043 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c7920)+16)/* var←c6992 */ , (word) &var←c043);
};
}
static void WriteComment←P360(f←v3988, comment←v4016)
word f←v3988;
word comment←v4016;
{
register ptr gf←c7952 = (ptr) &globalframe;
/* WriteComment: */
SOURCE(886, 82)
SOURCE(941, 27)
{
word var←c046 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c7952)+16)/* var←c6992 */ , (word) &var←c046);
};
}
static word ReadPlacement←P420(f←v4076)
word f←v4076;
{
register ptr gf←c7984 = (ptr) &globalframe;
word placement←v4120;
/* ReadPlacement: */
SOURCE(974, 99)
SOURCE(974, 99)
placement←v4120 = 0;
SOURCE(1046, 27)
{
word var←c049 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c7984)+16)/* var←c6992 */ , (word) &var←c049);
};
}
static void WritePlacement←P480(f←v4180, placement←v4208)
word f←v4180;
word placement←v4208;
{
register ptr gf←c8016 = (ptr) &globalframe;
/* WritePlacement: */
SOURCE(1079, 91)
SOURCE(1143, 27)
{
word var←c052 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8016)+16)/* var←c6992 */ , (word) &var←c052);
};
}
static word ReadPhotometry←P540(f←v4268)
word f←v4268;
{
register ptr gf←c8048 = (ptr) &globalframe;
word var←c4312;
/* ReadPhotometry: */
SOURCE(1176, 90)
SOURCE(1239, 27)
{
word var←c055 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8048)+16)/* var←c6992 */ , (word) &var←c055);
};
}
static word ReadHistogram←P600(f←v4372)
word f←v4372;
{
register ptr gf←c8080 = (ptr) &globalframe;
word var←c4416;
/* ReadHistogram: */
SOURCE(1271, 88)
SOURCE(1332, 27)
{
word var←c058 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8080)+16)/* var←c6992 */ , (word) &var←c058);
};
}
static void WritePhotometry←P660(f←v4476, photometry←v4504, histogram←v4532)
word f←v4476;
word photometry←v4504;
word histogram←v4532;
{
register ptr gf←c8112 = (ptr) &globalframe;
/* WritePhotometry: */
SOURCE(1364, 122)
SOURCE(1459, 27)
{
word var←c062 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8112)+16)/* var←c6992 */ , (word) &var←c062);
};
}
static word ReadRaster←P720(f←v4592)
word f←v4592;
{
register ptr gf←c8144 = (ptr) &globalframe;
word var←c4636;
/* ReadRaster: */
SOURCE(1492, 82)
SOURCE(1547, 27)
{
word var←c065 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8144)+16)/* var←c6992 */ , (word) &var←c065);
};
}
static word OpenWindow←P780(f←v4696, firstScan←v4724, lastScan←v4752, firstPixel←v4780, lastPixel←v4808)
word f←v4696;
word firstScan←v4724;
word lastScan←v4752;
word firstPixel←v4780;
word lastPixel←v4808;
{
register ptr gf←c8176 = (ptr) &globalframe;
word w←v4852;
/* OpenWindow: */
SOURCE(1581, 209)
SOURCE(1581, 209)
w←v4852 = 0;
SOURCE(1763, 27)
{
word var←c072 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8176)+16)/* var←c6992 */ , (word) &var←c072);
};
}
static void CloseWindow←P840(w←v4912)
word w←v4912;
{
register ptr gf←c8208 = (ptr) &globalframe;
/* CloseWindow: */
SOURCE(1796, 66)
SOURCE(1835, 27)
{
word var←c074 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8208)+16)/* var←c6992 */ , (word) &var←c074);
};
}
static void GetWindowParams←P900(formal←c081, w←v4972)
word formal←c081;
word w←v4972;
{
register ptr gf←c8240 = (ptr) &globalframe;
word firstScan←v5016;
word lastScan←v5044;
word firstPixel←v5072;
word lastPixel←v5100;
/* GetWindowParams: */
SOURCE(1868, 163)
SOURCE(2004, 27)
{
word var←c080 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8240)+16)/* var←c6992 */ , (word) &var←c080);
};
}
static word MinBufferSize←P960(w←v5160)
word w←v5160;
{
register ptr gf←c8272 = (ptr) &globalframe;
word length←v5204;
/* MinBufferSize: */
SOURCE(2037, 95)
SOURCE(2105, 27)
{
word var←c084 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8272)+16)/* var←c6992 */ , (word) &var←c084);
};
}
static word EndOfWindow←P1020(w←v5264)
word w←v5264;
{
register ptr gf←c8304 = (ptr) &globalframe;
word var←c5308;
/* EndOfWindow: */
SOURCE(2138, 84)
SOURCE(2195, 27)
{
word var←c087 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8304)+16)/* var←c6992 */ , (word) &var←c087);
};
}
static void UnsafeReadLine←P1080(w←v5368, buffer←v5396, line←v5424)
word w←v5368;
W2 buffer←v5396;
word line←v5424;
{
register ptr gf←c8336 = (ptr) &globalframe;
/* UnsafeReadLine: */
SOURCE(2255, 112)
SOURCE(2340, 27)
{
word var←c091 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8336)+16)/* var←c6992 */ , (word) &var←c091);
};
}
static void UnsafeWriteLine←P1140(w←v5484, buffer←v5512, line←v5540)
word w←v5484;
W2 buffer←v5512;
word line←v5540;
{
register ptr gf←c8368 = (ptr) &globalframe;
/* UnsafeWriteLine: */
SOURCE(2372, 113)
SOURCE(2458, 27)
{
word var←c095 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8368)+16)/* var←c6992 */ , (word) &var←c095);
};
}
static word ReadSample←P1200(w←v5600, line←v5628, pixel←v5656)
word w←v5600;
word line←v5628;
word pixel←v5656;
{
register ptr gf←c8400 = (ptr) &globalframe;
word value←v5700;
/* ReadSample: */
SOURCE(2491, 114)
SOURCE(2578, 27)
{
word var←c0100 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8400)+16)/* var←c6992 */ , (word) &var←c0100);
};
}
static void WriteSample←P1260(w←v5760, value←v5788, line←v5816, pixel←v5844)
word w←v5760;
word value←v5788;
word line←v5816;
word pixel←v5844;
{
register ptr gf←c8432 = (ptr) &globalframe;
/* WriteSample: */
SOURCE(2610, 106)
SOURCE(2689, 27)
{
word var←c0105 = 3;
(void) XR←RaiseError((word) (( (bPt) gf←c8432)+16)/* var←c6992 */ , (word) &var←c0105);
};
}
/* file: AISStubsImpl, module: AISStubsImpl, compiled at: March 10, 1992 11:57:19 am PST */
extern void XR←install←AISStubsImpl() {
NoName←Q1320();
}
extern void XR←run←AISStubsImpl() { XR←Start(&globalframe); }