errmsgr.c

来自「开放源码的编译器open watcom 1.6.0版的源代码」· C语言 代码 · 共 1,812 行 · 第 1/5 页

/* floating-point overflow  */
,2,118,177
/* floating-point underflow  */
,4,118,255,255,35
/* integer divide by zero  */
,4,65,226,112,105
/* program interrupted from keyboard  */
,6,102,255,197,119,255,200
/* integer overflow  */
,2,65,177
};
static const char __FAR Msg6400[] = {
 0
,0
,0
,0
/* argument of CHAR must be in the range zero to 255  */
,13,17,5,255,63,14,7,3,27,103,105,8,255,54
/* %s1 intrinsic function cannot be passed 2 complex arguments  */
,9,0,37,12,16,7,127,139,219,92
/* argument types must be the same for the %s1 intrinsic function  */
,13,17,255,28,14,7,27,255,20,35,27,0,37,12
/* expecting numeric argument, but %s1 argument was found  */
,9,10,255,223,210,45,0,17,62,98
,0
/* cannot pass %s1 as argument to intrinsic function  */
,8,16,178,0,44,17,8,37,12
/* intrinsic function requires argument(s)  */
,5,37,12,129,255,116
/* %s1 argument type is invalid for this generic function  */
,10,0,17,33,4,20,35,55,255,188,12
/* this intrinsic function cannot be passed as an argument  */
,9,55,37,12,16,7,127,44,15,17
/* expecting %s1 argument, but %s2 argument was found  */
,8,10,0,210,45,11,17,62,98
/* intrinsic function was assigned wrong type  */
,6,37,12,62,255,121,33
/* intrinsic function %s1 is not FORTRAN 77 standard  */
,6,37,12,0,4,1,6
/* argument to ALLOCATED intrinsic function must be an allocatable array or character*(*) variable  */
,15,17,8,255,62,37,12,14,7,15,208,38,13,255,138,21
/* invalid argument to ISIZEOF intrinsic function  */
,7,20,17,8,255,84,37,12
};
static const char __FAR Msg6656[] = {
/* relational operator has a logical operand  */
 8,255,247,60,24,9,170,255,226
/* mixing DOUBLE PRECISION and COMPLEX types is not FORTRAN 77 standard  */
,10,255,215,106,51,196,255,28,4,1,6
/* operator not expecting %s1 operands  */
,5,60,1,10,0,176
/* operator not expecting %s1 and %s2 operands  */
,7,60,1,10,0,51,11,176
/* complex quantities can only be compared using .EQ. or .NE.  */
,14,219,255,242,93,59,7,255,140,187,255,47,13,255,48
/* unary operator not expecting %s1 type  */
,8,255,255,33,60,1,10,0,33
/* logical operator with integer operands is not FORTRAN 77 standard  */
,8,170,60,28,65,176,4,1,6
/* logical operator %s1 is not FORTRAN 77 standard  */
,6,170,60,0,4,1,6
};
static const char __FAR Msg6912[] = {
/* %s1 exceeds compiler limit of %u2 bytes  */
 8,0,96,114,84,5,190,255,131
/* out of memory  */
,4,255,12,5,99
/* dynamic memory exhausted due to length of this statement - statement ignored  */
,13,116,99,255,166,159,8,47,5,55,2,56,2,246
};
static const char __FAR Msg7168[] = {
/* missing or misplaced closing parenthesis  */
 6,25,13,255,5,151,126
/* missing or misplaced opening parenthesis  */
,6,25,13,255,5,175,126
/* unexpected parenthesis  */
,2,184,126
/* unmatched parentheses  */
,3,255,255,39
};
static const char __FAR Msg7424[] = {
/* expecting symbolic name  */
 3,10,133,18
/* illegal size specified for VALUE attribute  */
,9,36,40,255,255,8,35,255,100,211
/* illegal argument attribute  */
,3,36,17,211
/* continuation line must contain a comment character in column 1  */
,10,94,30,14,153,9,218,23,3,152,138
/* expecting '%s1' near '%s2'  */
,4,10,78,255,221
/* in-line byte sequence limit exceeded  */
,5,164,214,180,84,161
/* illegal hexadecimal data in byte sequence  */
,6,36,241,63,3,214,180
/* symbol '%s1' in in-line assembly code cannot be resolved  */
,12,255,25,78,3,164,255,119,71,16,7,255,250
};
static const char __FAR Msg7680[] = {
/* alternate return specifier only allowed in subroutine  */
 8,255,112,130,61,59,19,3,132
/* RETURN statement in main program is not FORTRAN 77 standard  */
,8,205,2,3,171,102,4,1,6
};
static const char __FAR Msg7936[] = {
/* COMMON block %s1 saved but not properly defined  */
 10,22,29,0,255,21,45,1,255,241,52
/* COMMON block %s1 must be saved in every subprogram in which it appears  */
,16,22,29,0,14,7,255,21,3,255,165,50,3,255,255,44,69
/* name already appeared in a previous SAVE statement  */
,10,18,57,255,115,3,9,255,238,206,2
};
static const char __FAR Msg8192[] = {
/* statement function definition contains duplicate dummy arguments  */
 8,2,12,53,221,255,157,73,92
/* character length of statement function name must not be (*)  */
,10,23,47,5,2,12,18,14,1,7,89
/* statement function definition contains illegal dummy argument  */
,7,2,12,53,221,36,73,17
/* cannot pass %s1 %s2 to statement function  */
,7,16,178,0,11,8,2,12
/* %s1 actual argument was passed to %s2 dummy argument  */
,10,0,255,106,17,62,127,8,11,73,17
/* incorrect number of arguments passed to statement function %s1  */
,9,249,26,5,92,127,8,2,12,0
/* type of statement function name must not be a user-defined structure  */
,13,33,5,2,12,18,14,1,7,9,255,255,41,32
};
static const char __FAR Msg8448[] = {
/* system file error reading %s1 - %s2  */
 9,255,26,31,81,255,243,0,56,11
/* error opening file %s1 - %s2  */
,6,81,175,31,0,56,11
/* system file error writing %s1 - %s2  */
,10,255,26,31,81,255,255,49,0,56,11
,0
,0
/* error opening %s1 - too many temporary files exist  */
,12,81,175,0,56,104,172,255,255,24,97,255,167
/* generation of browsing information failed  */
,8,255,187,5,255,130,83,255,172
};
static const char __FAR Msg8704[] = {
/* cannot have both ATEND and the END= specifier  */
 9,16,120,148,194,51,27,255,73,61
/* ATEND must immediately follow a READ statement  */
,8,194,14,247,239,9,255,94,2
/* block label must be a symbolic name  */
,7,29,168,14,7,9,133,18
/* could not find a structure to %s1 from  */
,9,222,1,255,175,9,32,8,0,119
/* REMOTE BLOCK is not allowed in the range of any control structure  */
,13,91,67,4,1,19,3,27,103,5,255,113,72,32
/* the SELECT statement must be followed immediately by a CASE statement  */
,13,27,255,96,2,14,7,255,176,247,112,9,195,2
/* cases are overlapping  */
,5,255,136,80,255,231
/* select structure requires at least one CASE statement  */
,10,255,255,3,32,129,70,169,125,195,2
/* cannot branch to %i1 from outside control structure in line %d2  */
,12,16,58,8,42,119,255,13,72,32,3,30,41
/* cannot branch to %i1 inside structure on line %d2  */
,10,16,58,8,42,255,195,32,85,30,41
/* low end of range exceeds the high end  */
,10,255,4,74,5,103,96,27,255,189,74
/* default case block must follow all case blocks  */
,9,155,215,29,14,239,255,109,215,213
/* attempt to branch out of a REMOTE BLOCK  */
,9,110,8,58,255,12,5,9,91,67
/* attempt to EXECUTE undefined REMOTE BLOCK %s1  */
,7,110,8,255,75,91,67,0
/* attempted to use REMOTE BLOCK recursively  */
,8,255,122,8,134,91,67,255,245
/* cannot RETURN from subprogram within a REMOTE BLOCK  */
,8,16,205,119,50,135,9,91,67
/* %s1 statement is not FORTRAN 77 standard  */
,5,0,2,4,1,6
/* %s1 block is unfinished  */
,6,0,29,4,255,255,36
/* %s1 statement does not match with %s2 statement  */
,8,0,2,158,1,173,28,11,2
/* incomplete control structure found at %s1 statement  */
,8,255,192,72,32,98,70,0,2
/* %s1 statement is not allowed in %s2 definition  */
,8,0,2,4,1,19,3,11,53
/* no such field name found in structure %s1  */
,10,76,255,255,20,82,18,98,3,32,0
/* multiple definition of field name %s1  */
,7,255,6,53,5,82,18,0
/* structure %s1 has not been defined  */
,6,32,0,24,1,39,52
/* structure %s1 has already been defined  */
,6,32,0,24,57,39,52
/* structure %s1 must contain at least one field  */
,8,32,0,14,153,70,169,125,82
/* recursion detected in definition of structure %s1  */
,7,255,17,3,53,5,32,0
/* illegal use of structure %s1 containing union  */
,9,36,134,5,32,0,220,255,255,37
/* allocatable arrays cannot be fields within structures  */
,11,208,255,118,16,7,255,174,135,255,255,16
/* an integer conditional expression is not FORTRAN 77 standard  */
,8,15,65,255,143,64,4,1,6
/* %s1 statement must be used within %s2 definition  */
,8,0,2,14,7,87,135,11,53
};
static const char __FAR Msg8960[] = {
/* name can only appear in an EXTERNAL statement once  */
 9,18,93,59,79,3,15,200,2,86
/* character function %s1 may not be called since size was declared as (*)  */
,13,23,12,0,174,1,7,255,134,40,62,154,44,89
/* %s1 can only be used an an argument to a subroutine  */
,11,0,93,59,7,87,15,15,17,8,9,132
/* name cannot appear in both an INTRINSIC and EXTERNAL statement  */
,10,18,16,79,3,148,15,203,51,200,2
/* expecting a subroutine name  */
,4,10,9,132,18
/* %s1 statement not allowed in main program  */
,7,0,2,1,19,3,171,102
/* not an intrinsic FUNCTION name  */
,6,1,15,37,255,80,18
/* name can only appear in an INTRINSIC statement once  */
,9,18,93,59,79,3,15,203,2,86
/* subprogram recursion detected  */
,3,50,255,17
/* two main program units in the same file  */
,13,255,255,31,171,102,255,255,38,3,27,255,20,31
/* only one unnamed %s1 is allowed in an executable program  */
,12,59,125,255,255,40,0,4,19,3,15,233,102
/* function referenced as a subroutine  */
,6,12,255,18,44,9,132
};
static const char __FAR Msg9216[] = {
/* substringing of function or statement function return value is not FORTRAN 77 standard  */
 12,255,24,5,12,13,2,12,130,188,4,1,6
/* substringing valid only for character variables and array elements  */
,12,255,24,255,255,42,59,35,23,88,51,38,227
};
static const char __FAR Msg9472[] = {
/* statement number %i1 has already been defined in line %d2  */
 10,2,26,42,24,57,39,52,3,30,41
/* statement function definition appears after first executable statement  */
,8,2,12,53,69,144,237,233,2
/* %s1 statement must not be branched to but was in line %d2  */
,13,0,2,14,1,7,255,128,8,45,62,3,30,41
/* branch to statement %i1 in line %d2 not allowed  */
,9,58,8,2,42,3,30,41,1,19
/* specification statement must appear before %s1 is initialized  */
,8,49,2,14,79,111,0,4,121
/* statement %i1 was referenced as a FORMAT statement in line %d2  */
,12,2,42,62,255,18,44,9,90,2,3,30,41
/* IMPLICIT statement appears too late  */
,5,107,2,69,104,253
/* this statement will never be executed due to the preceding branch  */
,12,55,2,255,31,7,234,159,8,27,255,14,58
/* expecting statement number  */
,3,10,2,26
/* statement number %i1 was not used as a FORMAT statement in line %d2  */
,13,2,26,42,62,1,87,44,9,90,2,3,30,41
/* specification statement appears too late  */
,5,49,2,69,104,253
/* %s1 statement not allowed after %s2 statement  */
,7,0,2,1,19,144,11,2
/* statement number must be 99999 or less  */
,9,2,26,14,7,255,60,13,255,204
/* statement number cannot be zero  */
,5,2,26,16,7,105
/* this statement could branch to itself  */
,7,55,2,222,58,8,255,199
/* missing statement number %i1 - used in line %d2  */
,9,25,2,26,42,56,87,3,30,41
/* undecodeable statement or misspelled word %s1  */
,8,255,255,34,2,13,255,214,0
/* statement %i1 will never be executed due to the preceding branch  */
,12,2,42,255,31,7,234,159,8,27,255,14,58
/* expecting keyword or symbolic name  */
,6,10,255,201,13,133,18
/* number in %s1 statement is longer than 5 digits  */
,10,26,3,0,2,4,255,3,77,255,57
/* position of DATA statement is not FORTRAN 77 standard  */
,8,255,235,5,142,2,4,1,6
};
static const char __FAR Msg9728[] = {
/* variable %s1 in array declarator must be in COMMON or a dummy argument  */
 13,21,0,3,38,223,14,7,3,22,13,9,73,17
/* adjustable/assumed size array %s1 must be a dummy argument  */
,10,255,107,40,38,0,14,7,9,73,17
/* invalid subscript expression  */
,5,20,255,255,17,64
/* invalid number of subscripts  */
,6,20,26,5,255,255,19
/* using %s1 name incorrectly without list  */
,8,187,0,18,165,255,255,48,48
/* cannot substring array name %s1  */
,5,16,183,38,18,0
/* %s1 treated as an assumed size array  */
,9,0,255,255,30,44,15,109,40,38
/* assumed size array %s1 cannot be used as an i/o list item or a format/unit identifier  */
,17,109,40,38,0,16,7,87,44,15,162,48,167,13,9,255,180,245
/* limit of 65535 elements per dimension has been exceeded  */
,11,84,5,255,59,227,255,233,224,24,39,161
};
static const char __FAR Msg9984[] = {
/* unexpected number or name %s1  */
 5,184,26,13,18,0
/* bad sequence of operators  */
,6,255,124,180,5,255,228
/* invalid operator  */
,2,20,60
/* expecting end of statement after right parenthesis  */
,8,10,74,5,2,144,255,252,126
/* expecting an asterisk  */
,3,10,15,146
/* expecting colon  */
,2,10,216
/* expecting colon or end of statement  */
,6,10,216,13,74,5,2
/* missing comma  */
,2,25,113
/* expecting end of statement  */
,4,10,74,5,2
/* expecting integer variable  */
,3,10,65,21
/* expecting %s1 name  */
,3,10,0,18
/* expecting an integer  */
,3,10,15,65
/* expecting INTEGER, REAL, or DOUBLE PRECISION variable  */
,5,10,202,13,106,21
/* missing operator  */
,2,25,60
/* expecting a slash  */
,5,10,9,255,255,6
/* expecting %s1 expression  */
,3,10,0,64
/* expecting a constant expression  */
,4,10,9,34,64
/* expecting INTEGER, REAL, or DOUBLE PRECISION expression  */
,5,10,202,13,106,64
/* expecting INTEGER or CHARACTER constant  */
,6,10,255,82,13,141,34
/* unexpected operator  */
,2,184,60
/* no closing quote on literal string  */
,8,76,151,255,16,85,255,209,182
/* missing or invalid constant  */
,4,25,13,20,34
/* expecting character constant  */
,3,10,23,34
};
static const char __FAR Msg10240[] = {
/* length specification before array declarator is not FORTRAN 77 standard  */
 8,47,49,111,38,223,4,1,6
/* %i1 is an illegal length for %s2 type  */
,8,42,4,15,36,47,35,11,33
/* length specifier in %s1 statement is not FORTRAN 77 standard  */
,8,47,61,3,0,2,4,1,6
/* length specification not allowed with type %s1  */
,7,47,49,1,19,28,33,0
/* type of %s1 has already been established as %s2  */
,10,33,5,0,24,57,39,255,164,44,11
/* type of %s1 has not been declared  */
,7,33,5,0,24,1,39,154