From dca4bde3a2b43a31fa0e6dbc564c823f53a20da2 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Tue, 31 Aug 2021 20:28:23 +0200
Subject: [PATCH]   * unified internal error

---
 compiler/cgobj.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/cgobj.pas b/compiler/cgobj.pas
index 24e0af97ec..01be2544c9 100644
--- a/compiler/cgobj.pas
+++ b/compiler/cgobj.pas
@@ -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);