89 UBYTE reserved[512-8-4-16-4-16-16-1];
110 PADPOSITION(0,1,0,5,MAXENAME+1);
118 #define INFILEINDEX ((512-2*sizeof(POSITION))/sizeof(INDEXENTRY)) 123 #define EMPTYININDEX (512-2*sizeof(POSITION)-INFILEINDEX*sizeof(INDEXENTRY)) 156 PADPOSITION(0,0,0,2,0);
189 PADPOSITION(4,0,0,0,
sizeof(
VARRENUM)*4);
270 PADPOINTER(10,0,1,0);
309 PADPOSITION(0,2,0,0,0);
319 LONG bracketbuffersize;
320 LONG indexbuffersize;
404 PADPOSITION(5,2,0,13,0);
406 PADPOSITION(5,2,0,12,0);
478 PADPOINTER(2,0,11,0);
519 pthread_mutex_t pthreadslockread;
520 pthread_mutex_t pthreadslockwrite;
531 PADPOINTER(2,0,6,
sizeof(pthread_mutex_t)*2);
570 PADPOSITION(0,1,0,0,0);
584 PADPOSITION(3,0,1,0,0);
646 pthread_mutex_t pthreadslock;
652 PADPOSITION(11,5,2,0,
sizeof(pthread_mutex_t));
654 PADPOSITION(9,4,2,0,
sizeof(pthread_mutex_t));
658 PADPOSITION(7,4,2,0,0);
660 PADPOSITION(5,3,2,0,0);
692 int previousNoShowInput;
700 PADPOSITION(6,3,9,0,4);
710 PADPOSITION(2,0,0,2,0);
746 WORD step1,kstep,mdum;
747 WORD gamm,ad,a3,a4,lc3,lc4;
748 WORD sign1,sign2,gamma5,num,level,factor,allsign;
750 PADPOINTER(0,0,19,0);
766 WORD sgn,num,level,factor,allsign;
796 int oldnumpotmoddollars;
841 LONG startlinenumber;
999 PADPOSITION(1,0,0,2,0);
1011 WORD cycle[MAXMATCH];
1012 PADPOINTER(0,0,MAXMATCH+2,0);
1023 WORD cycle[MAXMATCH];
1024 PADPOINTER(0,0,MAXMATCH+2,0);
1040 WORD cycle[MAXMATCH];
1041 PADPOINTER(0,0,(MAXMATCH+4),0);
1057 PADPOINTER(0,0,3,0);
1083 WORD **SplitScratch;
1093 WORD *fpincompressed;
1130 PADPOSITION(28,12,12,3,0);
1132 PADPOSITION(25,12,12,3,0);
1143 typedef struct SoRtBlOcK {
1144 pthread_mutex_t *MasterBlockLock;
1148 int MasterNumBlocks;
1151 PADPOINTER(0,3,0,0);
1156 typedef struct DeBuGgInG {
1171 typedef struct ThReAdBuCkEt {
1174 WORD *compressbuffer;
1175 LONG threadbuffersize;
1180 pthread_mutex_t lock;
1186 PADPOINTER(5,5,0,
sizeof(pthread_mutex_t));
1221 PADPOINTER(1,0,4,0);
1248 int hornerdirection;
1254 int greedytimelimit;
1280 PADPOSITION(2,1,0,3,0);
1324 UBYTE *InputFileName;
1330 UBYTE *gFortran90Kind;
1333 UBYTE *oldnumextrasymbols;
1336 pthread_rwlock_t handlelock;
1337 pthread_mutex_t storefilelock;
1338 pthread_mutex_t sbuflock;
1339 LONG ThreadScratSize;
1340 LONG ThreadScratOutSize;
1346 LONG SizeStoreCache;
1353 LONG MaxBracketBufferSize;
1354 LONG hProcessBucketSize;
1355 LONG gProcessBucketSize;
1361 LONG gThreadBucketSize;
1362 LONG ggThreadBucketSize;
1376 int NumFixedFunctions;
1382 int gTokensWriteFlag;
1388 int gproperorderflag;
1391 int totalnumberofthreads;
1392 int gSizeCommuteInSet;
1399 int gThreadBalancing;
1400 int ggThreadBalancing;
1401 int gThreadSortFileSynch;
1402 int ggThreadSortFileSynch;
1405 int gOldParallelStats;
1406 int ggOldParallelStats;
1408 int resetTimeOnClear;
1411 int gNoSpacesInNumbers;
1412 int ggNoSpacesInNumbers;
1416 int gOldFactArgFlag;
1417 int ggOldFactArgFlag;
1420 int NumSpectatorFiles;
1421 int SizeForSpectatorFiles;
1424 int gWTimeStatsFlag;
1425 int ggWTimeStatsFlag;
1436 WORD gOutNumberType;
1472 WORD NumStoreCaches;
1478 WORD ggextrasymbols;
1482 WORD BracketFactors[8];
1484 PADPOSITION(17,25,61,81,
sizeof(pthread_rwlock_t)+
sizeof(pthread_mutex_t)*2);
1486 PADPOSITION(17,23,61,81,0);
1508 UBYTE **PreSwitchStrings;
1512 UBYTE *procedureExtension;
1513 UBYTE *cprocedureExtension;
1514 LONG *PreAssignStack;
1516 int *PreSwitchModes;
1519 pthread_mutex_t PreVarLock;
1525 int PreContinuation;
1530 int NumPreSwitchStrings;
1544 int MaxPreAssignLevel;
1549 PADPOINTER(3,21,2,2);
1592 LIST AutoSymbolList;
1594 LIST AutoVectorList;
1595 LIST AutoFunctionList;
1632 UBYTE *Fortran90Kind;
1633 WORD **MultiBracketBuf;
1649 pthread_mutex_t halfmodlock;
1651 LONG argstack[MAXNEST];
1652 LONG insidestack[MAXNEST];
1653 LONG inexprstack[MAXNEST];
1657 LONG ProcessBucketSize;
1658 LONG mProcessBucketSize;
1660 LONG ThreadBucketSize;
1665 int AutoDeclareFlag;
1670 int firstconstindex;
1678 int NumWildcardNames;
1679 int WildcardBufferSize;
1683 int firstctypemessage;
1688 int TokensWriteFlag;
1689 int UnsureDollarMode;
1701 int OldParallelStats;
1703 int ThreadBalancing;
1704 int ThreadSortFileSynch;
1706 int BracketNormalize;
1709 int bracketindexflag;
1714 int properorderflag;
1717 int vetotablebasefill;
1718 int exprfillwarning;
1722 int MultiBracketLevels;
1723 int topolynomialflag;
1729 int doloopstacksize;
1735 int SizeCommuteInSet;
1742 WORD argsumcheck[MAXNEST];
1743 WORD insidesumcheck[MAXNEST];
1744 WORD inexprsumcheck[MAXNEST];
1745 WORD RepSumCheck[MAXREPEAT];
1782 WORD CollectPercentage;
1785 WORD PolyRatFunChanged;
1789 WORD RhsExprInModuleFlag;
1791 UBYTE Commercial[COMMERCIALSIZE+2];
1792 UBYTE debugFlags[MAXFLAGS+2];
1793 #if defined(WITHPTHREADS) 1794 PADPOSITION(47,8+3*MAXNEST,72,45+3*MAXNEST+MAXREPEAT,COMMERCIALSIZE+MAXFLAGS+4+
sizeof(
LIST)*17+
sizeof(pthread_mutex_t));
1795 #elif defined(WITHMPI) 1796 PADPOSITION(47,8+3*MAXNEST,72,46+3*MAXNEST+MAXREPEAT,COMMERCIALSIZE+MAXFLAGS+4+
sizeof(
LIST)*17);
1798 PADPOSITION(45,8+3*MAXNEST,70,45+3*MAXNEST+MAXREPEAT,COMMERCIALSIZE+MAXFLAGS+4+
sizeof(
LIST)*17);
1816 pthread_mutex_t inputslock;
1817 pthread_mutex_t outputslock;
1818 pthread_mutex_t MaxExprSizeLock;
1821 WORD *OldNumFactors;
1824 int NumOldNumFactors;
1835 WORD CollectOverFlag;
1839 #if defined(WITHPTHREADS) 1840 PADPOSITION(3,0,5,3,
sizeof(pthread_mutex_t)*3);
1841 #elif defined(WITHMPI) 1842 PADPOSITION(3,0,5,2,0);
1844 PADPOSITION(3,0,4,2,0);
1870 WORD *CompressBuffer;
1872 WORD *CompressPointer;
1873 VOID *CompareRoutine;
1893 #if ( BITSINWORD == 32 ) 1894 WORD PrimeList[5000];
1895 WORD numinprimelist;
1921 WORD ShortSortCount;
1922 #if ( BITSINWORD == 32 ) 1924 PADPOSITION(8,7,8,5026,0);
1926 PADPOSITION(8,7,7,5026,0);
1930 PADPOSITION(8,7,8,24,0);
1932 PADPOSITION(8,7,7,24,0);
1971 WORD *small_power_n;
1972 UWORD **small_power;
1979 WORD *previousEfactor;
1981 UWORD **NumberMemHeap;
1982 UWORD **CacheNumberMemHeap;
1991 LONG posWorkPointer;
2002 int WildcardBufferSize;
2015 int CacheNumberMemMax;
2016 int CacheNumberMemTop;
2017 int bracketindexflag;
2019 int ListSymbolsSize;
2024 WORD small_power_maxx;
2025 WORD small_power_maxn;
2026 WORD dummysubexp[SUBEXPSIZE+4];
2029 WORD comfun[FUNHEAD+4];
2032 WORD MinVecArg[7+ARGHEAD];
2033 WORD FunArg[4+ARGHEAD+FUNHEAD];
2034 WORD locwildvalue[SUBEXPSIZE];
2035 WORD mulpat[SUBEXPSIZE+5];
2037 WORD proexp[SUBEXPSIZE+5];
2051 PADPOINTER(5,27,100+SUBEXPSIZE*4+FUNHEAD*2+ARGHEAD*2,0);
2053 PADPOINTER(5,25,100+SUBEXPSIZE*4+FUNHEAD*2+ARGHEAD*2,0);
2056 PADPOINTER(5,23,100+SUBEXPSIZE*4+FUNHEAD*2+ARGHEAD*2,0);
2106 WORD *dummyrenumlist;
2113 WORD *selecttermundo;
2114 WORD *patternbuffer;
2120 WORD **SplitScratch;
2121 WORD **SplitScratch1;
2128 #ifdef WHICHSUBEXPRESSION 2131 WORD *compressSpace;
2133 THREADBUCKET *threadbuck;
2142 LONG SplitScratchSize;
2144 LONG SplitScratchSize1;
2150 #ifdef WHICHSUBEXPRESSION 2178 WORD MaxRenumScratch;
2193 WORD sizeselecttermundo;
2194 WORD patternbuffersize;
2195 WORD numlistinprint;
2201 WORD idfunctionflag;
2202 WORD poly_vars_type;
2204 #ifdef WHICHSUBEXPRESSION 2209 #ifdef WHICHSUBEXPRESSION 2223 #ifdef WHICHSUBEXPRESSION 2263 UBYTE *DollarOutBuffer;
2265 VOID (*FlipWORD)(UBYTE *);
2266 VOID (*FlipLONG)(UBYTE *);
2267 VOID (*FlipPOS)(UBYTE *);
2268 VOID (*FlipPOINTER)(UBYTE *);
2269 VOID (*ResizeData)(UBYTE *,int,UBYTE *,int);
2270 VOID (*ResizeWORD)(UBYTE *,UBYTE *);
2271 VOID (*ResizeNCWORD)(UBYTE *,UBYTE *);
2272 VOID (*ResizeLONG)(UBYTE *,UBYTE *);
2273 VOID (*ResizePOS)(UBYTE *,UBYTE *);
2274 VOID (*ResizePOINTER)(UBYTE *,UBYTE *);
2275 VOID (*CheckPower)(UBYTE *);
2276 VOID (*RenumberVec)(UBYTE *);
2283 LONG DollarOutSizeBuffer;
2284 LONG DollarInOutBuffer;
2285 #if defined(mBSD) && defined(MICROTIME) 2291 int NoSpacesInNumbers;
2293 int CurrentDictionary;
2294 int SizeDictionaries;
2295 int NumDictionaries;
2297 int CurDictVariables;
2298 int CurDictSpecials;
2299 int CurDictFunWithArgs;
2300 int CurDictNumberWarning;
2301 int CurDictNotInFunctions;
2302 int CurDictInDollars;
2303 int gNumDictionaries;
2320 WORD OptimizationLevel;
2325 #if defined(mBSD) && defined(MICROTIME) 2326 PADPOSITION(25,6,35,17,1);
2328 PADPOSITION(25,4,35,17,1);
2343 UBYTE *currentPrompt;
2355 int currentExternalChannel;
2356 PADPOINTER(0,5,0,0);
2377 PADPOSITION(0,0,0,0,
sizeof(
struct P_const)+
sizeof(
struct X_const));
2385 typedef struct AllPrivates {
2389 PADPOSITION(0,0,0,0,
sizeof(
struct T_const));
2420 typedef WORD (*WCN)(
PHEAD WORD *,WORD *,WORD,WORD);
2421 typedef WORD (*WCN2)(
PHEAD WORD *,WORD *);
2423 typedef WORD (*WCN)();
2424 typedef WORD (*WCN2)();
struct AllGlobals ALLGLOBALS
SBYTE empty[EMPTYININDEX]
struct ReNuMbEr * RENUMBER
INDEXENTRY expression[INFILEINDEX]
struct InDeXeNtRy INDEXENTRY
struct StOrEcAcHe * STORECACHE
BRACKETINDEX * indexbuffer
char * CheckpointRunBefore
struct bit_field * one_byte
struct DiStRiBuTe DISTRIBUTE
struct FuNcTiOn * FUNCTIONS
struct bit_field set_of_char[32]
struct FiLeInDeX FILEINDEX
char * CheckpointRunAfter
struct FixedGlobals FIXEDGLOBALS