/********************************************************************************************************************************/ /* Created: 9-Mar-2021 22:28:02 by OpenVMS SDL EV3-3 */ /* Source: 09-MAR-2021 22:28:00 $1$DGA8085:[STARLET_H.SRC]FOR_MSG.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $FORDEF ***/ #ifndef __FORDEF_LOADED #define __FORDEF_LOADED 1 #pragma __nostandard /* This file uses non-ANSI-Standard features */ #pragma __member_alignment __save #pragma __nomember_alignment #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __save /* Save the previously-defined required ptr size */ #pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */ #endif #ifdef __cplusplus extern "C" { #define __unknown_params ... #define __optional_params ... #else #define __unknown_params #define __optional_params ... #endif #ifndef __struct #if !defined(__VAXC) #define __struct struct #else #define __struct variant_struct #endif #endif #ifndef __union #if !defined(__VAXC) #define __union union #else #define __union variant_union #endif #endif /* */ /* This SDL File Generated by VAX-11 Message V04-00 on 9-MAR-2021 22:27:59.02 */ /* */ /* FILE: FOR_MSG.MSG */ /* */ /********************************************************************** */ /*** * */ /*** COPYRIGHT 2001 COMPAQ COMPUTER CORPORATION * */ /*** * */ /*** COMPAQ AND THE COMPAQ LOGO ARE TRADEMARKS OF COMPAQ INFORMATION * */ /*** TECHNOLOGIES GROUP, L.P. * */ /*** * */ /*** CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM COMPAQ * */ /*** REQUIRED FOR POSSESSION, USE OR COPYING. CONSISTENT WITH FAR * */ /*** 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE, COMPUTER * */ /*** SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL ITEMS * */ /*** ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD * */ /*** COMMERCIAL LICENSE. * */ /*** * */ /********************************************************************** */ /* */ /* 1-014 - ADD ERRORS 17-19 FOR NAMELIST. SBL 10-NOV-1980 */ /* 1-015 - CORRECT TYPO IN TOOMANVAL. SBL 15-DEC-1980 */ /* 1-016 - RESTORE CLOSING BRACKET ON OPEDEFREQ, MYSTERIOUSLY DROPPED IN 1-015. */ /* SBL 6-JAN-1981 */ /* 2-001 - CONVERT TO MESSAGE UTILITY SOURCE FORMAT. ADAPTED FROM FORMSG.MDL */ /* VERSION 1-016. SBL 22-APR-1981 */ /* 2-002 - ADD UNFIO_FMT, FMTIO_UNF, DIRIO_KEY, SEQIO_DIR, KEYIO_DIR, */ /* IO_NONFOR, INVTXTREC, FLOUNDEXC. JAW 23-AUG-1981 */ /* 2-003 - CHANGE INVTXTREC TO INVTEXREC. JAW 24-AUG-1981 */ /* 2-004 - ADD INVTEX WHICH DOES NOT REQUIRE A RECORD NUMBER. THIS IS FOR INDEXED */ /* AND INTERNAL FILES THAT DO NOT HAVE A VALID RECORD NUMBER. DGP 21-DEC-1981 */ /* 2-005 - ADD .TITLE. SBL 28-AUG-1982 */ /* 2-006 - ADD OPEREQDIS AND OPEREQSEQ. SBL 2-JUN-1983 */ /* 2-007 - ADD ULTRIX SPECIFIC ERRORS AND WARNINGS. */ /* 2-008 - ADD INVMATKEY. DJM 14-SEP-1987. */ /* 2-009 - ADD FORRTL2 MESSAGES. CHH 22-SEP-1987 */ /* X-4 STEVE LIONEL 16-OCT-1989 */ /* ADD SUBPRCDEL,UNAWAKSUB. */ /* X-5 */ /* A LONG TIME AGO, IN A GALAXY FAR, FAR AWAY ... */ /* X-6 SBL1001 22-OCT-1991 STEVE LIONEL */ /* ADD FOR$_VECALIGNEXC */ /* X-7 EBF1002 08-OCT-1992 ED FLECCHIA */ /* ADDED DEC FORTRAN MESSAGES FOR OTHER PLATFORMS. */ /* X-8 ADD FOR$_ENDRECDUR, END OF RECORD DURING READ. CHANGE IDENT TO VM.N-O */ /* SYNTAX. BRR 10-NOV-1993. */ /* X-9 ADD MISSING ALPHA GENTRAP MESSAGES. TCM 02-JUN-94. */ /* X-10 ADD INVREALLOC. JDR 11-JUL-1994. */ /* X-11 ADD RESACQFAI. JDR 23-NOV-1994. */ /* X-12 ADD INVDEALLOC. TCM 13-MAR-1995. */ /* X-13 MAKE MESSAGE ENDRECDUR, END OF RECORD DURING READ FATAL INSTEAD */ /* ERROR, LIKE THE OTHER OPERATING SYSTEMS. THE STANDARD SAYS FATAL, AND */ /* THIS SHOULD FIX BUG DFB2234. TCM 24-MAR-1995 */ /* X-14 ADD POINTERS TO THE MESSAGE TEXT FOR INVDEALLOC. TCM 19-JUN-1995. */ /* X-15 FIX THE MESSAGE TEXT OF ERROR 69 (SIGINT) */ /* INTERRUPT WAS SPELLED WRONG, MISSING AN R. TCM 29-MAR-1996 */ /* X-16 ADD PRELIMINARY VISUAL FORTRAN SUPPORT. */ /* THUS, ADDING ALL OF THE MSF ERROR MESSAGES. */ /* NOTE: THESE MESSAGES MUST BE CONTIGUOUS, SO */ /* THAT THE MAPPING OF MSF ERRORS TO VISUAL */ /* FORTRAN CAN BE DONE WITH EASE. TCM 26-APR-1996 */ /* X-17 FIX THE MESSAGE TEXT OF MSF ERRORS 6970, 6971. */ /* IT SHOULD BE D FIELD NOT M FIELD, ETC. ALSO */ /* FIX F6750-52, REMOVE UNIX IN THE TEXT. TCM 07-NOV-1996 */ /* X-18 ADD INVDEALLOC2. WCH 15-JUL-1999. */ /* X-19 CHANGE PRODUCT NAME FROM DEC TO COMPAQ PMK 8-NOV-1999 */ /* X-20 REPLACE DEC WITH COMPAQ IN RESACQFAI MESSAGE. PMK 9-NOV-1999 */ /* X-21 ADD SHORTDATEARG, SHORTTIMEARG, & SHORTZONEARG. PMK 31-JUL-2000 */ /* X-22 ADD COUNTING FLTING INEXACTS. WCH 10-AUG-2000. */ /* X-23 ADD NEW ERRORS FOR COMPILER GENERATED RUNTIME MESSAGES. WCH 16-AUG-2000. */ /* X-24 ADD A GENERIC DIVIDE BY ZERO MESSAGE FOR CASES WHEN WE CANNOT TELL IF */ /* IT WAS A TRUE FLOATING POINT DIV0 OR AN INTEGER DIV0. AS OF GEM BL46, */ /* GEM SOMETIMES DOES INTEGER DIV IN THE FP UNIT ON ALPHA. WCH 06-OCT-2000. */ /* X-25 ADD A NEW MESSAGE FOR ATTEMPTED ARRAY ALLOCATIONS THAT OVERFLOW MAX */ /* ARRAY SIZE (32/64 BITS). WCH 13-OCT-2000. */ /*-- */ /*+ */ /* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */ /* */ /* FOR$_ABCMNOXYZ */ /* */ /* IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */ /* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR */ /* MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS. */ /* */ /* THE NAMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD APPEAR */ /* IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION. */ /* */ /* MACRO-32 PROGRAMMING: */ /* */ /* THE MACROS CALL: */ /* */ /* $FORDEF */ /* */ /* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */ /* THE STS$V_MSG_ID IS THE FORTRAN ERROR NUMBER (1:94). */ /* THESE SYMBOLS ARE DECLARED EXTERNAL BY THE RUN-TIME LIBRARY, */ /* THE MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER. */ /*- */ /* ; MAKE ALL ERRORS BE SEVERE (EXCEPT AS NOTED) */ /* ; SET SUB-SYSTEM SPECIFIC BIT AND MAKE SEVERE */ /* ; SET LH TO 24 (DECIMAL). */ #define FOR$_FACILITY 24 #define FOR$_NOTFORSPE 1605644 /* ; NEVER SIGNALED. USED ONLY AS A FORTRAN ERROR */ /* ; NUMBER FOR ERRSNS TO MEAN SOME OTHER FACILITY */ /* ; THAN FOR$ OR MTH$ DETECTED THE ERROR. */ #define FOR$_NOTIMP 1605652 #define FOR$_IGNORED 1605656 #define FOR$_IGNNOTDEL 1605664 #define FOR$_VERSION 1605683 #define FOR$_BUG_CHECK 1605700 #define FOR$_PERACCFIL 1605708 #define FOR$_CANOVEEXI 1605716 #define FOR$_UNINOTCON 1605723 #define FOR$_SYNERRNAM 1605772 #define FOR$_TOOMANVAL 1605780 #define FOR$_INVREFVAR 1605788 #define FOR$_REWERR 1605796 #define FOR$_DUPFILSPE 1605804 #define FOR$_INPRECTOO 1605812 #define FOR$_BACERR 1605820 #define FOR$_ENDDURREA 1605828 #define FOR$_RECNUMOUT 1605836 #define FOR$_OPEDEFREQ 1605844 #define FOR$_TOOMANREC 1605852 #define FOR$_CLOERR 1605860 #define FOR$_FILNOTFOU 1605868 #define FOR$_OPEFAI 1605876 #define FOR$_MIXFILACC 1605884 #define FOR$_INVLOGUNI 1605892 #define FOR$_ENDFILERR 1605900 #define FOR$_UNIALROPE 1605908 #define FOR$_SEGRECFOR 1605916 #define FOR$_ATTACCNON 1605924 #define FOR$_INCRECLEN 1605932 #define FOR$_ERRDURWRI 1605940 #define FOR$_ERRDURREA 1605948 #define FOR$_RECIO_OPE 1605956 #define FOR$_INSVIRMEM 1605964 #define FOR$_NO_SUCDEV 1605972 #define FOR$_FILNAMSPE 1605980 #define FOR$_INCRECTYP 1605988 #define FOR$_KEYVALERR 1605996 #define FOR$_INCOPECLO 1606004 #define FOR$_WRIREAFIL 1606012 #define FOR$_INVARGFOR 1606020 #define FOR$_INVKEYSPE 1606028 #define FOR$_INCKEYCHG 1606036 #define FOR$_INCFILORG 1606044 #define FOR$_SPERECLOC 1606052 #define FOR$_NO_CURREC 1606060 #define FOR$_REWRITERR 1606068 #define FOR$_DELERR 1606076 #define FOR$_UNLERR 1606084 #define FOR$_FINERR 1606092 #define FOR$_MORONEREC 1605852 #define FOR$_ATTREANON 1605924 #define FOR$_FMTSYN 1606099 #define FOR$_LISIO_SYN 1606108 #define FOR$_INFFORLOO 1606116 #define FOR$_FORVARMIS 1606124 #define FOR$_SYNERRFOR 1606132 #define FOR$_OUTCONERR 1606138 #define FOR$_INPCONERR 1606148 #define FOR$_FLTINV 1606156 #define FOR$_OUTSTAOVE 1606164 #define FOR$_INPSTAREQ 1606172 #define FOR$_VFEVALERR 1606180 #define FOR$_SIGINT 1606186 #define FOR$_INTOVF 1606196 #define FOR$_INTDIV 1606204 #define FOR$_FLTOVF 1606210 #define FOR$_FLTDIV 1606218 #define FOR$_FLTUND 1606226 #define FOR$_SIGFPE 1606234 #define FOR$_SIGIOT 1606242 #define FOR$_SUBRNG 1606252 #define FOR$_SIGTERM 1606258 #define FOR$_SIGQUIT 1606266 #define FOR$_WRONUMARG 1606276 #define FOR$_INVARGMAT 1606284 #define FOR$_UNDEXP 1606292 #define FOR$_LOGZERNEG 1606300 #define FOR$_SQUROONEG 1606308 #define FOR$_SIGLOSMAT 1606332 #define FOR$_FLOOVEMAT 1606340 #define FOR$_FLOUNDMAT 1606346 #define FOR$_ADJARRDIM 1606380 #define FOR$_INVMATKEY 1606388 #define FOR$_FLOCONFAI 1606394 #define FOR$_CANSTAFIL 1606500 #define FOR$_OPEREQSEE 1606596 #define FOR$_BRK_USERBP 1606676 #define FOR$_BRK_KERNELBP 1606684 #define FOR$_BRK_BD_TAKEN 1606700 #define FOR$_BRK_BD_NOTTAKEN 1606708 #define FOR$_BRK_SSTEPBP 1606716 #define FOR$_BRK_OVERFLOW 1606724 #define FOR$_BRK_DIVZERO 1606732 #define FOR$_BRK_RANGE 1606740 #define FOR$_BRK_RANGE2 1606748 /* ********** */ /* [X-9] THE FOLLOWING ERRORS REFER TO GENTRAP EXCEPTIONS OR SIGNALS */ /* AND ARE NOT RETURNED BY IOSTAT. */ #define FOR$_FLTINE 1606756 #define FOR$_DECOVF 1606764 #define FOR$_DECDIV 1606772 #define FOR$_DECINV 1606780 #define FOR$_ROPRAND 1606788 #define FOR$_ASSERTERR 1606796 #define FOR$_NULPTRERR 1606804 #define FOR$_STKOVF 1606812 #define FOR$_STRLENERR 1606820 #define FOR$_SUBSTRERR 1606828 #define FOR$_RANGEERR 1606836 /* ********** */ /* [X-10] THE FOLLOWING MESSAGE IS FOR FORTRAN 90'S ALLOCATABLE ARRAYS */ #define FOR$_INVREALLOC 1606844 /* ********** */ /* [X-11] */ #define FOR$_RESACQFAI 1606852 /* ********** */ /* [X-12] THE FOLLOWING MESSAGE IS FOR FORTRAN 90'S ALLOCATABLE ARRAYS */ /* [X-14] THE COMPILER MAY NOW CAUSE THIS MESSAGE TO BE GENERATED FOR POINTERS. */ #define FOR$_INVDEALLOC 1606860 /* ********** */ /* [X-18] THE COMPILER MAY NOW CAUSE THIS MESSAGE TO BE GENERATED FOR POINTERS. */ #define FOR$_INVDEALLOC2 1607020 /* ********** */ /* [X-21] NEW ERRORS GENERATED FOR ARGUMENT LENGTHS SHORTER THAN STANDARD SPECIFIES FOR */ /* INTRINSIC DATE_AND_TIME. */ /* [X-24] NEW ERROR FOR GENERIC DIVIDE BY ZERO. */ /* [X-25] NEW ERROR FOR ARRAY ALLOCATION SIZE OVERFLOW. */ #define FOR$_SHORTDATEARG 1607036 #define FOR$_SHORTTIMEARG 1607044 #define FOR$_SHORTZONEARG 1607052 #define FOR$_DIV 1607060 #define FOR$_ARRSIZEOVF 1607068 /* ********** */ /* THE FOLLOWING MESSAGES ARE SECONDARY MESSAGES, OR ARE USED ONLY IN */ /* EXIT HANDLERS, AND THEREFORE DO NOT NEED TO BE (AND SHOULD NOT BE) */ /* CONTIGUOUS WITH THE MESSAGES ABOVE. */ /* THE NEXT SIX MESSAGES ARE SECONDARY MESSAGES FOR USE WITH MIXFILACC IN */ /* FOR$$IO_BEG AND FOR$$CB. */ #define FOR$_UNFIO_FMT 1607684 #define FOR$_FMTIO_UNF 1607692 #define FOR$_DIRIO_KEY 1607700 #define FOR$_SEQIO_DIR 1607708 #define FOR$_KEYIO_DIR 1607716 #define FOR$_IO_NONFOR 1607724 /* THE NEXT TWO MESSAGES ARE SECONDARY MESSAGES FOR USE WITH INPCONERR IN */ /* FOR$$UDF_WF AND FOR$$UDF_WL. */ #define FOR$_INVTEXREC 1607732 #define FOR$_INVTEX 1607740 /* ADDITIONAL SECONDARY MESSAGES */ #define FOR$_OPEREQDIS 1607748 #define FOR$_OPEREQSEQ 1607756 #define FOR$_PROABOUSE 1607762 #define FOR$_FLOCONFAIU 1607770 /* ********** */ /* [X-13] THE FOLLOWING MESSAGE IS A FATAL MESSAGE ACCORDING TO THE F90 STANDARD */ #define FOR$_ENDRECDUR 1607780 /* THESE NEXT 4 MESSAGES ARE USED IN THE EXIT HANDLER WHICH IS DECLARED BY FOR$HANDLER. */ #define FOR$_FLOINEEXC 1608003 #define FOR$_FLOINVEXC 1608011 #define FOR$_FLOOVFEXC 1608019 #define FOR$_FLODIV0EXC 1608027 #define FOR$_FLOUNDEXC 1608035 #define FOR$_VECALIGNEXC 1608043 /* END OF SPECIAL MESSAGES */ /* ********** */ /* ********** */ /* RESERVE A NUMBER FOR A MESSAGE TO REPORT COMPILED CODE GENERATED */ /* RUNTIME ERRORS. */ #define FOR$_MSGBUFOVF 1608828 #define FOR$_DIAGNOSTIC 1608836 /* ********** */ /* THE FOLLOWING MESSAGES ARE MESSAGES ISSUED FROM FORRTL2, THE */ /* VAX FORTRAN V5.0 PARALLEL PROCESSING RTL SUPPORT. */ /* */ #define FOR$_FATINTERR 1609732 #define FOR$_SUBPRCDIED 1609740 #define FOR$_NOTIMPRET 1609748 #define FOR$_FAIOWNERID 1609756 #define FOR$_FAIPRCID 1609764 #define FOR$_FAIPRCNAME 1609772 #define FOR$_FAIACTCPU 1609780 #define FOR$_FAIIDPRC 1609788 #define FOR$_FAIIMAGNAME 1609796 #define FOR$_FAIDCLEXIT 1609804 #define FOR$_FAISUBPRC 1609812 #define FOR$_INVNUMPRC 1609820 #define FOR$_MEMSHRERR 1609828 #define FOR$_LOCALSHRERR 1609836 #define FOR$_LOCALACCESS 1609844 #define FOR$_INVLCLADR 1609852 #define FOR$_COMSHRERR 1609860 #define FOR$_INVCOMADR 1609868 #define FOR$_PARINITERR 1609876 #define FOR$_STACKSHRERR 1609884 #define FOR$_FAISHRSTACK 1609892 #define FOR$_INVUNWIND 1609900 #define FOR$_STKBUFOVR 1609908 #define FOR$_SUBPRCDEL 1609916 #define FOR$_ASSERTFAIL 1609924 /* ********** */ /* THE FOLLOWING MESSAGES ARE MESSAGES ISSUED FROM MICORSOFT FORTRAN AND NOW */ /* VISUAL FORTRAN. */ /* */ /* [X-16] THE FOLLOWING ERRORS REFER TO MSF ERROR MESSAGES. */ /* THESE MESSAGES MUST REMAIN IN CONTIGUOUS ORDER SO THAT AN */ /* OFFSET INTO A MAPPING ARRAY CAN BE COMPUTED FROM THE MESSAGE */ /* BASE NUMBER, WHICH IS 540 FOR MSF MESSAGES. THAT WAY VISUAL */ /* FORTRAN CAN RETURN IOSTAT NUMBERS SIMILAR TO MSF. ALSO */ /* WE PUT THESE MESSAGES THIS FAR DOWN TO KEEP IN SYNCH WITH */ /* THE VMS MESSAGE FILE. IT HAS CONTIGUOUS OPENINGS UP TO 768 */ /* IN THIS RANGE. THE NEXT CONTIGUOUS OPENING BEGINS FROM 1024. */ #define FOR$_F6096 1609956 #define FOR$_F6097 1609964 #define FOR$_F6098 1609972 #define FOR$_F6099 1609980 #define FOR$_F6100 1609988 #define FOR$_F6101 1609996 #define FOR$_F6102 1610004 #define FOR$_F6103 1610012 #define FOR$_F6104 1610020 #define FOR$_F6105 1610028 #define FOR$_F6106 1610036 #define FOR$_F6200 1610044 #define FOR$_F6201 1610052 #define FOR$_F6202 1610060 #define FOR$_F6203 1610068 #define FOR$_F6204 1610076 #define FOR$_F6205 1610084 #define FOR$_F6206 1610092 #define FOR$_F6207 1610100 #define FOR$_F6208 1610108 #define FOR$_F6209 1610116 #define FOR$_F6210 1610124 #define FOR$_F6211 1610132 #define FOR$_F6212 1610140 #define FOR$_F6213 1610148 #define FOR$_F6214 1610156 #define FOR$_F6300 1610164 #define FOR$_F6301 1610172 #define FOR$_F6302 1610180 #define FOR$_F6303 1610188 #define FOR$_F6304 1610196 #define FOR$_F6305 1610204 #define FOR$_F6306 1610212 #define FOR$_F6307 1610220 #define FOR$_F6308 1610228 #define FOR$_F6309 1610236 #define FOR$_F6310 1610244 #define FOR$_F6311 1610252 #define FOR$_F6312 1610260 #define FOR$_F6313 1610268 #define FOR$_F6314 1610276 #define FOR$_F6315 1610284 #define FOR$_F6316 1610292 #define FOR$_F6317 1610300 #define FOR$_F6318 1610308 #define FOR$_F6319 1610316 #define FOR$_F6400 1610324 #define FOR$_F6401 1610332 #define FOR$_F6402 1610340 #define FOR$_F6403 1610348 #define FOR$_F6404 1610356 #define FOR$_F6405 1610364 #define FOR$_F6406 1610372 #define FOR$_F6407 1610380 #define FOR$_F6408 1610388 #define FOR$_F6409 1610396 #define FOR$_F6410 1610404 #define FOR$_F6411 1610412 #define FOR$_F6412 1610420 #define FOR$_F6413 1610428 #define FOR$_F6414 1610436 #define FOR$_F6415 1610444 #define FOR$_F6416 1610452 #define FOR$_F6417 1610460 #define FOR$_F6418 1610468 #define FOR$_F6419 1610476 #define FOR$_F6420 1610484 #define FOR$_F6421 1610492 #define FOR$_F6422 1610500 #define FOR$_F6423 1610508 #define FOR$_F6424 1610516 #define FOR$_F6425 1610524 #define FOR$_F6500 1610532 #define FOR$_F6501 1610540 #define FOR$_F6502 1610548 #define FOR$_F6503 1610556 #define FOR$_F6504 1610564 #define FOR$_F6505 1610572 #define FOR$_F6506 1610580 #define FOR$_F6507 1610588 #define FOR$_F6508 1610596 #define FOR$_F6509 1610604 #define FOR$_F6510 1610612 #define FOR$_F6511 1610620 #define FOR$_F6512 1610628 #define FOR$_F6513 1610636 #define FOR$_F6514 1610644 #define FOR$_F6515 1610652 #define FOR$_F6516 1610660 #define FOR$_F6600 1610668 #define FOR$_F6601 1610676 #define FOR$_F6602 1610684 #define FOR$_F6700 1610692 #define FOR$_F6701 1610700 #define FOR$_F6970 1610708 #define FOR$_F6971 1610716 #define FOR$_F6972 1610724 #define FOR$_F6980 1610732 #define FOR$_F6981 1610740 #define FOR$_F6982 1610748 #define FOR$_F6983 1610756 #define FOR$_F6984 1610764 #define FOR$_F6985 1610772 #define FOR$_F6986 1610780 #define FOR$_F6987 1610788 #define FOR$_F6988 1610796 #define FOR$_F6989 1610804 #define FOR$_F6990 1610812 #define FOR$_F6991 1610820 #define FOR$_F6992 1610828 #define FOR$_F6993 1610836 #define FOR$_F6994 1610844 #define FOR$_F6995 1610852 #define FOR$_F6996 1610860 #define FOR$_F6997 1610868 #define FOR$_F6998 1610876 #define FOR$_F6999 1610884 #define FOR$_F6702 1610892 #define FOR$_F6703 1610900 #define FOR$_F6704 1610908 #define FOR$_F6705 1610916 #define FOR$_F6706 1610924 #define FOR$_F6707 1610932 #define FOR$_F6708 1610940 #define FOR$_F6709 1610948 #define FOR$_F6710 1610956 #define FOR$_F6711 1610964 #define FOR$_F6712 1610972 #define FOR$_F6713 1610980 #define FOR$_F6714 1610988 #define FOR$_F6715 1610996 #define FOR$_F6716 1611004 #define FOR$_F6717 1611012 #define FOR$_F6718 1611020 #define FOR$_F6719 1611028 #define FOR$_F6720 1611036 #define FOR$_F6721 1611044 #define FOR$_F6722 1611052 #define FOR$_F6723 1611060 #define FOR$_F6724 1611068 #define FOR$_F6725 1611076 #define FOR$_F6726 1611084 #define FOR$_F6727 1611092 #define FOR$_F6728 1611100 #define FOR$_F6729 1611108 #define FOR$_F6730 1611116 #define FOR$_F6731 1611124 #define FOR$_F6732 1611132 #define FOR$_F6733 1611140 #define FOR$_F6734 1611148 #define FOR$_F6735 1611156 #define FOR$_F6736 1611164 #define FOR$_F6737 1611172 #define FOR$_F6738 1611180 #define FOR$_F6739 1611188 #define FOR$_F6740 1611196 #define FOR$_F6741 1611204 #define FOR$_F6742 1611212 #define FOR$_F6743 1611220 #define FOR$_F6744 1611228 #define FOR$_F6745 1611236 #define FOR$_F6746 1611244 #define FOR$_F6747 1611252 #define FOR$_F6748 1611260 #define FOR$_F6749 1611268 #define FOR$_F6750 1611276 #define FOR$_F6751 1611284 #define FOR$_F6752 1611292 #define FOR$_F6753 1611300 #define FOR$_F6754 1611308 #define FOR$_F6755 1611316 #define FOR$_F6756 1611324 #define FOR$_F6757 1611332 #define FOR$_F6758 1611340 #define FOR$_F6759 1611348 #define FOR$_F6760 1611356 #define FOR$_F6761 1611364 #define FOR$_F6762 1611372 #define FOR$_F6763 1611380 #define FOR$_F6764 1611388 #define FOR$_F6765 1611396 #define FOR$_F6766 1611404 #define FOR$_F6767 1611412 #define FOR$_F6768 1611420 #define FOR$_F6769 1611428 #define FOR$_F6770 1611436 #define FOR$_F6771 1611444 #define FOR$_F6772 1611452 #define FOR$_F6773 1611460 #define FOR$_F6774 1611468 #define FOR$_F6775 1611476 #define FOR$_F6776 1611484 #define FOR$_F6777 1611492 #define FOR$_F6778 1611500 #define FOR$_F6779 1611508 #define FOR$_F6780 1611516 #define FOR$_F6781 1611524 #define FOR$_F6782 1611532 #define FOR$_F6783 1611540 #define FOR$_F6784 1611548 #define FOR$_F6785 1611556 #define FOR$_F6786 1611564 #define FOR$_F6787 1611572 #define FOR$_F6788 1611580 #define FOR$_F6789 1611588 #define FOR$_F6790 1611596 #define FOR$_F6791 1611604 #define FOR$_F6792 1611612 #define FOR$_F6793 1611620 #define FOR$_F6794 1611628 #define FOR$_F6795 1611636 #define FOR$_F6796 1611644 #define FOR$_F6797 1611652 #define FOR$_F6798 1611660 #define FOR$_F6799 1611668 #define FOR$_F6800 1611676 #define FOR$_F6801 1611684 #define FOR$_F6802 1611692 #define FOR$_F6803 1611700 #define FOR$_F6804 1611708 /* END OF SPECIAL MISCROSOFT ERROR MESSAGES */ /* ********** */ #define FOR$_INVLOGNAM 1611778 #define FOR$_TOOMANPRC 1611786 #define FOR$_INVDSTRSIZE 1611794 #define FOR$_DEFVALUSED 1615875 #define FOR$_UNIPROCESS 1615883 #define FOR$_NOPARINIT 1615891 #define FOR$_NOTRUNINPP 1615899 #define FOR$_NESTPPLOOP 1615907 #define FOR$_UNAWAKSUB 1615915 /* END OF FORRTL2 MESSAGES */ /* ********** */ #pragma __member_alignment __restore #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */ #endif #ifdef __cplusplus } #endif #pragma __standard #endif /* __FORDEF_LOADED */