#include "M3Runtime.h" #define t2 ADDRESS #define t3 ADDRESS #define t20 void #define TC3 TC_REFANY IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a; #line 33 "List.i3" typedef struct { t3 _first; t2 _tail; } t18; #line 32 PRIVATE void t2_MapProc (); PRIVATE void t2_PrintProc (); PRIVATE typecell t2_TC; PRIVATE typecell t2_TC_init = {0, 0, 0, 0, 0, t2_MapProc, #line 32 8, 0, NIL, 0, 0, (PROC)NIL, (PROC)NIL, t2_PrintProc, "", -1284802076, 569274514}; PRIVATE TYPE TC2 = &t2_TC; #line 248 #define t11 ADDRESS typedef struct { #line 244 char* elts; int size[1]; } t1; #define t12 t1 PRIVATE void t11_MapProc (); #line 248 PRIVATE void t11_PrintProc (); PRIVATE typecell t11_TC; PRIVATE typecell t11_TC_init = {0, 0, 0, 0, 0, t11_MapProc, -2, 0, NIL, 1, 4, (PROC)NIL, (PROC)NIL, t11_PrintProc, #line 248 "", -38782153, 817587111}; PRIVATE TYPE TC11 = &t11_TC; #define t25 ADDRESS typedef int t8; #define TC25 TC_ADDRESS IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44; #define t26 ADDRESS #define TC26 TC_NULL IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc; #line 358 typedef t2 (*t4)(); #line 44 typedef t20 (*t5)(); typedef unsigned char t6; #line 346 typedef t6 (*t7)(); #line 273 typedef t8 (*t9)(); #line 41 typedef t3 (*t10)(); #line 248 typedef t11 (*t13)(); #line 189 typedef signed_char t15; #line 38 typedef t15 (*t14)(); typedef int t16; #line 85 typedef t16 (*t17)(); typedef CLOSURE t19; #define t24 ADDRESS typedef struct { TYPE self; int private; } t24_methods; #define t24_msize (sizeof (t24_methods)) typedef struct { ADDRESS methods; } t24_fields; #define t24_size (sizeof (t24_fields)) #define TC24 TC_ROOT IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; #define t24_MapProc TC_ROOT->mapProc #define t21 ADDRESS #define TC21 TC_MUTEX IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; #define t21_MapProc TC_MUTEX->mapProc #define t22 ADDRESS #define TC22 TC_TEXT IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; #define t22_MapProc TC_TEXT->mapProc #define t23 ADDRESS typedef struct { TYPE self; int private; } t23_methods; #define t23_msize (sizeof (t23_methods)) typedef struct { ADDRESS methods; } t23_fields; #define t23_size (sizeof (t23_fields)) #define TC23 TC_UNTRACED_ROOT IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20; typedef unsigned char t27; typedef double t28; typedef float t29; #line 9 EXPORT INITLINK* List__init = (INITLINK*) 0; EXPORT TYPE TC_List__T = &t2_TC; EXPORT char VS_List__T__c661f0b12f626d56 = '\0'; #line 9 IMPORT t2 _List__New (); IMPORT char VS_List__New__b392c8c8308ae968; IMPORT t2 _List__List1 (); IMPORT char VS_List__List1__b43210672d61aa51; #line 9 IMPORT t2 _List__List2 (); IMPORT char VS_List__List2__88dbdaa322c8e005; IMPORT t2 _List__List3 (); IMPORT char VS_List__List3__f7a1ce313e27ea70; #line 9 IMPORT t2 _List__List4 (); IMPORT char VS_List__List4__b51105113dd5ad99; IMPORT t2 _List__List5 (); IMPORT char VS_List__List5__8c4755db26f6c7e7; #line 9 IMPORT t2 _List__List6 (); IMPORT char VS_List__List6__272a57ae32e0861a; IMPORT t2 _List__List7 (); IMPORT char VS_List__List7__8b53f1472bed7643; #line 9 IMPORT t2 _List__List8 (); IMPORT char VS_List__List8__b8baca202098ebd0; IMPORT t2 _List__List9 (); IMPORT char VS_List__List9__abcb231c270e5a52; #line 9 IMPORT t20 _List__Push (); IMPORT char VS_List__Push__699e02922bc37610; IMPORT t3 _List__Pop (); IMPORT char VS_List__Pop__274953c03301d76b; #line 9 IMPORT t16 _List__Length (); IMPORT char VS_List__Length__b19324682acef0c9; IMPORT t2 _List__Tail (); IMPORT char VS_List__Tail__0e3232ac20dce80e; #line 9 IMPORT t3 _List__First (); IMPORT char VS_List__First__9882edb930d3ab3d; IMPORT t3 _List__Second (); IMPORT char VS_List__Second__b0447ebd3f11dcb7; #line 9 IMPORT t3 _List__Third (); IMPORT char VS_List__Third__8f4e931236ba90a4; IMPORT t3 _List__Fourth (); IMPORT char VS_List__Fourth__ea11a97a3dfe5415; #line 9 IMPORT t3 _List__Fifth (); IMPORT char VS_List__Fifth__9c6e1597248e73fb; IMPORT t3 _List__Sixth (); IMPORT char VS_List__Sixth__694af67f32a73a3e; #line 9 IMPORT t3 _List__Nth (); IMPORT char VS_List__Nth__6b0dc52336cc1c34; IMPORT t20 _List__SetNth (); IMPORT char VS_List__SetNth__41be0c1734f315fe; #line 9 IMPORT t2 _List__NthTail (); IMPORT char VS_List__NthTail__0754cd4d3fb9fa8f; IMPORT t20 _List__SetNthTail (); IMPORT char VS_List__SetNthTail__bb24006b3b9b95c6; #line 9 IMPORT t3 _List__Last (); IMPORT char VS_List__Last__d477ebbe27c51c74; IMPORT t2 _List__LastTail (); IMPORT char VS_List__LastTail__b8d2597736d549c0; #line 9 IMPORT t2 _List__FirstN (); IMPORT char VS_List__FirstN__08c6b4b93cccee5a; IMPORT t6 _List__Equal (); IMPORT char VS_List__Equal__bd377d8229b0d3e1; #line 9 IMPORT t6 _List__EqualQ (); IMPORT char VS_List__EqualQ__eb339ac822d81873; IMPORT t15 _List__Compare (); IMPORT char VS_List__Compare__c321d6ce375f3f11; #line 9 IMPORT t15 _List__CompareQ (); IMPORT char VS_List__CompareQ__5bd01a232382dff3; IMPORT t6 _List__Member (); IMPORT char VS_List__Member__7f5614663119e994; #line 9 IMPORT t6 _List__MemberQ (); IMPORT char VS_List__MemberQ__a2f7904b306e52b9; IMPORT t2 _List__Assoc (); IMPORT char VS_List__Assoc__80751ef539f94e00; #line 9 IMPORT t2 _List__AssocQ (); IMPORT char VS_List__AssocQ__634654ad217647ee; IMPORT t2 _List__Append (); IMPORT char VS_List__Append__7300369b29a14ea3; #line 9 IMPORT t2 _List__AppendD (); IMPORT char VS_List__AppendD__943f90283aa07fdb; IMPORT t2 _List__Append1 (); IMPORT char VS_List__Append1__75ea15fc21c8b0d9; #line 9 IMPORT t2 _List__Append1D (); IMPORT char VS_List__Append1D__f0a143b02768dfc8; IMPORT t2 _List__Copy (); IMPORT char VS_List__Copy__5a39e47e38bfa1e8; #line 9 IMPORT t2 _List__CopyRecursively (); IMPORT char VS_List__CopyRecursively__f888568f32994d8b; IMPORT t2 _List__Reverse (); #line 9 IMPORT char VS_List__Reverse__6fd9e83d3516d760; IMPORT t2 _List__ReverseD (); IMPORT char VS_List__ReverseD__e857a6402caec3ac; #line 9 IMPORT t2 _List__Sort (); IMPORT char VS_List__Sort__5325ae4720a05a49; IMPORT t2 _List__SortD (); IMPORT char VS_List__SortD__e2d5a0eb3ea63d9f; #line 9 IMPORT t2 _List__FromVector (); IMPORT char VS_List__FromVector__b68481e6294ccc4d; IMPORT t11 _List__ToVector (); IMPORT char VS_List__ToVector__228fff052f4f6a4e; #line 9 IMPORT t2 _List__Map (); IMPORT char VS_List__Map__4668920c27880069; IMPORT t20 _List__Walk (); IMPORT char VS_List__Walk__c3d577383c12d621; #line 9 IMPORT t8 _List__Hash (); IMPORT char VS_List__Hash__a4c3ddf42d0a2087; IMPORT t8 _List__HashQ (); IMPORT char VS_List__HashQ__084e8289223c6de1; #line 9 IMPORT t2 _List__NoDuplicates (); IMPORT char VS_List__NoDuplicates__b1847d573c883d8f; IMPORT t2 _List__NoDuplicatesQ (); #line 9 IMPORT char VS_List__NoDuplicatesQ__0a75238433ea6ec6; IMPORT t2 _List__Union (); IMPORT char VS_List__Union__e6ac809f2e608538; #line 9 IMPORT t2 _List__UnionQ (); IMPORT char VS_List__UnionQ__aad65f4424b059f5; IMPORT t2 _List__Union1 (); IMPORT char VS_List__Union1__adb0661d2a0bd7fb; #line 9 IMPORT t2 _List__Union1Q (); IMPORT char VS_List__Union1Q__ff5a3a5d2db6df29; IMPORT t2 _List__Intersection (); IMPORT char VS_List__Intersection__035897f4391d37eb; #line 9 IMPORT t2 _List__IntersectionQ (); IMPORT char VS_List__IntersectionQ__bc46d8f92f966533; IMPORT t2 _List__Difference (); IMPORT char VS_List__Difference__8f14f10f202e5259; #line 9 IMPORT t2 _List__DifferenceQ (); IMPORT char VS_List__DifferenceQ__14d9b5213ba6d3dc; IMPORT t2 _List__Delete (); IMPORT char VS_List__Delete__5d57832b346ca967; #line 9 IMPORT t2 _List__DeleteQ (); IMPORT char VS_List__DeleteQ__ad7d96d63075da16; IMPORT t6 _List__Subset (); IMPORT char VS_List__Subset__2e25417f235a9225; #line 9 IMPORT t6 _List__SubsetQ (); IMPORT char VS_List__SubsetQ__1571d9133541b841; IMPORT t20 _List__ParWalk (); IMPORT char VS_List__ParWalk__eb95fba93bf0ab4b; #line 9 IMPORT t2 _List__AssocPutD (); IMPORT char VS_List__AssocPutD__5ade1383335f7139; IMPORT t2 _List__AssocQPutD (); IMPORT char VS_List__AssocQPutD__334ae9622a7982c2; #line 9 PRIVATE int init_done = -1; #line 9 "List.i3" PRIVATE void List__initProc (g) int g; { #line 9 "List.i3" if (init_done >= g) return; init_done = g; }; PRIVATE void t2_PrintProc (ref) t18* ref; { CHECKSTACKOVERFLOW; fprintf (stderr, "%s {", TC2->brand); fprintf (stderr, "^ = { "); fprintf (stderr, "first = %#x", (*ref)._first); fprintf (stderr, "tail = %#x", (*ref)._tail); fprintf (stderr, "}"); fprintf (stderr, "}\n"); }; PRIVATE void t11_PrintProc (ref) t12* ref; { CHECKSTACKOVERFLOW; fprintf (stderr, "%s {", TC11->brand); fprintf (stderr, "^ = array"); fprintf (stderr, "}\n"); }; PRIVATE void t2_MapProc (p, r, c) void (*p) (); register t18* r; ADDRESS c; { CHECKSTACKOVERFLOW; p (& ((*r)._first), r, c); p (& ((*r)._tail), r, c); }; PRIVATE void t11_MapProc (p, r, c) void (*p) (); register t12* r; ADDRESS c; { CHECKSTACKOVERFLOW; { int i1, j; t1* zz; t3* aptr; zz = & ((*r)); j = zz->size[0]; aptr = (t3*) zz->elts; for (i1 = 0; i1 < j; i1++) { p (& (aptr[i1]), r, c); }; }; }; PRIVATE INITLINK me = {(INITLINK*)NIL, 1, List__initProc }; static char* VSimports[] = { &VS_List__New__b392c8c8308ae968, &VS_List__List1__b43210672d61aa51, &VS_List__List2__88dbdaa322c8e005, &VS_List__List3__f7a1ce313e27ea70, &VS_List__List4__b51105113dd5ad99, &VS_List__List5__8c4755db26f6c7e7, &VS_List__List6__272a57ae32e0861a, &VS_List__List7__8b53f1472bed7643, &VS_List__List8__b8baca202098ebd0, &VS_List__List9__abcb231c270e5a52, &VS_List__Push__699e02922bc37610, &VS_List__Pop__274953c03301d76b, &VS_List__Length__b19324682acef0c9, &VS_List__Tail__0e3232ac20dce80e, &VS_List__First__9882edb930d3ab3d, &VS_List__Second__b0447ebd3f11dcb7, &VS_List__Third__8f4e931236ba90a4, &VS_List__Fourth__ea11a97a3dfe5415, &VS_List__Fifth__9c6e1597248e73fb, &VS_List__Sixth__694af67f32a73a3e, &VS_List__Nth__6b0dc52336cc1c34, &VS_List__SetNth__41be0c1734f315fe, &VS_List__NthTail__0754cd4d3fb9fa8f, &VS_List__SetNthTail__bb24006b3b9b95c6, &VS_List__Last__d477ebbe27c51c74, &VS_List__LastTail__b8d2597736d549c0, &VS_List__FirstN__08c6b4b93cccee5a, &VS_List__Equal__bd377d8229b0d3e1, &VS_List__EqualQ__eb339ac822d81873, &VS_List__Compare__c321d6ce375f3f11, &VS_List__CompareQ__5bd01a232382dff3, &VS_List__Member__7f5614663119e994, &VS_List__MemberQ__a2f7904b306e52b9, &VS_List__Assoc__80751ef539f94e00, &VS_List__AssocQ__634654ad217647ee, &VS_List__Append__7300369b29a14ea3, &VS_List__AppendD__943f90283aa07fdb, &VS_List__Append1__75ea15fc21c8b0d9, &VS_List__Append1D__f0a143b02768dfc8, &VS_List__Copy__5a39e47e38bfa1e8, &VS_List__CopyRecursively__f888568f32994d8b, &VS_List__Reverse__6fd9e83d3516d760, &VS_List__ReverseD__e857a6402caec3ac, &VS_List__Sort__5325ae4720a05a49, &VS_List__SortD__e2d5a0eb3ea63d9f, &VS_List__FromVector__b68481e6294ccc4d, &VS_List__ToVector__228fff052f4f6a4e, &VS_List__Map__4668920c27880069, &VS_List__Walk__c3d577383c12d621, &VS_List__Hash__a4c3ddf42d0a2087, &VS_List__HashQ__084e8289223c6de1, &VS_List__NoDuplicates__b1847d573c883d8f, &VS_List__NoDuplicatesQ__0a75238433ea6ec6, &VS_List__Union__e6ac809f2e608538, &VS_List__UnionQ__aad65f4424b059f5, &VS_List__Union1__adb0661d2a0bd7fb, &VS_List__Union1Q__ff5a3a5d2db6df29, &VS_List__Intersection__035897f4391d37eb, &VS_List__IntersectionQ__bc46d8f92f966533, &VS_List__Difference__8f14f10f202e5259, &VS_List__DifferenceQ__14d9b5213ba6d3dc, &VS_List__Delete__5d57832b346ca967, &VS_List__DeleteQ__ad7d96d63075da16, &VS_List__Subset__2e25417f235a9225, &VS_List__SubsetQ__1571d9133541b841, &VS_List__ParWalk__eb95fba93bf0ab4b, &VS_List__AssocPutD__5ade1383335f7139, &VS_List__AssocQPutD__334ae9622a7982c2, NIL }; void List__ILink (phase) int phase; { switch (phase) { case 0: { me.link = List__init; List__init = & me; t2_TC = t2_TC_init; REGISTERTYPE (TC2); t11_TC = t11_TC_init; REGISTERTYPE (TC11); break; }; case 1: { break; }; case 2: { break; }; }; };