/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */ /* time: April 19, 1993 11:06:41 am PDT */ /* C2C version: March 29, 1993 (sun4) */ /* ref-counting: off */ /* file: XlTQOpsImpl, module: XlTQOpsImpl */ /* switches: bcfhklnouw */ #include #include static char versionStamp[] = "@(#)mob_version [663379495,3014486888] XlTQOpsImpl"; 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_Q240(); static void XlTQOpsImpl_P0(); static void ReFork_P60(); static void EnqueueSoon_P120(); static word CountProcs_P180(); static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\047\212\136\047\300\263\255\153\150\100\200\000\000"}; static struct {unsigned f; char r[4];} string2 = {131074, "\004\015\000"}; static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\047\212\136\047\300\263\255\153\150\100\164\000\000"}; static struct {unsigned f; char r[16];} string4 = {851984, "\257\300\263\064\342\215\300\063\160\325\023\100\150\000\000"}; static unsigned string5 = 1483472896; static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"}; static struct {unsigned f; char r[20];} string7 = {1179668, "\211\006\005\124\121\122\145\160\300\351\276\264\273\300\115\104\320\264\000"}; static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\276\357\323\042\300\311\135\170\244\100\164\000\000"}; static struct {unsigned f; char r[20];} string9 = {1179666, "\006\006\060\001\064\001\100\160\001\100\164\001\100\214\001\100\224\001\000"}; static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\103\352\366\361\300\264\046\172\334\100\150\000\000"}; static struct { word f0[6]; word f6; word f7; word f8; word f9; word f10; word f11; word f12; word f13[5]; } globalframe = { {0}, (word) CountProcs_P180, 0, (word) EnqueueSoon_P120, 0, (word) ReFork_P60, 0, (word) XlTQOpsImpl_P0, {0} }; static void NoName_Q240() { register ptr gf_c023 = (ptr) &globalframe; word var_c5540; (* (( (ptr) gf_c023)+5) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2); (void) XR_DeclareGlobalFrame((word) "XlTQOpsImpl", &globalframe, (word) XR_GetTypeIndexS((word) (&string3)), (word) (( (bPt) gf_c023)+48) /* var_c5412 */ ); var_c5540 = (word) XR_ImportInterface((word) "ForkOps", (word) XR_GetTypeIndexS((word) (&string4)), 4); (* (( (ptr) gf_c023)+15)/* var_c5508 */ ) = var_c5540; (void) XR_ImportProcS(var_c5540, 1048836); var_c5540 = (word) XR_ImportInterface((word) &string5, (word) XR_GetTypeIndexS((word) (&string6)), 218); (* (( (ptr) gf_c023)+14)/* var_c5444 */ ) = var_c5540; (void) XR_ImportProcS(var_c5540, 1063940); var_c5540 = (word) XR_ExportInterface((word) &string5, (word) XR_GetTypeIndexS((word) (&string6)), 218); (* (( (ptr) gf_c023)+16)/* var_c5572 */ ) = var_c5540; (void) XR_ExportType((word) "TQRep", (word) XR_GetTypeIndexS((word) (&string7)), (word) XR_GetTypeIndex((word) &string8, 0, (word) &string9) ); var_c5540 = (word) XR_ExportInterface((word) "XlTQOps", (word) XR_GetTypeIndexS((word) (&string10)), 2); (* (( (ptr) gf_c023)+17)/* var_c5604 */ ) = var_c5540; (void) XR_ExportProcS(var_c5540, (word) (( (bPt) gf_c023)+32)/* var_c5348 */ , 1310725); (void) XR_ExportProcS(var_c5540, (word) (( (bPt) gf_c023)+24)/* var_c5316 */ , 67371265); } static void XlTQOpsImpl_P0(formal_c012, formal_c011) word formal_c012; word formal_c011; { /* XlTQOpsImpl: */ } static void ReFork_P60(data_v2916) word data_v2916; { register ptr gf_c5636 = (ptr) &globalframe; word d_v3244; /* ReFork: */ SOURCE(286, 102) SOURCE(315, 29) d_v3244 = XR_Narrow(data_v2916, (* (( (ptr) gf_c5636)+5) )); SOURCE(346, 42) { word pd11; pd11 = (* (( (ptr) (* (( (ptr) gf_c5636)+14)/* var_c5444 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd11 ))))((* (ptr) d_v3244 ), (* (( (ptr) d_v3244)+1) ), (* (( (ptr) d_v3244)+2) ), (* (( (ptr) d_v3244)+3) ), pd11); }; } static void EnqueueSoon_P120(ms_v2988, tq_v3016, proc_v3044, data_v3072, event_v3100) word ms_v2988; word tq_v3016; word proc_v3044; word data_v3072; word event_v3100; { register ptr gf_c5668 = (ptr) &globalframe; word d_v3300; /* EnqueueSoon: */ SOURCE(392, 286) SOURCE(510, 78) d_v3300 = XR_NewObject(16, (* (( (ptr) gf_c5668)+5) )); (* (ptr) d_v3300 ) = tq_v3016; (* (( (ptr) d_v3300)+1) ) = XR_CheckProc(proc_v3044); (* (( (ptr) d_v3300)+2) ) = data_v3072; (* (( (ptr) d_v3300)+3) ) = event_v3100; SOURCE(590, 88) { word pd12; pd12 = (* (( (ptr) (* (( (ptr) gf_c5668)+15)/* var_c5508 */ ))+5) ); (void) ( *( (fPt) ((* (ptr) pd12 ))))(ms_v2988, (word) (( (bPt) gf_c5668)+40)/* var_c5380 */ , d_v3300, 3, pd12); }; } static word CountProcs_P180(tq_v3172) word tq_v3172; { word n_v3216; /* CountProcs: */ SOURCE(684, 125) SOURCE(742, 17) n_v3216 = (* (( (ptr) tq_v3172)+11) ); SOURCE(761, 48) if ((0 != (* (( (ptr) tq_v3172)+6) )) || ((* (( (ptr) tq_v3172)+10) ) > 0)) { SOURCE(802, 7) n_v3216 = (n_v3216 + 1); }; SOURCE(684, 125) return(n_v3216); } /* file: XlTQOpsImpl, module: XlTQOpsImpl, compiled at: April 19, 1993 11:06:26 am PDT */ extern void XR_install_XlTQOpsImpl() { NoName_Q240(); } extern void XR_run_XlTQOpsImpl() { XR_Start(&globalframe); }