errmsgi.rc

来自「开放源码的编译器open watcom 1.6.0版的源代码」· RC 代码 · 共 443 行 · 第 1/3 页

#include "errcod.h"

stringtable begin

    AR_BAD_COUNT+MSG_LANG_BASE "invalid number of arguments to intrinsic function %s1"
    AR_DUPLICATE_PARM+MSG_LANG_BASE "dummy argument %s1 appears more than once"
    AR_ENTRY_TOO_LATE+MSG_LANG_BASE "dummy argument %s1 must not appear before definition of ENTRY %s2"
    BD_BLKDAT_NOT_COMMON+MSG_LANG_BASE "%s1 was initialized in a block data subprogram but is not in COMMON"
    BD_IN_BLOCK_DATA+MSG_LANG_BASE "%s1 statement is not permitted in a BLOCK DATA subprogram"
    CC_BAD_CHAR+MSG_LANG_BASE "invalid character encountered in source input"
    CC_NOT_DIGITS+MSG_LANG_BASE "invalid character in statement number columns"
    CC_NOT_INITIAL+MSG_LANG_BASE "character in continuation column, but no statement to continue"
    CC_SET_EXTEND+MSG_LANG_BASE "character encountered is not FORTRAN 77 standard"
    CC_STMTNO_ON_CONT+MSG_LANG_BASE "columns 1-5 in a continuation line must be blank"
    CC_TOO_MANY_CONT+MSG_LANG_BASE "more than 19 continuation lines is not FORTRAN 77 standard"
    CC_EOL_COMMENT+MSG_LANG_BASE "end-of-line comment is not FORTRAN 77 standard"
    CC_D_IN_COLUMN_1+MSG_LANG_BASE "D in column 1 is not FORTRAN 77 standard"
    CC_CONT_OVERFLOW+MSG_LANG_BASE "too many continuation lines"
    CM_ALREADY_IN_COM+MSG_LANG_BASE "%s1 already in COMMON"
    CM_COMMON+MSG_LANG_BASE "initializing %s1 in COMMON outside of block data subprogram is not FORTRAN 77 standard"
    CM_MIXED_COMMON+MSG_LANG_BASE "character and non-character data in COMMON is not FORTRAN 77 standard"
    CM_NAMED_DIFF_SIZE+MSG_LANG_BASE "COMMON block %s1 has been defined with a different size"
    CM_BLKDATA_ALREADY+MSG_LANG_BASE "named COMMON block %s1 appears in more than one BLOCK DATA subprogram"
    CM_BLANK_DIFF_SIZE+MSG_LANG_BASE "blank COMMON block has been defined with a different size"
    CN_DOUBLE_COMPLEX+MSG_LANG_BASE "DOUBLE PRECISION COMPLEX constants are not FORTRAN 77 standard"
    CN_FLOAT+MSG_LANG_BASE "invalid floating-point constant %s1"
    CN_ZERO_LEN+MSG_LANG_BASE "zero length character constants are not allowed"
    CN_BAD_HEX_OCT+MSG_LANG_BASE "invalid hexadecimal/octal constant"
    CN_HEX_OCT+MSG_LANG_BASE "hexadecimal/octal constant is not FORTRAN 77 standard"
    CO_ALREADY_OPEN+MSG_LANG_BASE "%s1 is already being included"
    CO_BAD_NO+MSG_LANG_BASE "'%s1' option cannot take a NO prefix"
    CO_NEED_EQUALS+MSG_LANG_BASE "expecting an equals sign following the %s1 option"
    CO_WANT_NUMBER+MSG_LANG_BASE "the '%s1' option requires a number"
    CO_NOT_RECOG+MSG_LANG_BASE "option '%s1' not recognized - ignored"
    CO_NOT_IN_SOURCE+MSG_LANG_BASE "'%s1' option not allowed in source input stream"
    CO_MACRO_NESTING_EXCEEDED+MSG_LANG_BASE "nesting level exceeded for compiler directives"
    CO_MACRO_STRUCTURE_MISMATCH+MSG_LANG_BASE "mismatching compiler directives"
    CP_BAD_PARM_REGISTER+MSG_LANG_BASE "argument %d1 incompatible with register"
    CP_BAD_RETURN_REGISTER+MSG_LANG_BASE "subprogram %s1 has invalid return register"
    CP_LOW_ON_MEMORY+MSG_LANG_BASE "low on memory - unable to fully optimize %s1"
    CP_BACK_END_ERROR+MSG_LANG_BASE "internal compiler error %d1"
    CP_BAD_SAVE+MSG_LANG_BASE "illegal register modified by %s1"
    CP_ERROR+MSG_LANG_BASE "%s1"
    CP_FATAL_ERROR+MSG_LANG_BASE "fatal: %s1"
    CP_MEMORY_NOT_FREED+MSG_LANG_BASE "dynamic memory not freed"
    CP_FREEING_UNOWNED_MEMORY+MSG_LANG_BASE "freeing unowned dynamic memory"
    CP_AUTO_EQUIV_TOO_LARGE+MSG_LANG_BASE "The automatic equivalence containing %s1 exceeds 32K limit"
    CP_AUTO_RET_TOO_LARGE+MSG_LANG_BASE "The return value of %s1 exceeds 32K limit"
    CP_AUTO_VAR_TOO_LARGE+MSG_LANG_BASE "The automatic variable %s1 exceeds 32K limit"
    CV_BAD_LEN+MSG_LANG_BASE "CHARACTER variable %s1 with length (*) not allowed in this expression"
    CV_CHARSTAR_ILLEGAL+MSG_LANG_BASE "character variable %s1 with length (*) must be a subprogram argument"
    DA_BAD_DO_VAR+MSG_LANG_BASE "implied DO variable %s1 must be an integer variable"
    DA_BAD_RPT_SPEC+MSG_LANG_BASE "repeat specification must be a positive integer"
    DA_BAD_VAR_IN_EXPR+MSG_LANG_BASE "%s1 appears in an expression but is not an implied DO variable"
    DA_BLANK_INIT+MSG_LANG_BASE "%s1 in blank COMMON block cannot be initialized"
    DA_HEX_CONST+MSG_LANG_BASE "data initialization with hexadecimal constant is not FORTRAN 77 standard"
    DA_ILL_NAME+MSG_LANG_BASE "cannot initialize %s1 %s2"
    DA_IN_TYPE_STMT+MSG_LANG_BASE "data initialization in %s1 statement is not FORTRAN 77 standard"
    DA_NOT_ENOUGH+MSG_LANG_BASE "not enough constants for list of variables"
    DA_TOO_MUCH+MSG_LANG_BASE "too many constants for list of variables"
    DA_TYPE_MISMATCH+MSG_LANG_BASE "cannot initialize %s1 variable %s2 with %s3 constant"
    DM_SYM_PARM+MSG_LANG_BASE "using %s1 incorrectly in dimension expression"
    DO_BACKWARDS_DO+MSG_LANG_BASE "statement number %i1 already defined in line %d2 - DO loop is backwards"
    DO_ENDING_BAD+MSG_LANG_BASE "%s1 statement not allowed at termination of DO range"
    DO_NESTING_BAD+MSG_LANG_BASE "improper nesting of DO loop"
    DO_BAD_ENDDO+MSG_LANG_BASE "ENDDO cannot terminate DO loop with statement label"
    DO_DO_EXT+MSG_LANG_BASE "this DO loop form is not FORTRAN 77 standard"
    DO_NO_COMMA_OR_VAR+MSG_LANG_BASE "expecting comma or DO variable"
    DO_PARM_REDEFINED+MSG_LANG_BASE "DO variable cannot be redefined while DO loop is active"
    EC_PAST_BEG+MSG_LANG_BASE "equivalencing %s1 has caused extension of COMMON block %s2 to the left"
    EC_2NAM_EC+MSG_LANG_BASE "%s1 and %s2 in COMMON are equivalenced to each other"
    EN_NO_END+MSG_LANG_BASE "missing END statement"
    EQ_BAD_TARGET+MSG_LANG_BASE "target of assignment is illegal"
    EQ_CANNOT_ASSIGN+MSG_LANG_BASE "cannot assign value to %s1"
    EQ_ILL_EQ_SIGN+MSG_LANG_BASE "illegal use of equal sign"
    EQ_MULT_ASSGN+MSG_LANG_BASE "multiple assignment is not FORTRAN 77 standard"
    EQ_NO_EQUALS+MSG_LANG_BASE "expecting equals sign"
    EV_DIFF_REL_POS+MSG_LANG_BASE "%s1 has been equivalenced to 2 different relative positions"
    EV_EQUIV_LIST+MSG_LANG_BASE "EQUIVALENCE list must contain at least 2 names"
    EV_SSCR_INVALID+MSG_LANG_BASE "%s1 incorrectly subscripted in %s2 statement"
    EV_SSTR_INVALID+MSG_LANG_BASE "incorrect substring of %s1 in %s2 statement"
    EV_MIXED_EQUIV+MSG_LANG_BASE "equivalencing CHARACTER and non-CHARACTER data is not FORTRAN 77 standard"
    EV_ONLY_IF_CHAR+MSG_LANG_BASE "attempt to substring %s1 in EQUIVALENCE statement but type is %s2"
    EX_Z_2_NOT_POS+MSG_LANG_BASE "zero**J where J <= 0 is not allowed"
    EY_TYPE_MISMATCH+MSG_LANG_BASE "type of entry %s1 does not match type of function %s2"
    EY_NOT_IN_CS+MSG_LANG_BASE "ENTRY statement not allowed within structured control blocks"
    EY_SIZE_MISMATCH+MSG_LANG_BASE "size of entry %s1 does not match size of function %s2"
    FM_ASSUME_COMMA+MSG_LANG_BASE "missing delimiter in format string, comma assumed"
    FM_CONST+MSG_LANG_BASE "missing or invalid constant"
    FM_D_EXT+MSG_LANG_BASE "Ew.dDe format code is not FORTRAN 77 standard"
    FM_DECIMAL+MSG_LANG_BASE "missing decimal point"
    FM_DELIM+MSG_LANG_BASE "missing or invalid edit descriptor in format string"
    FM_FMTCHAR+MSG_LANG_BASE "unrecognizable edit descriptor in format string"
    FM_INV_REP+MSG_LANG_BASE "invalid repeat specification"
    FM_M_EXT+MSG_LANG_BASE "$ or \ format code is not FORTRAN 77 standard"
    FM_MODIFIER+MSG_LANG_BASE "invalid field modifier"
    FM_NO_EOS+MSG_LANG_BASE "expecting end of FORMAT statement but found more text"
    FM_NO_REP+MSG_LANG_BASE "repeat specification not allowed for this format code"
    FM_NO_STMTNO+MSG_LANG_BASE "no statement number on FORMAT statement"
    FM_QUOTE+MSG_LANG_BASE "no closing quote on apostrophe edit descriptor"
    FM_SPEC_256+MSG_LANG_BASE "field count greater than 256 is invalid"
    FM_WIDTH+MSG_LANG_BASE "invalid field width specification"
    FM_Z_EXT+MSG_LANG_BASE "Z format code is not FORTRAN 77 standard"
    FM_ASSUME_CONST+MSG_LANG_BASE "missing constant before X edit descriptor, 1 assumed"
    FM_Q_EXT+MSG_LANG_BASE "Ew.dQe format code is not FORTRAN 77 standard"
    FM_Q_FORMAT+MSG_LANG_BASE "Qw.d format code is not FORTRAN 77 standard"
    GO_ASSIGNED_BAD+MSG_LANG_BASE "%s1 statement label may not appear in ASSIGN statement but did in line %d2"
    GO_CANNOT_ASSIGN+MSG_LANG_BASE "ASSIGN of statement number %i1 in line %d2 not allowed"
    GO_NO_TO+MSG_LANG_BASE "expecting TO"
    HO_CONST+MSG_LANG_BASE "hollerith constant is not FORTRAN 77 standard"
    HO_CUT_OFF+MSG_LANG_BASE "not enough characters for hollerith constant"
    IF_ELSE_LAST+MSG_LANG_BASE "ELSE block must be the last block in block IF"
    IF_NO_THEN+MSG_LANG_BASE "expecting THEN"
    IL_BAD_FMT_SPEC+MSG_LANG_BASE "missing or invalid format/FMT specification"
    IL_BAD_INTL+MSG_LANG_BASE "the UNIT may not be an internal file for this statement"
    IL_BAD_LIST+MSG_LANG_BASE "%s1 statement cannot have %s2 specification"
    IL_BAD_SIZE+MSG_LANG_BASE "variable must have a size of 4"
    IL_CTRL_LIST+MSG_LANG_BASE "missing or unrecognizable control list item %s1"
    IL_DUP_LIST+MSG_LANG_BASE "attempt to specify control list item %s1 more than once"
    IL_EMPTY_IMP_DO+MSG_LANG_BASE "implied DO loop has no input/output list"
    IL_ILST+MSG_LANG_BASE "list-directed input/output with internal files is not FORTRAN 77 standard"
    IL_NO_ASTERISK+MSG_LANG_BASE "FORTRAN 77 standard requires an asterisk for list-directed formatting"
    IL_NO_UNIT_ID+MSG_LANG_BASE "missing or improper unit identification"
    IL_NO_FILE_OR_UNIT+MSG_LANG_BASE "missing unit identification or file specification"
    IL_STAR_NOT_ALLOWED+MSG_LANG_BASE "asterisk unit identifier not allowed in %s1 statement"
    IL_UNIT_AND_FILE+MSG_LANG_BASE "cannot have both UNIT and FILE specifier"
    IL_AINTL+MSG_LANG_BASE "internal files require sequential access"
    IL_END_REC+MSG_LANG_BASE "END specifier with REC specifier is not FORTRAN 77 standard"
    IL_SPECIFIER_NOT_STANDARD+MSG_LANG_BASE "%s1 specifier in i/o list is not FORTRAN 77 standard"
    IL_NO_IOLIST+MSG_LANG_BASE "i/o list is not allowed with NAMELIST-directed format"
    IL_NON_CHARACTER+MSG_LANG_BASE "non-character array as format specifier is not FORTRAN 77 standard"
    IM_ILLEGAL_RANGE+MSG_LANG_BASE "illegal range of characters"
    IM_PREV_IMPLICIT+MSG_LANG_BASE "letter can only be implicitly declared once"
    IM_UNRECOG_TYPE+MSG_LANG_BASE "unrecognizable type"
    IM_CHAR_STAR_STAR+MSG_LANG_BASE "(*) length specifier in an IMPLICIT statement is not FORTRAN 77 standard"
    IM_NONE_USED+MSG_LANG_BASE "IMPLICIT NONE allowed once or not allowed with other IMPLICIT statements"
    KO_FDIV_ZERO+MSG_LANG_BASE "floating-point divide by zero"
    KO_FOVERFLOW+MSG_LANG_BASE "floating-point overflow"
    KO_FUNDERFLOW+MSG_LANG_BASE "floating-point underflow"
    KO_IDIV_ZERO+MSG_LANG_BASE "integer divide by zero"
    KO_INTERRUPT+MSG_LANG_BASE "program interrupted from keyboard"
    KO_IOVERFLOW+MSG_LANG_BASE "integer overflow"
    LI_CHAR_BOUND+MSG_LANG_BASE "argument of CHAR must be in the range zero to 255"
    LI_2_CMPLX+MSG_LANG_BASE "%s1 intrinsic function cannot be passed 2 complex arguments"
    LI_CMPLX_TYPES+MSG_LANG_BASE "argument types must be the same for the %s1 intrinsic function"
    LI_EXP_CNV_TYPE+MSG_LANG_BASE "expecting numeric argument, but %s1 argument was found"
    LI_ILL_PARM_CODE+MSG_LANG_BASE "cannot pass %s1 as argument to intrinsic function"
    LI_NO_PARM+MSG_LANG_BASE "intrinsic function requires argument(s)"