diff --git a/compiler/msg/errore.msg b/compiler/msg/errore.msg index 60c8eec490..bef67fa9c5 100644 --- a/compiler/msg/errore.msg +++ b/compiler/msg/errore.msg @@ -1615,7 +1615,7 @@ parser_e_generic_constraints_not_allowed_here=03355_E_Generic constraint not all % in delphi mode, a constraint might not be specified in the header of the implementation. parser_e_location_size_too_small=03356_E_Explicit location is too small for parameter % AmigaOS/MorphOS syscall specific: for int64/qword parameter only a single register location is specified -parser_w_location_size_too_large=03357_W_Explicit location size is larger than required by parameter +parser_e_location_size_too_large=03357_E_Explicit location size is larger than required by parameter % AmigaOS/MorphOS syscall specific: for a parameter which is smaller than 64bit, a register pair is specified parser_e_location_regpair_only_data=03358_E_Only data registers are supported for explicit location register pairs % AmigaOS/MorphOS syscall specific: for 64bit register pairs, only data registers are supported diff --git a/compiler/msgidx.inc b/compiler/msgidx.inc index f64248c952..e199b175ac 100644 --- a/compiler/msgidx.inc +++ b/compiler/msgidx.inc @@ -467,7 +467,7 @@ const parser_e_method_for_type_in_other_unit=03354; parser_e_generic_constraints_not_allowed_here=03355; parser_e_location_size_too_small=03356; - parser_w_location_size_too_large=03357; + parser_e_location_size_too_large=03357; parser_e_location_regpair_only_data=03358; parser_e_location_regpair_only_consecutive=03359; type_e_mismatch=04000; diff --git a/compiler/msgtxt.inc b/compiler/msgtxt.inc index 48ae281565..738d582c70 100644 --- a/compiler/msgtxt.inc +++ b/compiler/msgtxt.inc @@ -586,7 +586,7 @@ const msgtxt : array[0..000358,1..240] of char=( '03354_E_Implementing a method for type "$1" declared in another unit'#000+ '03355_E_Generic constraint not allowed here'#000+ '0335','6_E_Explicit location is too small for parameter'#000+ - '03357_W_Explicit location size is larger than required by parameter'#000+ + '03357_E_Explicit location size is larger than required by parameter'#000+ '03358_E_Only data registers are supported for explicit location regist'+ 'er pairs'#000+ '03359_E_Only consecutive registers are suppo','rted for explicit locati'+ diff --git a/compiler/powerpc/cpupara.pas b/compiler/powerpc/cpupara.pas index 7e2b780a7f..737e6cfe52 100644 --- a/compiler/powerpc/cpupara.pas +++ b/compiler/powerpc/cpupara.pas @@ -726,7 +726,7 @@ unit cpupara; message(parser_e_location_regpair_only_consecutive); if tcgsize2size[paracgsize]<=4 then - message(parser_w_location_size_too_large); + message(parser_e_location_size_too_large); if tcgsize2size[paracgsize]>8 then message(parser_e_location_size_too_small);