mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-12 00:46:02 +02:00
* unified internal error
This commit is contained in:
parent
be069c8fa8
commit
dca4bde3a2
@ -757,7 +757,7 @@ implementation
|
||||
if getsupreg(r)<first_int_imreg then
|
||||
internalerror(2013051401);
|
||||
if not has_next_reg[getsupreg(r)] then
|
||||
internalerror(2017091103);
|
||||
internalerror(2017091104);
|
||||
{$endif AVR}
|
||||
if getregtype(r)<>R_INTREGISTER then
|
||||
internalerror(2017091101);
|
||||
|
Loading…
Reference in New Issue
Block a user