if (IS_AST_OP(expr) && expr->opval.op==CAST &&
IS_AST_OP(expr->right) && expr->right->opval.op=='&') {
if (compareType(toType, expr->left->ftype)!=1) {
- werror (W_INIT_WRONG);
+ werror (E_INIT_WRONG);
printFromToType(expr->left->ftype, toType);
}
// skip the cast ???
return val;
}
wrong:
- werror (W_INIT_WRONG);
+ werror (E_INIT_WRONG);
return NULL;
}
/* by a string */
if (IS_CHAR (type->next)) {
if (!IS_LITERAL(list2val(ilist)->etype)) {
- werror (W_INIT_WRONG);
+ werror (E_CONST_EXPECTED);
return;
}
if (printIvalChar (type,
/* check the type */
if (compareType (type, val->type) == 0) {
- werror (W_INIT_WRONG);
+ werror (E_INIT_WRONG);
printFromToType (val->type, type);
}
value *v = (iast->type == EX_VALUE ? iast->opval.val : NULL);
if (!v)
{
- werror (W_INIT_WRONG);
+ werror (E_CONST_EXPECTED);
return 0;
}
"storage class not allowed for automatic variable '%s' in reentrant function unless static" },
{ E_AUTO_ABSA, ERROR_LEVEL_ERROR,
"absolute address not allowed for automatic var '%s' in reentrant function " },
-{ W_INIT_WRONG, ERROR_LEVEL_WARNING,
+{ E_INIT_WRONG, ERROR_LEVEL_ERROR,
"Initializer different levels of indirections" },
{ E_FUNC_REDEF, ERROR_LEVEL_ERROR,
"Function name '%s' redefined " },
#define W_INIT_IGNORED 15 /* initialiser ignored */
#define E_AUTO_ASSUMED 16 /* sclass auto assumed */
#define E_AUTO_ABSA 17 /* abs addr for auto var*/
-#define W_INIT_WRONG 18 /* initializer type != */
+#define E_INIT_WRONG 18 /* initializer type != */
#define E_FUNC_REDEF 19 /* func name redefined */
#define E_ID_UNDEF 20 /* identifer undefined */
#define W_STACK_OVERFLOW 21 /* stack overflow */