View Issue Details

IDProjectCategoryView StatusLast Update
0037888FPCCompilerpublic2020-10-14 15:49
ReporterMarģers Assigned ToFlorian  
PrioritynormalSeverityminorReproducibilityhave not tried
Status closedResolutionfixed 
Platformx86_64OSlinux 
Product Version3.3.1 
Fixed in Version3.3.1 
Summary0037888: [patch] duplicate internal error numbers
Descriptionfix duplicate internal error numbers (a lot of them not all).
Additional Informationattached file intererror_log.txt has information on what is changed.
1. column existing internal error number
2. column new internal error number (if empty not changed).
line with IF xxx show that line below is in between ifdef endif

TagsNo tags attached.
Fixed in Revision47103
FPCOldBugId
FPCTarget-
Attached Files

Activities

Marģers

2020-10-08 12:32

reporter  

intererror_log.txt (101,974 bytes)   
     10000  2020100801  x86  ../src/fpc/compiler/x86/agx86nsm.pas:1303                 internalerror(10000);
            2020100802  x86  ../src/fpc/compiler/x86/agx86int.pas:1016                 internalerror(10000);
     10001  2020100803  z80  ../src/fpc/compiler/z80/agsdasz80.pas:477              internalerror(10001);
            2020100804  z80  ../src/fpc/compiler/z80/agsdasz80.pas:510              internalerror(10001);
            2020100805  z80  ../src/fpc/compiler/z80/agz80vasm.pas:511              internalerror(10001);
            2020100806  z80  ../src/fpc/compiler/z80/agz80vasm.pas:544              internalerror(10001);
            2020100807  sparcgen  ../src/fpc/compiler/sparcgen/cpugas.pas:162                internalerror(10001);
            2020100808  sparc64  ../src/fpc/compiler/sparc64/cpugas.pas:166                internalerror(10001);
            2020100809  mips  ../src/fpc/compiler/mips/cpugas.pas:180                internalerror(10001);
            2020100810  x86  ../src/fpc/compiler/x86/agx86att.pas:279              internalerror(10001);
            2020100811  x86  ../src/fpc/compiler/x86/agx86att.pas:331              internalerror(10001);
            2020100812  x86  ../src/fpc/compiler/x86/agx86nsm.pas:453              internalerror(10001);
            2020100813  x86  ../src/fpc/compiler/x86/agx86nsm.pas:490              internalerror(10001);
     10081  2020100814  compiler  ../src/fpc/compiler/ncginl.pas:428                 internalerror(10081);
            2020100815  i8086  ../src/fpc/compiler/i8086/n8086inl.pas:349                   internalerror(10081);
     12345  2020100816  compiler  ../src/fpc/compiler/symdef.pas:7780            internalerror(12345)
            2020100817  mips  ../src/fpc/compiler/mips/racpugas.pas:254                    InternalError(12345);
    424242  2020100818  compiler  ../src/fpc/compiler/fpcp.pas:329            internalerror(424242);
            2020100819  compiler  ../src/fpc/compiler/fpcp.pas:345            internalerror(424242);
            2020100820  compiler  ../src/fpc/compiler/fpcp.pas:351            internalerror(424242);
                    IF NOT i8086
    777006  2020100821  x86  ../src/fpc/compiler/x86/aasmcpu.pas:4328                  InternalError(777006);
                    IF NOT i8086
            2020100822  x86  ../src/fpc/compiler/x86/aasmcpu.pas:4485                  InternalError(777006);
    777211  2020100823  x86  ../src/fpc/compiler/x86/aasmcpu.pas:5168                                         else InternalError(777211);
            2020100824  x86  ../src/fpc/compiler/x86/aasmcpu.pas:5177                                         else InternalError(777211);
  20020718  2002071801  compiler  ../src/fpc/compiler/ncginl.pas:681          internalerror(20020718);
            2002071802  compiler  ../src/fpc/compiler/ncginl.pas:686          internalerror(20020718);
            2002071803  compiler  ../src/fpc/compiler/ncginl.pas:691          internalerror(20020718);
            2002071804  compiler  ../src/fpc/compiler/ncginl.pas:696          internalerror(20020718);
            2002071805  compiler  ../src/fpc/compiler/ncginl.pas:701          internalerror(20020718);
            2002071806  compiler  ../src/fpc/compiler/ncginl.pas:711          internalerror(20020718);
            2002071807  compiler  ../src/fpc/compiler/ncginl.pas:716          internalerror(20020718);
            2002071808  compiler  ../src/fpc/compiler/ncginl.pas:721          internalerror(20020718);
            2002071809  compiler  ../src/fpc/compiler/ncginl.pas:726          internalerror(20020718);
            2002071810  compiler  ../src/fpc/compiler/ncginl.pas:731          internalerror(20020718);
  20020729  2002072901  m68k  ../src/fpc/compiler/m68k/cgcpu.pas:1297              internalerror(20020729);
            2002072902  m68k  ../src/fpc/compiler/m68k/cgcpu.pas:1474              internalerror(20020729);
  20020816  2002081601  m68k  ../src/fpc/compiler/m68k/cgcpu.pas:1197                   internalerror(20020816);
            2002081602  m68k  ../src/fpc/compiler/m68k/cgcpu.pas:1428                  internalerror(20020816);
 200006139              sparcgen  ../src/fpc/compiler/sparcgen/hlcgcpu.pas:110              Internalerror(200006139);
            2000061301  x86_64  ../src/fpc/compiler/x86_64/hlcgcpu.pas:84              Internalerror(200006139);
            2000061302  aarch64  ../src/fpc/compiler/aarch64/hlcgcpu.pas:187              Internalerror(200006139);
            2000061303  mips  ../src/fpc/compiler/mips/hlcgcpu.pas:252          Internalerror(200006139);
            2000061304  riscv  ../src/fpc/compiler/riscv/hlcgrv.pas:121            Internalerror(200006139);
            2000061306  i8086  ../src/fpc/compiler/i8086/hlcgcpu.pas:584            Internalerror(200006139);
            2000061310  ppcgen  ../src/fpc/compiler/ppcgen/hlcgppc.pas:116            Internalerror(200006139);
            2000061311  arm  ../src/fpc/compiler/arm/hlcgcpu.pas:109            Internalerror(200006139);
            2000061312  i386  ../src/fpc/compiler/i386/hlcgcpu.pas:355            Internalerror(200006139);
            2000061313  i386  ../src/fpc/compiler/i386/hlcgcpu.pas:367            Internalerror(200006139);
 200108234              compiler  ../src/fpc/compiler/nbas.pas:1642            internalerror(200108234);
            2001082302  compiler  ../src/fpc/compiler/ninl.pas:4142                internalerror(200108234);
 200109041              compiler  ../src/fpc/compiler/ncgadd.pas:804                  internalerror(200109041);
            2001090403  powerpc64  ../src/fpc/compiler/powerpc64/nppcadd.pas:179            internalerror(200109041);
 200109051              compiler  ../src/fpc/compiler/ncgadd.pas:515                internalerror(200109051);
            2001090503  i8086  ../src/fpc/compiler/i8086/n8086add.pas:243                internalerror(200109051);
            2001090504  powerpc  ../src/fpc/compiler/powerpc/nppcadd.pas:309                  internalerror(200109051);
            2001090505  i386  ../src/fpc/compiler/i386/n386add.pas:144                internalerror(200109051);
                    IF     not defined(cpu64bitalu) and not defined(cpuhighleveltarget)
 200109052              compiler  ../src/fpc/compiler/ncgmat.pas:359          internalerror(200109052);
            2001090506  i8086  ../src/fpc/compiler/i8086/n8086mat.pas:117            internalerror(200109052);
            2001090507  i386  ../src/fpc/compiler/i386/n386mat.pas:74            internalerror(200109052);
 200109061              compiler  ../src/fpc/compiler/cgobj.pas:2023              internalerror(200109061);
            2001090602  compiler  ../src/fpc/compiler/cgobj.pas:2089              internalerror(200109061);
            2001090603  compiler  ../src/fpc/compiler/cgobj.pas:2126              internalerror(200109061);
            2001090604  compiler  ../src/fpc/compiler/cgobj.pas:2328              internalerror(200109061);
            2001090605  compiler  ../src/fpc/compiler/cgobj.pas:2391              internalerror(200109061);
 200109225              x86  ../src/fpc/compiler/x86/cgx86.pas:2105                  internalerror(200109225);
            2001092208  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:742                    internalerror(200109225);
 200109238              x86  ../src/fpc/compiler/x86/cgx86.pas:2400              internalerror(200109238);
            2001092304  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1126                  internalerror(200109238);
 200110205              compiler  ../src/fpc/compiler/nutils.pas:1237                 internalerror(200110205);
            2001102001  compiler  ../src/fpc/compiler/symtype.pas:709                internalerror(200110205);
            2001102002  compiler  ../src/fpc/compiler/symtype.pas:735                internalerror(200110205);
            2001102003  compiler  ../src/fpc/compiler/symtype.pas:1150                internalerror(200110205);
 200203241              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2664              internalerror(200203241);
            2002032403  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2756              internalerror(200203241);
            2002032408  i386  ../src/fpc/compiler/i386/cgcpu.pas:639              internalerror(200203241);
            2002032409  sparc  ../src/fpc/compiler/sparc/cgcpu.pas:211              internalerror(200203241);
 200203244              compiler  ../src/fpc/compiler/cg64f32.pas:691              internalerror(200203244);
            2002032411  compiler  ../src/fpc/compiler/cg64f32.pas:708              internalerror(200203244);
 200203247              compiler  ../src/fpc/compiler/ncgadd.pas:438                   internalerror(200203247);
                    IF     support_mmx
            2002032412  x86  ../src/fpc/compiler/x86/nx86add.pas:803                    internalerror(200203247);
            2002032413  ppcgen  ../src/fpc/compiler/ppcgen/ngppcadd.pas:282                        internalerror(200203247);
 200203282              i8086  ../src/fpc/compiler/i8086/n8086add.pas:759                 internalerror(200203282);
            2002032801  i8086  ../src/fpc/compiler/i8086/n8086add.pas:930                 internalerror(200203282);
            2002032803  i386  ../src/fpc/compiler/i386/n386add.pas:412            internalerror(200203282);
 200204221              compiler  ../src/fpc/compiler/tgobj.pas:235             internalerror(200204221);
            2002042202  z80  ../src/fpc/compiler/z80/tgcpu.pas:57        internalerror(200204221);
 200204249              compiler  ../src/fpc/compiler/hlcg2ll.pas:1465                internalerror(200204249);
            2002042402  compiler  ../src/fpc/compiler/hlcgobj.pas:5235                internalerror(200204249);
 200205183              compiler  ../src/fpc/compiler/ogcoff.pas:1049                internalerror(200205183);
            2002051801  compiler  ../src/fpc/compiler/ogbase.pas:3634                    internalerror(200205183);
                    IF     defined(x86_64)
 200301081              x86  ../src/fpc/compiler/x86/aasmcpu.pas:2556            internalerror(200301081);
                    IF     defined(x86_64)
            2003010802  x86  ../src/fpc/compiler/x86/aasmcpu.pas:2826           internalerror(200301081);
                    IF     defined(x86_64)
            2003010803  x86  ../src/fpc/compiler/x86/aasmcpu.pas:3000            internalerror(200301081);
 200304266              compiler  ../src/fpc/compiler/pdecsub.pas:1789      internalerror(200304266);
            2003042601  compiler  ../src/fpc/compiler/pdecsub.pas:1799      internalerror(200304266);
 200304268              compiler  ../src/fpc/compiler/pdecsub.pas:1833      internalerror(200304268);
            2003042602  compiler  ../src/fpc/compiler/pdecsub.pas:1849      internalerror(200304268);
 200305108              compiler  ../src/fpc/compiler/psub.pas:536                        internalerror(200305108);
            2003051001  compiler  ../src/fpc/compiler/psub.pas:676                        internalerror(200305108);
            2003051002  compiler  ../src/fpc/compiler/ngenutil.pas:200              internalerror(200305108);
 200305251              compiler  ../src/fpc/compiler/cgobj.pas:2831            internalerror(200305251);
            2003052502  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2685            internalerror(200305251);
            2003052503  arm  ../src/fpc/compiler/arm/cgcpu.pas:519            internalerror(200305251);
            2003052504  arm  ../src/fpc/compiler/arm/cgcpu.pas:4011            internalerror(200305251);
                    IF NOT mips64
 200306017              mips  ../src/fpc/compiler/mips/cgcpu.pas:1947      internalerror(200306017);
            2003060102  sparc  ../src/fpc/compiler/sparc/cgcpu.pas:265              internalerror(200306017);
            2003060103  sparc  ../src/fpc/compiler/sparc/cgcpu.pas:286              internalerror(200306017);
 200306021              compiler  ../src/fpc/compiler/ncgmat.pas:287              internalerror(200306021);
            2003060202  m68k  ../src/fpc/compiler/m68k/n68kmat.pas:221              internalerror(200306021);
 200308252              compiler  ../src/fpc/compiler/cgbase.pas:736              internalerror(200308252);
            2003082503  arm  ../src/fpc/compiler/arm/narmadd.pas:210              internalerror(200308252);
 200308296              arm  ../src/fpc/compiler/arm/cgcpu.pas:987                    internalerror(200308296);
                    IF     dummy
            2003082903  arm  ../src/fpc/compiler/arm/cgcpu.pas:4230                    internalerror(200308296);
            2003082911  arm  ../src/fpc/compiler/arm/cgcpu.pas:4705                    internalerror(200308296);
 200308299              aarch64  ../src/fpc/compiler/aarch64/cgcpu.pas:829                  InternalError(200308299);
            2003082912  arm  ../src/fpc/compiler/arm/cgcpu.pas:1371               InternalError(200308299);
            2003082913  arm  ../src/fpc/compiler/arm/cgcpu.pas:4434               InternalError(200308299);
 200309121              arm  ../src/fpc/compiler/arm/cgcpu.pas:1312                internalerror(200309121);
            2003091202  arm  ../src/fpc/compiler/arm/cgcpu.pas:5227                internalerror(200309121);
 200309189              compiler  ../src/fpc/compiler/cgobj.pas:2847                    internalerror(200309189);
            2003091802  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2718                  internalerror(200309189);
            2003091803  arm  ../src/fpc/compiler/arm/cgcpu.pas:549                    internalerror(200309189);
            2003091804  arm  ../src/fpc/compiler/arm/cgcpu.pas:4061                    internalerror(200309189);
 200309202              sparcgen  ../src/fpc/compiler/sparcgen/racpugas.pas:325                      internalerror(200309202);
            2003092003  sparcgen  ../src/fpc/compiler/sparcgen/racpugas.pas:414                             internalerror(200309202);
            2003092004  xtensa  ../src/fpc/compiler/xtensa/racpugas.pas:539                           internalerror(200309202);
            2003092005  aarch64  ../src/fpc/compiler/aarch64/racpugas.pas:862                           internalerror(200309202);
            2003092006  mips  ../src/fpc/compiler/mips/racpugas.pas:294                      internalerror(200309202);
            2003092007  mips  ../src/fpc/compiler/mips/racpugas.pas:383                             internalerror(200309202);
            2003092008  riscv32  ../src/fpc/compiler/riscv32/rarv32gas.pas:194                          internalerror(200309202);
            2003092009  riscv32  ../src/fpc/compiler/riscv32/rarv32gas.pas:530                           internalerror(200309202);
            2003092011  x86  ../src/fpc/compiler/x86/rax86att.pas:738                                  internalerror(200309202);
            2003092012  avr  ../src/fpc/compiler/avr/raavrgas.pas:418                        internalerror(200309202);
            2003092013  avr  ../src/fpc/compiler/avr/raavrgas.pas:502                           internalerror(200309202);
            2003092014  powerpc64  ../src/fpc/compiler/powerpc64/rappcgas.pas:238                    internalerror(200309202);
            2003092015  powerpc64  ../src/fpc/compiler/powerpc64/rappcgas.pas:528                  internalerror(200309202);
            2003092016  riscv64  ../src/fpc/compiler/riscv64/rarv64gas.pas:195                          internalerror(200309202);
            2003092017  riscv64  ../src/fpc/compiler/riscv64/rarv64gas.pas:571                           internalerror(200309202);
            2003092018  powerpc  ../src/fpc/compiler/powerpc/rappcgas.pas:225                          internalerror(200309202);
            2003092019  powerpc  ../src/fpc/compiler/powerpc/rappcgas.pas:524                           internalerror(200309202);
            2003092021  arm  ../src/fpc/compiler/arm/raarmgas.pas:991                           internalerror(200309202);
 200310123              compiler  ../src/fpc/compiler/cgobj.pas:2493              internalerror(200310123);
            2003101204  compiler  ../src/fpc/compiler/cgobj.pas:2525              internalerror(200310123);
 200311075              compiler  ../src/fpc/compiler/nbas.pas:1515            internalerror(200311075);
            2003110701  compiler  ../src/fpc/compiler/nbas.pas:1669            internalerror(200311075);
 200311292              arm  ../src/fpc/compiler/arm/agarmgas.pas:419                         internalerror(200311292);
            2003112903  arm  ../src/fpc/compiler/arm/agarmgas.pas:429                         internalerror(200311292);
                    IF     cpuflags
 200311301              compiler  ../src/fpc/compiler/ncgcnv.pas:280              internalerror(200311301);
            2003113002  arm  ../src/fpc/compiler/arm/narmcnv.pas:361                internalerror(200311301);
 200312231              x86  ../src/fpc/compiler/x86/nx86add.pas:900              internalerror(200312231);
            2003122303  x86  ../src/fpc/compiler/x86/nx86add.pas:1043              internalerror(200312231);
 200312232              compiler  ../src/fpc/compiler/cgobj.pas:2606              internalerror(200312232);
            2003122304  compiler  ../src/fpc/compiler/cgobj.pas:2619              internalerror(200312232);
 200312252              x86  ../src/fpc/compiler/x86/cgx86.pas:1609             internalerror(200312252);
            2003122501  x86  ../src/fpc/compiler/x86/cgx86.pas:1708             internalerror(200312252);
 200401041              z80  ../src/fpc/compiler/z80/aasmcpu.pas:1303              internalerror(200401041);
            2004010403  z80  ../src/fpc/compiler/z80/aasmcpu.pas:1314              internalerror(200401041);
            2004010404  sparcgen  ../src/fpc/compiler/sparcgen/aasmcpu.pas:290              internalerror(200401041);
            2004010406  sparcgen  ../src/fpc/compiler/sparcgen/aasmcpu.pas:312              internalerror(200401041);
            2004010407  aarch64  ../src/fpc/compiler/aarch64/aasmcpu.pas:572              internalerror(200401041);
            2004010408  mips  ../src/fpc/compiler/mips/aasmcpu.pas:460              internalerror(200401041);
            2004010409  mips  ../src/fpc/compiler/mips/aasmcpu.pas:482              internalerror(200401041);
            2004010411  x86  ../src/fpc/compiler/x86/aasmcpu.pas:4800              internalerror(200401041);
            2004010412  x86  ../src/fpc/compiler/x86/aasmcpu.pas:4858              internalerror(200401041);
            2004010413  avr  ../src/fpc/compiler/avr/aasmcpu.pas:358              internalerror(200401041);
            2004010414  avr  ../src/fpc/compiler/avr/aasmcpu.pas:377              internalerror(200401041);
            2004010415  arm  ../src/fpc/compiler/arm/aasmcpu.pas:726              internalerror(200401041);
            2004010416  arm  ../src/fpc/compiler/arm/aasmcpu.pas:744              internalerror(200401041);
 200401042              sparcgen  ../src/fpc/compiler/sparcgen/aasmcpu.pas:286                    internalerror(200401042);
            2004010417  sparcgen  ../src/fpc/compiler/sparcgen/aasmcpu.pas:308                    internalerror(200401042);
            2004010418  mips  ../src/fpc/compiler/mips/aasmcpu.pas:456                    internalerror(200401042);
            2004010419  mips  ../src/fpc/compiler/mips/aasmcpu.pas:478                    internalerror(200401042);
 200401263              arm  ../src/fpc/compiler/arm/rgcpu.pas:232          internalerror(200401263);
            2004012601  arm  ../src/fpc/compiler/arm/rgcpu.pas:494                internalerror(200401263);
            2004012602  arm  ../src/fpc/compiler/arm/rgcpu.pas:548                internalerror(200401263);
 200403072              compiler  ../src/fpc/compiler/ogrel.pas:342            internalerror(200403072);
            2004030701  compiler  ../src/fpc/compiler/ogcoff.pas:1290            internalerror(200403072);
            2004030704  compiler  ../src/fpc/compiler/ogomf.pas:1200            internalerror(200403072);
 200403073              compiler  ../src/fpc/compiler/ogrel.pas:417            internalerror(200403073);
            2004030705  compiler  ../src/fpc/compiler/ogomf.pas:1345                internalerror(200403073);
            2004030706  compiler  ../src/fpc/compiler/ogomf.pas:1429                internalerror(200403073);
            2004030707  compiler  ../src/fpc/compiler/ogbase.pas:1747                    internalerror(200403073);
 200403151              arm  ../src/fpc/compiler/arm/aasmcpu.pas:835                internalerror(200403151);
            2004031502  arm  ../src/fpc/compiler/arm/aasmcpu.pas:928                  internalerror(200403151);
 200403161              arm  ../src/fpc/compiler/arm/cgcpu.pas:1326                        internalerror(200403161);
            2004031602  arm  ../src/fpc/compiler/arm/cgcpu.pas:5241                        internalerror(200403161);
                    IF NOT cpu64bitaddr
 200404291              compiler  ../src/fpc/compiler/aggas.pas:997                        internalerror(200404291);
            2004042904  powerpc  ../src/fpc/compiler/powerpc/agppcmpw.pas:820                          internalerror(200404291);
                    IF NOT cpu64bitaddr
 200404292              compiler  ../src/fpc/compiler/aggas.pas:1003                          internalerror(200404292);
            2004042905  powerpc  ../src/fpc/compiler/powerpc/agppcmpw.pas:825                            internalerror(200404292);
 200410031              sparcgen  ../src/fpc/compiler/sparcgen/ncpuinln.pas:105              internalerror(200410031);
            2004100304  sparcgen  ../src/fpc/compiler/sparcgen/ncpucnv.pas:199                   internalerror(200410031);
            2004100305  mips  ../src/fpc/compiler/mips/ncpuinln.pas:105        internalerror(200410031);
            2004100306  mips  ../src/fpc/compiler/mips/ncpucnv.pas:188          internalerror(200410031);
            2004100307  arm  ../src/fpc/compiler/arm/narmcnv.pas:226                        internalerror(200410031);
 200410231              compiler  ../src/fpc/compiler/hlcgobj.pas:4345                  internalerror(200410231);
            2004102302  z80  ../src/fpc/compiler/z80/cpupara.pas:528            internalerror(200410231);
            2004102303  aarch64  ../src/fpc/compiler/aarch64/cpupara.pas:685            internalerror(200410231);
            2004102304  m68k  ../src/fpc/compiler/m68k/cpupara.pas:702            internalerror(200410231);
            2004102305  avr  ../src/fpc/compiler/avr/cpupara.pas:558            internalerror(200410231);
            2004102306  arm  ../src/fpc/compiler/arm/cpupara.pas:918            internalerror(200410231);
 200412041              compiler  ../src/fpc/compiler/nmem.pas:611                            internalerror(200412041);
            2004120404  i8086  ../src/fpc/compiler/i8086/n8086inl.pas:181                             internalerror(200412041);
 200412043              compiler  ../src/fpc/compiler/nadd.pas:2718                internalerror(200412043);
            2004120405  compiler  ../src/fpc/compiler/nadd.pas:2894                        internalerror(200412043);
 200501051              compiler  ../src/fpc/compiler/rautils.pas:1319                  internalerror(200501051);
            2005010502  compiler  ../src/fpc/compiler/ncnv.pas:1187               internalerror(200501051);
 200501154              compiler  ../src/fpc/compiler/scanner.pas:1490                    internalerror(200501154);
            2005011503  compiler  ../src/fpc/compiler/pbase.pas:319                internalerror(200501154);
 200501163              m68k  ../src/fpc/compiler/m68k/cpupara.pas:588                                  internalerror(200501163);
            2005011604  i8086  ../src/fpc/compiler/i8086/cpupara.pas:498                    internalerror(200501163);
            2005011605  i8086  ../src/fpc/compiler/i8086/cpupara.pas:694                                  internalerror(200501163);
            2005011606  i386  ../src/fpc/compiler/i386/cpupara.pas:525                    internalerror(200501163);
            2005011607  i386  ../src/fpc/compiler/i386/cpupara.pas:691                                  internalerror(200501163);
 200506042              x86  ../src/fpc/compiler/x86/aasmcpu.pas:4843                    internalerror(200506042);
            2005060404  x86  ../src/fpc/compiler/x86/aasmcpu.pas:4855                    internalerror(200506042);
 200506043              x86  ../src/fpc/compiler/x86/aasmcpu.pas:4783                    internalerror(200506043);
            2005060405  x86  ../src/fpc/compiler/x86/aasmcpu.pas:4797                    internalerror(200506043);
 200507031              compiler  ../src/fpc/compiler/ncgmem.pas:293                internalerror(200507031);
            2005070302  i8086  ../src/fpc/compiler/i8086/n8086mem.pas:154                   internalerror(200507031);
 200509191              x86  ../src/fpc/compiler/x86/agx86nsm.pas:1267                           internalerror(200509191);
            2005091903  x86  ../src/fpc/compiler/x86/agx86nsm.pas:1295                     internalerror(200509191);
 200510031              x86  ../src/fpc/compiler/x86/nx86inl.pas:872                     internalerror(200510031);
            2005100303  x86  ../src/fpc/compiler/x86/nx86inl.pas:881                     internalerror(200510031);
 200601233              compiler  ../src/fpc/compiler/symbase.pas:412            internalerror(200601233);
            2006012304  compiler  ../src/fpc/compiler/symbase.pas:461            internalerror(200601233);
 200601261              compiler  ../src/fpc/compiler/dbgdwarf.pas:1310                internalerror(200601261);
            2006012602  compiler  ../src/fpc/compiler/dbgdwarf.pas:1312                internalerror(200601261);
 200602231              compiler  ../src/fpc/compiler/ognlm.pas:760            internalerror(200602231);   // we have to have .data, .text and .reloc
            2006022302  compiler  ../src/fpc/compiler/ogcoff.pas:2792            internalerror(200602231);
 200602251              compiler  ../src/fpc/compiler/ognlm.pas:554                            internalerror(200602251);
            2006022503  compiler  ../src/fpc/compiler/ogbase.pas:3702                            internalerror(200602251);
 200602254              compiler  ../src/fpc/compiler/ogbase.pas:2304            internalerror(200602254);
            2006022505  compiler  ../src/fpc/compiler/ogbase.pas:2388              internalerror(200602254);
 200603041              compiler  ../src/fpc/compiler/ogbase.pas:2251            internalerror(200603041);
            2006030403  compiler  ../src/fpc/compiler/ogbase.pas:2262            internalerror(200603041);
 200603042              compiler  ../src/fpc/compiler/ognlm.pas:571                            internalerror(200603042);
            2006030404  compiler  ../src/fpc/compiler/ogbase.pas:3696                            internalerror(200603042);
 200603051              compiler  ../src/fpc/compiler/ogcoff.pas:1827               internalerror(200603051);
            2006030504  compiler  ../src/fpc/compiler/ogbase.pas:1495            internalerror(200603051);
 200603053              compiler  ../src/fpc/compiler/ognlm.pas:437            internalerror(200603053);
            2006030505  compiler  ../src/fpc/compiler/ogcoff.pas:2524            internalerror(200603053);
 200603316              compiler  ../src/fpc/compiler/ogbase.pas:3457              internalerror(200603316);
            2006033111  compiler  ../src/fpc/compiler/ogbase.pas:3469                  internalerror(200603316);
            2006033112  compiler  ../src/fpc/compiler/ogbase.pas:3536                          internalerror(200603316);
 200604014              compiler  ../src/fpc/compiler/ogcoff.pas:1206                    internalerror(200604014);
            2006040105  x86_64  ../src/fpc/compiler/x86_64/cpuelf.pas:560                    internalerror(200604014);
            2006040106  mips  ../src/fpc/compiler/mips/cpuelf.pas:1072                internalerror(200604014);
            2006040107  arm  ../src/fpc/compiler/arm/cpuelf.pas:926                internalerror(200604014);
            2006040108  i386  ../src/fpc/compiler/i386/cpuelf.pas:476                    internalerror(200604014);
                    IF     arm
 200606085              compiler  ../src/fpc/compiler/ogcoff.pas:1090                        internalerror(200606085);  { offset overflow }
                    IF     arm
            2006060801  compiler  ../src/fpc/compiler/ogcoff.pas:1100                        internalerror(200606085);  { offset overflow }
 200608051              compiler  ../src/fpc/compiler/ncgmem.pas:687             internalerror(200608051);
            2006080502  llvm  ../src/fpc/compiler/llvm/nllvmmem.pas:247          internalerror(200608051);
            2006080503  m68k  ../src/fpc/compiler/m68k/n68kmem.pas:164             internalerror(200608051);
 200610052              compiler  ../src/fpc/compiler/dbgbase.pas:310                      internalerror(200610052);
            2006100501  llvm  ../src/fpc/compiler/llvm/llvmtype.pas:688                        internalerror(200610052);
 200610053              compiler  ../src/fpc/compiler/dbgbase.pas:312                      internalerror(200610053);
            2006100505  llvm  ../src/fpc/compiler/llvm/llvmtype.pas:690                        internalerror(200610053);
                    IF     cpufpemu
 200610151              compiler  ../src/fpc/compiler/ncnv.pas:3542                          internalerror(200610151);
            2006101504  arm  ../src/fpc/compiler/arm/narmcnv.pas:131                      internalerror(200610151);
                    IF     cpufpemu
 200610152              compiler  ../src/fpc/compiler/ncnv.pas:3555                          internalerror(200610152);
            2006101505  arm  ../src/fpc/compiler/arm/narmcnv.pas:144                      internalerror(200610152);
                    IF     cpufpemu
 200610153              compiler  ../src/fpc/compiler/ncnv.pas:3558                      internalerror(200610153);
            2006101506  arm  ../src/fpc/compiler/arm/narmcnv.pas:147                  internalerror(200610153);
 200704201              ppcgen  ../src/fpc/compiler/ppcgen/rgcpu.pas:69                internalerror(200704201);
            2007042002  ppcgen  ../src/fpc/compiler/ppcgen/rgcpu.pas:120                internalerror(200704201);
 200704251              compiler  ../src/fpc/compiler/aggas.pas:1213                     internalerror(200704251);
            2007042504  llvm  ../src/fpc/compiler/llvm/agllvm.pas:963              internalerror(200704251);
 201001110              compiler  ../src/fpc/compiler/ptype.pas:872                            internalerror(201001110);
            2010011103  compiler  ../src/fpc/compiler/pdecobj.pas:1354                            internalerror(201001110);
 201001120              compiler  ../src/fpc/compiler/scanner.pas:1497                    internalerror(201001120);
            2010011201  compiler  ../src/fpc/compiler/pbase.pas:326                internalerror(201001120);
 201003032              compiler  ../src/fpc/compiler/hlcgobj.pas:4975                        internalerror(201003032);
            2010030303  compiler  ../src/fpc/compiler/hlcgobj.pas:5039                                 internalerror(201003032);
            2010030304  compiler  ../src/fpc/compiler/hlcgobj.pas:5070                                   internalerror(201003032);
 201108162              x86  ../src/fpc/compiler/x86/nx86add.pas:923                      internalerror(201108162);
            2011081601  x86  ../src/fpc/compiler/x86/nx86add.pas:1066                      internalerror(201108162);
 201108163              x86  ../src/fpc/compiler/x86/nx86add.pas:943                      internalerror(201108163);
            2011081604  x86  ../src/fpc/compiler/x86/nx86add.pas:1086                      internalerror(201108163);
 201108260              compiler  ../src/fpc/compiler/scanner.pas:1525                            internalerror(201108260);
            2011082601  compiler  ../src/fpc/compiler/pbase.pas:355                        internalerror(201108260);
 201205181              arm  ../src/fpc/compiler/arm/cgcpu.pas:997                    internalerror(201205181);
                    IF     dummy
            2012051802  arm  ../src/fpc/compiler/arm/cgcpu.pas:4240                    internalerror(201205181);
            2012051803  arm  ../src/fpc/compiler/arm/cgcpu.pas:4715                    internalerror(201205181);
2000101001              compiler  ../src/fpc/compiler/ninl.pas:3227                  internalerror(2000101001);
            2000101002  compiler  ../src/fpc/compiler/ninl.pas:4122              internalerror(2000101001);
2002070601              powerpc  ../src/fpc/compiler/powerpc/agppcmpw.pas:381                internalerror(2002070601);
            2002070602  ppcgen  ../src/fpc/compiler/ppcgen/agppcgas.pas:335                internalerror(2002070601);
2002070603              powerpc  ../src/fpc/compiler/powerpc/agppcmpw.pas:255            internalerror(2002070603);
            2002070605  ppcgen  ../src/fpc/compiler/ppcgen/agppcgas.pas:220            internalerror(2002070603);
2002071004              compiler  ../src/fpc/compiler/cgobj.pas:997                internalerror(2002071004);
            2002071003  z80  ../src/fpc/compiler/z80/cgcpu.pas:236                 internalerror(2002071004);
            2002071005  z80  ../src/fpc/compiler/z80/cgcpu.pas:438                       internalerror(2002071004);
            2002071006  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1282                 internalerror(2002071004);
            2002071007  avr  ../src/fpc/compiler/avr/cgcpu.pas:217                 internalerror(2002071004);
            2002071008  avr  ../src/fpc/compiler/avr/cgcpu.pas:305                  internalerror(2002071004);
2002072402              compiler  ../src/fpc/compiler/ncgadd.pas:627          internalerror(2002072402);
            2002072401  powerpc64  ../src/fpc/compiler/powerpc64/nppcadd.pas:172          internalerror(2002072402);
            2002072403  powerpc  ../src/fpc/compiler/powerpc/nppcadd.pas:607                 internalerror(2002072402);
2002072701              compiler  ../src/fpc/compiler/ncgadd.pas:291              internalerror(2002072701);
            2002072702  ppcgen  ../src/fpc/compiler/ppcgen/ngppcadd.pas:553              internalerror(2002072701);
2002072705              compiler  ../src/fpc/compiler/ncgadd.pas:518              internalerror(2002072705);
            2002072703  powerpc  ../src/fpc/compiler/powerpc/nppcadd.pas:314              internalerror(2002072705);
                    IF     defined(cpu64bitalu) or defined(cpuhighleveltarget)
2002072803              compiler  ../src/fpc/compiler/ncgadd.pas:564              internalerror(2002072803);
                    IF NOT defined(cpu64bitalu) or defined(cpuhighleveltarget)
            2002072804  compiler  ../src/fpc/compiler/ncgadd.pas:610              internalerror(2002072803);
            2002072805  powerpc  ../src/fpc/compiler/powerpc/nppcadd.pas:486                  internalerror(2002072803);
2002080202              compiler  ../src/fpc/compiler/nadd.pas:583                   internalerror(2002080202);
            2002080201  i8086  ../src/fpc/compiler/i8086/n8086add.pas:109                  internalerror(2002080202);
2002080203              compiler  ../src/fpc/compiler/nadd.pas:593                   internalerror(2002080203);
            2002080204  i8086  ../src/fpc/compiler/i8086/n8086add.pas:119                  internalerror(2002080203);
2002081302              compiler  ../src/fpc/compiler/cgobj.pas:1388              internalerror(2002081302);
            2002081303  compiler  ../src/fpc/compiler/cgobj.pas:1467               internalerror(2002081302);
2002081701              m68k  ../src/fpc/compiler/m68k/cgcpu.pas:2433              internalerror(2002081701);
            2002081703  m68k  ../src/fpc/compiler/m68k/cgcpu.pas:2580              internalerror(2002081701);
2002081702              m68k  ../src/fpc/compiler/m68k/cgcpu.pas:2436              internalerror(2002081702);
            2002081704  m68k  ../src/fpc/compiler/m68k/cgcpu.pas:2583              internalerror(2002081702);
2002090902              powerpc64  ../src/fpc/compiler/powerpc64/cgcpu.pas:470      internalerror(2002090902);
            2002090906  powerpc  ../src/fpc/compiler/powerpc/cgcpu.pas:243              internalerror(2002090902);
            2002090907  arm  ../src/fpc/compiler/arm/cgcpu.pas:332              internalerror(2002090902);
            2002090908  arm  ../src/fpc/compiler/arm/cgcpu.pas:3979              internalerror(2002090902);
            2002090909  arm  ../src/fpc/compiler/arm/cgcpu.pas:4387              internalerror(2002090902);
2002090904              riscv  ../src/fpc/compiler/riscv/cgrv.pas:496            internalerror(2002090904);
            2002090910  powerpc64  ../src/fpc/compiler/powerpc64/cgcpu.pas:512      internalerror(2002090904);
            2002090911  ppcgen  ../src/fpc/compiler/ppcgen/cgppc.pas:539          internalerror(2002090904);
2003031801              x86  ../src/fpc/compiler/x86/cpubase.pas:509                else internalerror(2003031801);
            2003031802  x86  ../src/fpc/compiler/x86/cpubase.pas:512              internalerror(2003031801);
                    IF     support_mmx
2003042214              x86  ../src/fpc/compiler/x86/nx86add.pas:751              internalerror(2003042214);
            2003042203  x86  ../src/fpc/compiler/x86/nx86add.pas:1348              internalerror(2003042214);
                    IF NOT i8086
2003042215              x86  ../src/fpc/compiler/x86/nx86add.pas:553              internalerror(2003042215);
            2003042204  x86  ../src/fpc/compiler/x86/nx86add.pas:637              internalerror(2003042215);
2003083101              arm  ../src/fpc/compiler/arm/cgcpu.pas:3566                internalerror(2003083101);
            2003083102  arm  ../src/fpc/compiler/arm/cgcpu.pas:3598                  internalerror(2003083101);
            2003083104  arm  ../src/fpc/compiler/arm/cgcpu.pas:3637                  internalerror(2003083101);
            2003083105  arm  ../src/fpc/compiler/arm/cgcpu.pas:5380              internalerror(2003083101);
            2003083106  arm  ../src/fpc/compiler/arm/cgcpu.pas:5434              internalerror(2003083101);
2003091814              compiler  ../src/fpc/compiler/dbgstabs.pas:1334              internalerror(2003091814);
            2003091805  compiler  ../src/fpc/compiler/dbgstabs.pas:1564                  internalerror(2003091814);
2003112901              powerpc  ../src/fpc/compiler/powerpc/agppcmpw.pas:343                  internalerror(2003112901);
            2003112904  powerpc  ../src/fpc/compiler/powerpc/agppcmpw.pas:366                        internalerror(2003112901);
2003121214              compiler  ../src/fpc/compiler/cgobj.pas:724            internalerror(2003121214);
            2003121204  x86  ../src/fpc/compiler/x86/cgx86.pas:274            internalerror(2003121214);
2003122903              powerpc  ../src/fpc/compiler/powerpc/cgcpu.pas:1080                  internalerror(2003122903);
            2003122904  powerpc  ../src/fpc/compiler/powerpc/cgcpu.pas:1164                internalerror(2003122903);
            2003122905  powerpc  ../src/fpc/compiler/powerpc/cpupi.pas:153                  internalerror(2003122903);
                    IF     extdebug
2004020901              compiler  ../src/fpc/compiler/rgobj.pas:555            InternalError(2004020901);
            2004020902  compiler  ../src/fpc/compiler/rgobj.pas:573            InternalError(2004020901);
                    IF NOT cpu64bitalu
2005101501              compiler  ../src/fpc/compiler/hlcg2ll.pas:1948                      internalerror(2005101501);
            2005101502  compiler  ../src/fpc/compiler/ninl.pas:4112              internalerror(2005101501);
2007020910              ppcgen  ../src/fpc/compiler/ppcgen/ngppcinl.pas:134            internalerror(2007020910);
            2007020901  ppcgen  ../src/fpc/compiler/ppcgen/ngppcinl.pas:179             internalerror(2007020910);
                    IF     x86_64
2007031401              x86  ../src/fpc/compiler/x86/nx86inl.pas:768                     internalerror(2007031401);
                    IF     x86_64
            2007031403  x86  ../src/fpc/compiler/x86/nx86inl.pas:777                     internalerror(2007031401);
                    IF     x86_64
2007031402              x86  ../src/fpc/compiler/x86/nx86inl.pas:724                     internalerror(2007031402);
                    IF     x86_64
            2007031404  x86  ../src/fpc/compiler/x86/nx86inl.pas:733                     internalerror(2007031402);
2007120902              x86  ../src/fpc/compiler/x86/nx86cnv.pas:279                    internalerror(2007120902);
            2007120904  x86  ../src/fpc/compiler/x86/nx86cnv.pas:288                    internalerror(2007120902);
2008030101              compiler  ../src/fpc/compiler/nadd.pas:629                             internalerror(2008030101);
            2008030102  i8086  ../src/fpc/compiler/i8086/n8086add.pas:141                            internalerror(2008030101);
2008042701              x86  ../src/fpc/compiler/x86/aoptx86.pas:2945                          internalerror(2008042701);
            2008042702  x86  ../src/fpc/compiler/x86/aoptx86.pas:5475                  internalerror(2008042701);
2008072801              arm  ../src/fpc/compiler/arm/cgcpu.pas:1083                  internalerror(2008072801);
            2008072804  arm  ../src/fpc/compiler/arm/cgcpu.pas:1092                  internalerror(2008072801);
            2008072805  arm  ../src/fpc/compiler/arm/cgcpu.pas:4148                  internalerror(2008072801);
            2008072806  arm  ../src/fpc/compiler/arm/cgcpu.pas:4777                     internalerror(2008072801);
2008101101              compiler  ../src/fpc/compiler/optvirt.pas:835                   internalerror(2008101101);
            2008101106  compiler  ../src/fpc/compiler/optvirt.pas:858                   internalerror(2008101101);
2009031401              compiler  ../src/fpc/compiler/rautils.pas:1384                internalerror(2009031401);
            2009031403  compiler  ../src/fpc/compiler/dbgdwarf.pas:2555                internalerror(2009031401);
2009111401              arm  ../src/fpc/compiler/arm/narmadd.pas:236                    internalerror(2009111401);
            2009111404  arm  ../src/fpc/compiler/arm/narmadd.pas:263                    internalerror(2009111401);
2009111402              arm  ../src/fpc/compiler/arm/narminl.pas:274              internalerror(2009111402);
            2009111405  arm  ../src/fpc/compiler/arm/narminl.pas:336              internalerror(2009111402);
2009112420              arm  ../src/fpc/compiler/arm/cgcpu.pas:3251            internalerror(2009112420);
            2009112409  arm  ../src/fpc/compiler/arm/cgcpu.pas:3267            internalerror(2009112420);
2009112703              arm  ../src/fpc/compiler/arm/narmcnv.pas:236                  internalerror(2009112703);
            2009112704  arm  ../src/fpc/compiler/arm/narmcnv.pas:251                  internalerror(2009112703);
2009112801              arm  ../src/fpc/compiler/arm/cgcpu.pas:3133                  internalerror(2009112801);
            2009112802  arm  ../src/fpc/compiler/arm/cgcpu.pas:3196                  internalerror(2009112801);
2009112901              arm  ../src/fpc/compiler/arm/cgcpu.pas:3140                  internalerror(2009112901);
            2009112902  arm  ../src/fpc/compiler/arm/cgcpu.pas:3203                  internalerror(2009112901);
2010033001              compiler  ../src/fpc/compiler/ngtcon.pas:1344                            internalerror(2010033001);
            2010033006  compiler  ../src/fpc/compiler/ngtcon.pas:1360                            internalerror(2010033001);
            2010033007  jvm  ../src/fpc/compiler/jvm/njvmtcon.pas:217                     internalerror(2010033001);
2010033002              compiler  ../src/fpc/compiler/ngtcon.pas:1348                        internalerror(2010033002);
            2010033008  compiler  ../src/fpc/compiler/ngtcon.pas:1366                        internalerror(2010033002);
2010033003              compiler  ../src/fpc/compiler/ngtcon.pas:1317                           internalerror(2010033003);
            2010033009  compiler  ../src/fpc/compiler/ngtcon.pas:1324                            internalerror(2010033003);
            2010033010  jvm  ../src/fpc/compiler/jvm/njvmtcon.pas:200                      internalerror(2010033003);
2010052906              compiler  ../src/fpc/compiler/cgobj.pas:1181            internalerror(2010052906);
            2010052901  llvm  ../src/fpc/compiler/llvm/hlcgllvm.pas:273                     internalerror(2010052906);
2010052907              compiler  ../src/fpc/compiler/cgobj.pas:1080                         internalerror(2010052907);
            2010052902  compiler  ../src/fpc/compiler/hlcgobj.pas:1002                         internalerror(2010052907);
2010053101              compiler  ../src/fpc/compiler/cgobj.pas:1155                       internalerror(2010053101);
            2010053103  compiler  ../src/fpc/compiler/hlcgobj.pas:1086                       internalerror(2010053101);
            2010053105  llvm  ../src/fpc/compiler/llvm/hlcgllvm.pas:298                       internalerror(2010053101);
2010053102              compiler  ../src/fpc/compiler/cgobj.pas:1374                    internalerror(2010053102);
            2010053106  compiler  ../src/fpc/compiler/cgobj.pas:1430                           internalerror(2010053102);
2010053111              compiler  ../src/fpc/compiler/cgobj.pas:1170                internalerror(2010053111);
            2010053107  llvm  ../src/fpc/compiler/llvm/hlcgllvm.pas:302                internalerror(2010053111);
2010060102              x86  ../src/fpc/compiler/x86/cgx86.pas:1783                  internalerror(2010060102);
            2010060103  x86  ../src/fpc/compiler/x86/cgx86.pas:1894                  internalerror(2010060102);
                    IF     extdebug
2010112101              compiler  ../src/fpc/compiler/hlcg2ll.pas:629          internalerror(2010112101);
                    IF     extdebug
            2010112103  compiler  ../src/fpc/compiler/hlcg2ll.pas:840          internalerror(2010112101);
2010120415              compiler  ../src/fpc/compiler/hlcgobj.pas:918             internalerror(2010120415);
            2010120417  compiler  ../src/fpc/compiler/hlcgobj.pas:2765            internalerror(2010120415);
2010120429              compiler  ../src/fpc/compiler/hlcgobj.pas:3040            internalerror(2010120429);
            2010120418  compiler  ../src/fpc/compiler/hlcgobj.pas:3072            internalerror(2010120429);
2010120538              jvm  ../src/fpc/compiler/jvm/hlcgcpu.pas:830                    internalerror(2010120538);
            2010120505  jvm  ../src/fpc/compiler/jvm/hlcgcpu.pas:846              internalerror(2010120538);
2011010213              compiler  ../src/fpc/compiler/hlcgobj.pas:5358            internalerror(2011010213);
            2011010202  jvm  ../src/fpc/compiler/jvm/hlcgcpu.pas:1621                internalerror(2011010213);
2011010412              compiler  ../src/fpc/compiler/ncgadd.pas:202              internalerror(2011010412);
            2011010403  compiler  ../src/fpc/compiler/ncgadd.pas:213              internalerror(2011010412);
2011012205              jvm  ../src/fpc/compiler/jvm/njvminl.pas:761            internalerror(2011012205);
            2011012201  jvm  ../src/fpc/compiler/jvm/jvmdef.pas:452            internalerror(2011012205);
2011012206              jvm  ../src/fpc/compiler/jvm/njvminl.pas:134                internalerror(2011012206);
            2011012203  jvm  ../src/fpc/compiler/jvm/jvmdef.pas:466                  internalerror(2011012206);
2011021307              z80  ../src/fpc/compiler/z80/cgcpu.pas:1505             internalerror(2011021307);
            2011021301  z80  ../src/fpc/compiler/z80/cgcpu.pas:1572             internalerror(2011021307);
            2011021302  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1767            internalerror(2011021307);
            2011021303  avr  ../src/fpc/compiler/avr/cgcpu.pas:1251             internalerror(2011021307);
            2011021304  avr  ../src/fpc/compiler/avr/cgcpu.pas:1472             internalerror(2011021307);
2011021701              z80  ../src/fpc/compiler/z80/agz80asm.pas:104                  internalerror(2011021701)
            2011021704  jvm  ../src/fpc/compiler/jvm/agjasmin.pas:868            internalerror(2011021701);
            2011021705  avr  ../src/fpc/compiler/avr/cgcpu.pas:1101             internalerror(2011021701);
            2011021706  avr  ../src/fpc/compiler/avr/cgcpu.pas:2365             internalerror(2011021701);
            2011021707  avr  ../src/fpc/compiler/avr/agavrgas.pas:96                  internalerror(2011021701)
2011030901              avr  ../src/fpc/compiler/avr/cgcpu.pas:750                     internalerror(2011030901);
            2011030903  avr  ../src/fpc/compiler/avr/cgcpu.pas:958                             internalerror(2011030901);
2011030902              avr  ../src/fpc/compiler/avr/cgcpu.pas:766                             internalerror(2011030902);
            2011030904  avr  ../src/fpc/compiler/avr/cgcpu.pas:974                                     internalerror(2011030902);
2011031501              compiler  ../src/fpc/compiler/symdef.pas:1721                    Internalerror(2011031501);
            2011031502  jvm  ../src/fpc/compiler/jvm/njvmmem.pas:394                internalerror(2011031501);
2011032811              compiler  ../src/fpc/compiler/symcreat.pas:453          internalerror(2011032811);
            2011032804  compiler  ../src/fpc/compiler/symcreat.pas:485          internalerror(2011032811);
2011033001              compiler  ../src/fpc/compiler/ncgrtti.pas:1637                  InternalError(2011033001);
            2011033002  jvm  ../src/fpc/compiler/jvm/hlcgcpu.pas:2432          internalerror(2011033001);
2011041901              jvm  ../src/fpc/compiler/jvm/njvmutil.pas:428          internalerror(2011041901);
            2011041903  jvm  ../src/fpc/compiler/jvm/njvmmem.pas:337                internalerror(2011041901);
2011062402              jvm  ../src/fpc/compiler/jvm/pjvm.pas:266            internalerror(2011062402);
            2011062403  jvm  ../src/fpc/compiler/jvm/pjvm.pas:270            internalerror(2011062402);
            2011062404  jvm  ../src/fpc/compiler/jvm/pjvm.pas:274            internalerror(2011062402);
2011071101              compiler  ../src/fpc/compiler/symdef.pas:3787            internalerror(2011071101);
            2011071102  x86  ../src/fpc/compiler/x86/symx86.pas:112          internalerror(2011071101);
2011072310              x86_64  ../src/fpc/compiler/x86_64/win64unw.pas:266      internalerror(2011072310);
            2011072309  x86_64  ../src/fpc/compiler/x86_64/win64unw.pas:352      InternalError(2011072310);
2011072414              jvm  ../src/fpc/compiler/jvm/njvmcnv.pas:997              internalerror(2011072414);
            2011072401  jvm  ../src/fpc/compiler/jvm/njvmcnv.pas:1024              internalerror(2011072414);
2011072506              jvm  ../src/fpc/compiler/jvm/njvmcnv.pas:705          internalerror(2011072506);
            2011072503  jvm  ../src/fpc/compiler/jvm/njvmmem.pas:266                internalerror(2011072506);
2011081301              compiler  ../src/fpc/compiler/symdef.pas:4149            internalerror(2011081301);
            2011081302  compiler  ../src/fpc/compiler/symdef.pas:7065            internalerror(2011081301);
2011081801              jvm  ../src/fpc/compiler/jvm/hlcgcpu.pas:755                      internalerror(2011081801);
            2011081802  jvm  ../src/fpc/compiler/jvm/hlcgcpu.pas:759                internalerror(2011081801);
                    IF NOT cpufpemu
2011092401              compiler  ../src/fpc/compiler/ninl.pas:4261          internalerror(2011092401);
            2011092402  jvm  ../src/fpc/compiler/jvm/pjvm.pas:420                internalerror(2011092401);
2011100201              x86_64  ../src/fpc/compiler/x86_64/rax64att.pas:109            InternalError(2011100201);
            2011100203  x86_64  ../src/fpc/compiler/x86_64/rax64int.pas:103            InternalError(2011100201);
2011122701              powerpc  ../src/fpc/compiler/powerpc/agppcmpw.pas:277                  internalerror(2011122701);
            2011122702  ppcgen  ../src/fpc/compiler/ppcgen/agppcgas.pas:113                    internalerror(2011122701);
2011123101              compiler  ../src/fpc/compiler/ncgflw.pas:904                InternalError(2011123101);
            2011123102  i386  ../src/fpc/compiler/i386/n386flw.pas:212                InternalError(2011123101);
2012010601              compiler  ../src/fpc/compiler/ncgmem.pas:306                internalerror(2012010601);
            2012010603  i8086  ../src/fpc/compiler/i8086/n8086mem.pas:168                   internalerror(2012010601);
2012032101              compiler  ../src/fpc/compiler/dbgbase.pas:639                internalerror(2012032101);
            2012032102  compiler  ../src/fpc/compiler/ninl.pas:489            internalerror(2012032101);
2012051704              compiler  ../src/fpc/compiler/ngtcon.pas:599                               internalerror(2012051704);
            2012051702  compiler  ../src/fpc/compiler/ncgcon.pas:315                                   internalerror(2012051704);
2012061901              compiler  ../src/fpc/compiler/pgenutil.pas:1732          internalerror(2012061901);
            2012061902  x86_64  ../src/fpc/compiler/x86_64/cpuelf.pas:167              InternalError(2012061901);
2012062301              compiler  ../src/fpc/compiler/ogelf.pas:2340                    InternalError(2012062301);
            2012062302  compiler  ../src/fpc/compiler/hlcgobj.pas:4255                internalerror(2012062301);
2012072401              compiler  ../src/fpc/compiler/dbgbase.pas:325                          internalerror(2012072401);
            2012072403  compiler  ../src/fpc/compiler/ogcoff.pas:3362                InternalError(2012072401);
2012082601              compiler  ../src/fpc/compiler/ninl.pas:4918             internalerror(2012082601);
            2012082602  compiler  ../src/fpc/compiler/ncginl.pas:969          internalerror(2012082601);
2012100701              compiler  ../src/fpc/compiler/symcreat.pas:883              internalerror(2012100701);
            2012100703  compiler  ../src/fpc/compiler/ninl.pas:4780                  internalerror(2012100701);
2012100702              compiler  ../src/fpc/compiler/symcreat.pas:919          internalerror(2012100702);
            2012100704  compiler  ../src/fpc/compiler/ninl.pas:4792                internalerror(2012100702);
2012101102              compiler  ../src/fpc/compiler/pgenutil.pas:352                            internalerror(2012101102);
            2012101103  x86_64  ../src/fpc/compiler/x86_64/cpuelf.pas:580              InternalError(2012101102);
2012103001              compiler  ../src/fpc/compiler/ognlm.pas:540                    InternalError(2012103001);
            2012103002  compiler  ../src/fpc/compiler/ogbase.pas:3688                    InternalError(2012103001);
2012120901              compiler  ../src/fpc/compiler/ncgld.pas:308                 internalerror(2012120901);
            2012120902  i8086  ../src/fpc/compiler/i8086/n8086ld.pas:137                internalerror(2012120901);
2013030210              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1776                internalerror(2013030210);
            2013030203  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1922                    internalerror(2013030210);
2013030211              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1884              internalerror(2013030211);
            2013030204  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2019                  internalerror(2013030211);
2013030212              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1808                  internalerror(2013030212);
            2013030205  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1958                      internalerror(2013030212);
2013030213              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1881                  internalerror(2013030213);
            2013030206  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2016                      internalerror(2013030213);
2013030901              compiler  ../src/fpc/compiler/defcmp.pas:343                 internalerror(2013030901);
            2013030905  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1054                  internalerror(2013030901);
2013030902              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:923            internalerror(2013030902);
            2013030906  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1072            internalerror(2013030902);
2013030903              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:489                                internalerror(2013030903);
            2013030907  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:525                                    internalerror(2013030903);
            2013030908  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:994                        internalerror(2013030903);
            2013030909  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1183                        internalerror(2013030903);
2013031101              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1295                    internalerror(2013031101);
            2013031103  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1299                        internalerror(2013031101);
            2013031104  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1304                        internalerror(2013031101);
            2013031105  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1306                        internalerror(2013031101);
            2013031106  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1308                        internalerror(2013031101);
            2013031107  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1357                    internalerror(2013031101);
            2013031108  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1361                        internalerror(2013031101);
            2013031109  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1366                        internalerror(2013031101);
            2013031110  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1368                        internalerror(2013031101);
            2013031111  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1370                        internalerror(2013031101);
            2013031112  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1373                    internalerror(2013031101);
                    IF NOT defined(cpu64bitalu) or defined(cpu32bitalu)
2013031301              compiler  ../src/fpc/compiler/nmat.pas:826                       internalerror(2013031301);
                    IF NOT defined(cpu64bitalu) or defined(cpu32bitalu)
            2013031302  compiler  ../src/fpc/compiler/nmat.pas:836                       internalerror(2013031301);
                    IF     cpuneedsdivhelper
2013031701              compiler  ../src/fpc/compiler/nmat.pas:461            internalerror(2013031701);
                    IF     cpuneedsdivhelper
            2013031702  compiler  ../src/fpc/compiler/nmat.pas:463            internalerror(2013031701);
2013032604              compiler  ../src/fpc/compiler/ninl.pas:229                internalerror(2013032604);
            2013032606  compiler  ../src/fpc/compiler/ninl.pas:1503                internalerror(2013032604);
            2013032607  compiler  ../src/fpc/compiler/ninl.pas:1512                internalerror(2013032604);
2013032605              compiler  ../src/fpc/compiler/ninl.pas:239        internalerror(2013032605);
            2013032608  compiler  ../src/fpc/compiler/ninl.pas:1515        internalerror(2013032605);
2013050803              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1111            internalerror(2013050803);
            2013050805  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1218            internalerror(2013050803);
2013053101              compiler  ../src/fpc/compiler/fpcp.pas:438          internalerror(2013053101);
                    IF NOT defined(i8086)
            2013053105  compiler  ../src/fpc/compiler/pexpr.pas:2236                                 internalerror(2013053101);
2013060103              compiler  ../src/fpc/compiler/defutil.pas:1614                          internalerror(2013060103);
            2013060104  mips  ../src/fpc/compiler/mips/cgcpu.pas:633          InternalError(2013060103);
2013060223              llvm  ../src/fpc/compiler/llvm/hlcgllvm.pas:1731        internalerror(2013060223);
            2013060202  llvm  ../src/fpc/compiler/llvm/agllvm.pas:457                   internalerror(2013060223);
2013060225              llvm  ../src/fpc/compiler/llvm/hlcgllvm.pas:1911        internalerror(2013060225);
            2013060203  llvm  ../src/fpc/compiler/llvm/agllvm.pas:310              internalerror(2013060225);
2013092801              compiler  ../src/fpc/compiler/options.pas:3951        InternalError(2013092801);
            2013092802  compiler  ../src/fpc/compiler/options.pas:3954        InternalError(2013092801);
2013100701              m68k  ../src/fpc/compiler/m68k/hlcgcpu.pas:187            Internalerror(2013100701);
            2013100704  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:264                            InternalError(2013100701);
            2013100705  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:277                            InternalError(2013100701);
            2013100706  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:292                            InternalError(2013100701);
            2013100707  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:305                            InternalError(2013100701);
            2013100708  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:804                            InternalError(2013100701);
            2013100709  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:817                            InternalError(2013100701);
            2013100710  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:833                            InternalError(2013100701);
            2013100711  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:846                            InternalError(2013100701);
2013102301              compiler  ../src/fpc/compiler/defcmp.pas:2462            internalerror(2013102301);
            2013102305  compiler  ../src/fpc/compiler/hlcgobj.pas:5384                      internalerror(2013102301);
2013102701              compiler  ../src/fpc/compiler/ncon.pas:415               internalerror(2013102701);
            2013102704  x86  ../src/fpc/compiler/x86/nx86mat.pas:675                    internalerror(2013102701);
2013110105              llvm  ../src/fpc/compiler/llvm/aasmllvm.pas:644                    internalerror(2013110105);
            2013110111  llvm  ../src/fpc/compiler/llvm/aasmllvm.pas:674                    internalerror(2013110105);
2013120102              compiler  ../src/fpc/compiler/ncgmat.pas:504               internalerror(2013120102);
            2013120109  avr  ../src/fpc/compiler/avr/navrmat.pas:169              internalerror(2013120102);
2013120104              compiler  ../src/fpc/compiler/ncgadd.pas:710              internalerror(2013120104);
            2013120111  m68k  ../src/fpc/compiler/m68k/n68kadd.pas:413              internalerror(2013120104);
2013120112              powerpc64  ../src/fpc/compiler/powerpc64/nppcadd.pas:248                internalerror(2013120112);
            2013120113  powerpc64  ../src/fpc/compiler/powerpc64/nppcmat.pas:354         internalerror(2013120112);
2013122302              compiler  ../src/fpc/compiler/nmat.pas:716                      internalerror(2013122302);
            2013122303  compiler  ../src/fpc/compiler/ninl.pas:2085                          internalerror(2013122302);
            2013122304  compiler  ../src/fpc/compiler/ninl.pas:2183                          internalerror(2013122302);
2013123101              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2236                  internalerror(2013123101);
            2013123102  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2279                  internalerror(2013123101);
            2013123103  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2300                  internalerror(2013123101);
2014010305              compiler  ../src/fpc/compiler/symdef.pas:5925            internalerror(2014010305);
            2014010321  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2179              internalerror(2014010305);
2014010306              compiler  ../src/fpc/compiler/symdef.pas:5933            internalerror(2014010306);
            2014010322  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:2207              internalerror(2014010306);
2014011101              z80  ../src/fpc/compiler/z80/cgcpu.pas:295                internalerror(2014011101);
            2014011104  z80  ../src/fpc/compiler/z80/cgcpu.pas:372            internalerror(2014011101);
            2014011106  avr  ../src/fpc/compiler/avr/cgcpu.pas:227            internalerror(2014011101);
            2014011107  avr  ../src/fpc/compiler/avr/cgcpu.pas:271            internalerror(2014011101);
2014011604              i386  ../src/fpc/compiler/i386/n386add.pas:618          InternalError(2014011604);
            2014011601  i386  ../src/fpc/compiler/i386/n386add.pas:625          InternalError(2014011604);
2014020701              compiler  ../src/fpc/compiler/node.pas:1791      internalerror(2014020701);
            2014020707  arm  ../src/fpc/compiler/arm/cgcpu.pas:1213                internalerror(2014020701);
2014032401              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1500                        internalerror(2014032401);
            2014032404  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1504                            internalerror(2014032401);
            2014032405  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1509                            internalerror(2014032401);
            2014032406  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1511                            internalerror(2014032401);
            2014032407  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1513                            internalerror(2014032401);
            2014032408  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:1516                        internalerror(2014032401);
2014033101              compiler  ../src/fpc/compiler/ncgmat.pas:244            internalerror(2014033101);
            2014033102  xtensa  ../src/fpc/compiler/xtensa/ncpumat.pas:244                internalerror(2014033101);
            2014033103  arm  ../src/fpc/compiler/arm/narmmat.pas:423                  internalerror(2014033101);
2014040601              compiler  ../src/fpc/compiler/nmem.pas:1274              internalerror(2014040601);
            2014040608  i8086  ../src/fpc/compiler/i8086/n8086add.pas:459            internalerror(2014040601);
                    IF NOT i8086
2014041301              x86  ../src/fpc/compiler/x86/nx86inl.pas:1245                       internalerror(2014041301);
            2014041302  x86  ../src/fpc/compiler/x86/cpubase.pas:594            InternalError(2014041301);
            2014041303  i8086  ../src/fpc/compiler/i8086/symcpu.pas:253        internalerror(2014041301);
2014050604              compiler  ../src/fpc/compiler/assemble.pas:1108                  internalerror(2014050604);
            2014050601  z80  ../src/fpc/compiler/z80/agsdasz80.pas:158                  internalerror(2014050604);
            2014050602  z80  ../src/fpc/compiler/z80/agz80vasm.pas:159                  internalerror(2014050604);
            2014050603  llvm  ../src/fpc/compiler/llvm/agllvm.pas:886                  internalerror(2014050604);
            2014050606  x86  ../src/fpc/compiler/x86/agx86int.pas:688                     internalerror(2014050604);
                    IF     arm
2014050605              compiler  ../src/fpc/compiler/assemble.pas:1177                internalerror(2014050605);
                    IF     arm
            2014050607  z80  ../src/fpc/compiler/z80/agsdasz80.pas:227                internalerror(2014050605);
                    IF     arm
            2014050609  z80  ../src/fpc/compiler/z80/agz80vasm.pas:228                internalerror(2014050605);
2014051001              compiler  ../src/fpc/compiler/assemble.pas:1155              internalerror(2014051001);
            2014051002  z80  ../src/fpc/compiler/z80/agsdasz80.pas:205              internalerror(2014051001);
            2014051003  z80  ../src/fpc/compiler/z80/agz80vasm.pas:206              internalerror(2014051001);
2014062203              llvm  ../src/fpc/compiler/llvm/nllvmtcon.pas:667            internalerror(2014062203);
            2014062202  llvm  ../src/fpc/compiler/llvm/llvmdef.pas:227                        internalerror(2014062203);
2014110704              aarch64  ../src/fpc/compiler/aarch64/aasmcpu.pas:706                  internalerror(2014110704);
            2014110702  aarch64  ../src/fpc/compiler/aarch64/cgcpu.pas:277                  internalerror(2014110704);
2014110901              compiler  ../src/fpc/compiler/fpcp.pas:375            internalerror(2014110901);
            2014110903  aarch64  ../src/fpc/compiler/aarch64/cgcpu.pas:304                  internalerror(2014110901);
2014121506              aarch64  ../src/fpc/compiler/aarch64/agcpugas.pas:647                          internalerror(2014121506);
            2014121502  aarch64  ../src/fpc/compiler/aarch64/agcpugas.pas:653                        internalerror(2014121506);
2015030701              llvm  ../src/fpc/compiler/llvm/nllvmtcon.pas:429              internalerror(2015030701);
            2015030703  llvm  ../src/fpc/compiler/llvm/nllvmtcon.pas:472              internalerror(2015030701);
2015031502              compiler  ../src/fpc/compiler/aasmcnst.pas:1725               internalerror(2015031502);
            2015031503  m68k  ../src/fpc/compiler/m68k/cgcpu.pas:2215                      internalerror(2015031502);
2015032101              compiler  ../src/fpc/compiler/aasmcnst.pas:1305               internalerror(2015032101);
            2015032102  compiler  ../src/fpc/compiler/aasmcnst.pas:1315           internalerror(2015032101);
2015033102              compiler  ../src/fpc/compiler/omfbase.pas:1425          internalerror(2015033102);
            2015033106  compiler  ../src/fpc/compiler/omfbase.pas:1453              internalerror(2015033102);
            2015033107  compiler  ../src/fpc/compiler/omfbase.pas:1460              internalerror(2015033102);
2015033103              compiler  ../src/fpc/compiler/omfbase.pas:1409          internalerror(2015033103);
            2015033108  compiler  ../src/fpc/compiler/omfbase.pas:1435          internalerror(2015033103);
            2015033109  compiler  ../src/fpc/compiler/omfbase.pas:1441          internalerror(2015033103);
2015040301              compiler  ../src/fpc/compiler/omfbase.pas:1533          internalerror(2015040301);
            2015040304  compiler  ../src/fpc/compiler/omfbase.pas:1578          internalerror(2015040301);
            2015040308  compiler  ../src/fpc/compiler/omfbase.pas:1759          internalerror(2015040301);
            2015040309  compiler  ../src/fpc/compiler/omfbase.pas:1805          internalerror(2015040301);
            2015040310  compiler  ../src/fpc/compiler/omfbase.pas:1925          internalerror(2015040301);
            2015040311  compiler  ../src/fpc/compiler/omfbase.pas:1984          internalerror(2015040301);
            2015040312  compiler  ../src/fpc/compiler/omfbase.pas:2132          internalerror(2015040301);
            2015040313  compiler  ../src/fpc/compiler/omfbase.pas:2184          internalerror(2015040301);
            2015040314  compiler  ../src/fpc/compiler/omfbase.pas:2840          internalerror(2015040301);
            2015040315  compiler  ../src/fpc/compiler/omfbase.pas:2884          internalerror(2015040301);
            2015040316  compiler  ../src/fpc/compiler/ogomf.pas:2164              internalerror(2015040301);
2015040305              compiler  ../src/fpc/compiler/omfbase.pas:1812          internalerror(2015040305);
            2015040317  compiler  ../src/fpc/compiler/omfbase.pas:1823              internalerror(2015040305);
            2015040318  compiler  ../src/fpc/compiler/omfbase.pas:2188          internalerror(2015040305);
            2015040319  compiler  ../src/fpc/compiler/omfbase.pas:2212                  internalerror(2015040305);
            2015040320  compiler  ../src/fpc/compiler/omfbase.pas:2255                  internalerror(2015040305);
            2015040321  compiler  ../src/fpc/compiler/omfbase.pas:2261                      internalerror(2015040305);
            2015040322  compiler  ../src/fpc/compiler/omfbase.pas:2269                      internalerror(2015040305);
2015040306              compiler  ../src/fpc/compiler/omfbase.pas:1843                internalerror(2015040306);
            2015040323  compiler  ../src/fpc/compiler/omfbase.pas:1853                internalerror(2015040306);
2015040401              compiler  ../src/fpc/compiler/omfbase.pas:1948              internalerror(2015040401);
            2015040402  llvm  ../src/fpc/compiler/llvm/llvmpara.pas:78          InternalError(2015040401);
2015040502              compiler  ../src/fpc/compiler/omfbase.pas:2319                          internalerror(2015040502);
            2015040506  compiler  ../src/fpc/compiler/omfbase.pas:2343                      internalerror(2015040502);
            2015040507  compiler  ../src/fpc/compiler/omfbase.pas:2784                  internalerror(2015040502);
2015040504              compiler  ../src/fpc/compiler/omfbase.pas:2234                          internalerror(2015040504);
            2015040508  compiler  ../src/fpc/compiler/omfbase.pas:2244                          internalerror(2015040504);
            2015040509  compiler  ../src/fpc/compiler/omfbase.pas:2681          internalerror(2015040504);
            2015040510  compiler  ../src/fpc/compiler/omfbase.pas:2721                  internalerror(2015040504);
            2015040511  compiler  ../src/fpc/compiler/omfbase.pas:2731                  internalerror(2015040504);
            2015040512  compiler  ../src/fpc/compiler/ogomf.pas:2106                      internalerror(2015040504);
            2015040513  compiler  ../src/fpc/compiler/ogomf.pas:2116                      internalerror(2015040504);
2015041401              compiler  ../src/fpc/compiler/omfbase.pas:1993              internalerror(2015041401);
            2015041405  compiler  ../src/fpc/compiler/omfbase.pas:2006                  internalerror(2015041401);
            2015041407  compiler  ../src/fpc/compiler/omfbase.pas:2014                  internalerror(2015041401);
            2015041408  compiler  ../src/fpc/compiler/ogomf.pas:910                internalerror(2015041401);
            2015041409  compiler  ../src/fpc/compiler/ogomf.pas:956                internalerror(2015041401);
            2015041410  compiler  ../src/fpc/compiler/ogomf.pas:979                internalerror(2015041401);
2015041402              compiler  ../src/fpc/compiler/omfbase.pas:2222                  internalerror(2015041402);
            2015041411  compiler  ../src/fpc/compiler/omfbase.pas:2296                  internalerror(2015041402);
2015041501              compiler  ../src/fpc/compiler/ogomf.pas:902                internalerror(2015041501);
            2015041505  compiler  ../src/fpc/compiler/ogomf.pas:948                internalerror(2015041501);
            2015041506  compiler  ../src/fpc/compiler/ogomf.pas:971                internalerror(2015041501);
2015041502              compiler  ../src/fpc/compiler/ogomf.pas:1184                internalerror(2015041502);
            2015041507  compiler  ../src/fpc/compiler/ogomf.pas:1193                internalerror(2015041502);
2015041802              compiler  ../src/fpc/compiler/omfbase.pas:2831          internalerror(2015041802);
            2015041803  compiler  ../src/fpc/compiler/omfbase.pas:2833          internalerror(2015041802);
2015082201              compiler  ../src/fpc/compiler/ogomf.pas:2873            internalerror(2015082201);
            2015082202  compiler  ../src/fpc/compiler/ogomf.pas:2915            internalerror(2015082201);
2015092701              compiler  ../src/fpc/compiler/pexpr.pas:4212                internalerror(2015092701);
            2015092705  systems  ../src/fpc/compiler/systems/t_win16.pas:205              internalerror(2015092701);
2015100301              compiler  ../src/fpc/compiler/dbgdwarf.pas:3440            internalerror(2015100301);
            2015100302  compiler  ../src/fpc/compiler/pkgutil.pas:535          internalerror(2015100301);
2015102505              compiler  ../src/fpc/compiler/symtype.pas:360                internalerror(2015102505);
            2015102501  compiler  ../src/fpc/compiler/symtype.pas:780                   Internalerror(2015102505);
2015103001              compiler  ../src/fpc/compiler/fpcp.pas:399            internalerror(2015103001);
            2015103003  i8086  ../src/fpc/compiler/i8086/n8086mem.pas:99                internalerror(2015103001);
2015111201              compiler  ../src/fpc/compiler/ogbase.pas:912            internalerror(2015111201);
            2015111204  i8086  ../src/fpc/compiler/i8086/hlcgcpu.pas:426          internalerror(2015111201)
2016090201              compiler  ../src/fpc/compiler/pdecsub.pas:2177                    internalerror(2016090201);
            2016090204  compiler  ../src/fpc/compiler/symtype.pas:786               internalerror(2016090201);
2016090202              compiler  ../src/fpc/compiler/pdecsub.pas:1328                    internalerror(2016090202);
            2016090205  compiler  ../src/fpc/compiler/ncgcal.pas:507                internalerror(2016090202);
2016100301              compiler  ../src/fpc/compiler/psystem.pas:218              Internalerror(2016100301);
            2016100302  m68k  ../src/fpc/compiler/m68k/n68kcal.pas:84                  internalerror(2016100301);
2016101501              compiler  ../src/fpc/compiler/aoptobj.pas:1433                          internalerror(2016101501);
            2016101502  compiler  ../src/fpc/compiler/ninl.pas:611                  internalerror(2016101501);
                    IF     genericdef_for_nested
2016121701              compiler  ../src/fpc/compiler/psub.pas:2759                     internalerror(2016121701);
            2016121704  compiler  ../src/fpc/compiler/symdef.pas:5981            internalerror(2016121701);
                    IF     genericdef_for_nested
2016121702              compiler  ../src/fpc/compiler/psub.pas:2762                     internalerror(2016121702);
            2016121705  compiler  ../src/fpc/compiler/symdef.pas:5989            internalerror(2016121702);
                    IF     genericdef_for_nested
2016121703              compiler  ../src/fpc/compiler/psub.pas:2779                     internalerror(2016121703);
            2016121706  llvm  ../src/fpc/compiler/llvm/llvmpi.pas:411            internalerror(2016121703);
2017032901              compiler  ../src/fpc/compiler/optloadmodifystore.pas:108                      internalerror(2017032901);
            2017032903  compiler  ../src/fpc/compiler/optloadmodifystore.pas:164                      internalerror(2017032901);
2017040301              i8086  ../src/fpc/compiler/i8086/cgcpu.pas:412                                internalerror(2017040301);
            2017040302  i8086  ../src/fpc/compiler/i8086/cgcpu.pas:453                                internalerror(2017040301);
2017041201              i386  ../src/fpc/compiler/i386/cgcpu.pas:963                          internalerror(2017041201);
            2017041202  i386  ../src/fpc/compiler/i386/cgcpu.pas:983                          internalerror(2017041201);
            2017041203  i386  ../src/fpc/compiler/i386/cgcpu.pas:1133                          internalerror(2017041201);
2017041801              i386  ../src/fpc/compiler/i386/cgcpu.pas:767                    internalerror(2017041801);
            2017041802  i386  ../src/fpc/compiler/i386/cgcpu.pas:860                    internalerror(2017041801);
            2017041803  i386  ../src/fpc/compiler/i386/cgcpu.pas:1089                          internalerror(2017041801);
2017042401              compiler  ../src/fpc/compiler/ninl.pas:2780                            internalerror(2017042401);
            2017042402  compiler  ../src/fpc/compiler/ninl.pas:2798                            internalerror(2017042401);
2017050101              compiler  ../src/fpc/compiler/ninl.pas:2261                    internalerror(2017050101);
            2017050103  compiler  ../src/fpc/compiler/ncnv.pas:2045                internalerror(2017050101);
                    IF     enable_shl_shr_assign_x_y
2017051201              compiler  ../src/fpc/compiler/optloadmodifystore.pas:299                      internalerror(2017051201);
                    IF     enable_shl_shr_assign_x_y
            2017051202  compiler  ../src/fpc/compiler/optloadmodifystore.pas:346                      internalerror(2017051201);
                    IF     defined(enable_sar_assign_x_y) or defined(enable_rox_assign_x_y)
2017071701              compiler  ../src/fpc/compiler/optloadmodifystore.pas:393                      internalerror(2017071701);
                    IF     defined(enable_sar_assign_x_y) or defined(enable_rox_assign_x_y)
            2017071702  compiler  ../src/fpc/compiler/optloadmodifystore.pas:489                      internalerror(2017071701);
                    IF NOT sparc
2017090901              sparcgen  ../src/fpc/compiler/sparcgen/rgcpu.pas:125                Internalerror(2017090901);
                    IF NOT sparc
            2017090902  sparcgen  ../src/fpc/compiler/sparcgen/rgcpu.pas:172                Internalerror(2017090901);
                    IF NOT defined(cpuextended) and defined(fpc_has_type_extended)
                    IF     fpc_soft_fpux80
2017091901              compiler  ../src/fpc/compiler/assemble.pas:1100       	         internalerror(2017091901);
                    IF NOT defined(cpuextended) and defined(fpc_has_type_extended)
                    IF     fpc_soft_fpux80
            2017091902  compiler  ../src/fpc/compiler/assemble.pas:1143  	        internalerror(2017091901);
                    IF NOT defined(cpuextended) and defined(fpc_has_type_extended)
                    IF     fpc_soft_fpux80
            2017091903  compiler  ../src/fpc/compiler/assemble.pas:2065  			 internalerror(2017091901);
                    IF NOT defined(cpuextended) and defined(fpc_has_type_extended)
                    IF     fpc_soft_fpux80
            2017091904  z80  ../src/fpc/compiler/z80/agsdasz80.pas:150       	         internalerror(2017091901);
                    IF NOT defined(cpuextended) and defined(fpc_has_type_extended)
                    IF     fpc_soft_fpux80
            2017091905  z80  ../src/fpc/compiler/z80/agsdasz80.pas:193  	        internalerror(2017091901);
                    IF NOT defined(cpuextended) and defined(fpc_has_type_extended)
                    IF     fpc_soft_fpux80
            2017091906  z80  ../src/fpc/compiler/z80/agz80vasm.pas:151                    internalerror(2017091901);
                    IF NOT defined(cpuextended) and defined(fpc_has_type_extended)
                    IF     fpc_soft_fpux80
            2017091907  z80  ../src/fpc/compiler/z80/agz80vasm.pas:194                  internalerror(2017091901);
2018021501              compiler  ../src/fpc/compiler/paramgr.pas:231            internalerror(2018021501);
            2018021502  i8086  ../src/fpc/compiler/i8086/cpupara.pas:123            internalerror(2018021501);
2018061401              compiler  ../src/fpc/compiler/ogomf.pas:3754              internalerror(2018061401);
            2018061402  x86  ../src/fpc/compiler/x86/aoptx86.pas:3790                    InternalError(2018061401);
2019011902              llvm  ../src/fpc/compiler/llvm/llvmpara.pas:129                  internalerror(2019011902);
            2019011901  llvm  ../src/fpc/compiler/llvm/llvmpara.pas:259              internalerror(2019011902);
2019012601              arm  ../src/fpc/compiler/arm/narmmat.pas:187               internalerror(2019012601);
            2019012602  arm  ../src/fpc/compiler/arm/agarmgas.pas:241                         Internalerror(2019012601);
2019050110              llvm  ../src/fpc/compiler/llvm/agllvm.pas:1373                  internalerror(2019050110);
            2019050101  llvm  ../src/fpc/compiler/llvm/agllvm.pas:1381                  internalerror(2019050110);
2019050516              compiler  ../src/fpc/compiler/nset.pas:243                internalerror(2019050516);
            2019050501  compiler  ../src/fpc/compiler/ninl.pas:1130                internalerror(2019050516);
2019050532              compiler  ../src/fpc/compiler/pdecobj.pas:770                  internalerror(2019050532);
            2019050502  compiler  ../src/fpc/compiler/pexports.pas:242                      internalerror(2019050532);
2019050901              i386  ../src/fpc/compiler/i386/cgcpu.pas:527              internalerror(2019050901);
            2019050903  i386  ../src/fpc/compiler/i386/cgcpu.pas:1052                          internalerror(2019050901);
2019050926              arm  ../src/fpc/compiler/arm/aasmcpu.pas:4711                    internalerror(2019050926);
            2019050908  arm  ../src/fpc/compiler/arm/cgcpu.pas:2190                  internalerror(2019050926);
2019050934              systems  ../src/fpc/compiler/systems/t_nds.pas:811       internalerror(2019050934);
            2019050909  arm  ../src/fpc/compiler/arm/narmcnv.pas:263              internalerror(2019050934);
2019050947              powerpc  ../src/fpc/compiler/powerpc/nppcadd.pas:230                  internalerror(2019050947);
            2019050913  powerpc  ../src/fpc/compiler/powerpc/nppcmat.pas:480                    internalerror(2019050947);
2019052901              compiler  ../src/fpc/compiler/hlcgobj.pas:1584              internalerror(2019052901);
            2019052902  compiler  ../src/fpc/compiler/hlcgobj.pas:1647              internalerror(2019052901);
2019081001              compiler  ../src/fpc/compiler/ogomf.pas:4661                        internalerror(2019081001);
            2019081010  x86  ../src/fpc/compiler/x86/rax86.pas:640                             else Internalerror(2019081001);
2019081002              compiler  ../src/fpc/compiler/ogomf.pas:4132            internalerror(2019081002);
            2019081011  compiler  ../src/fpc/compiler/ogomf.pas:4168            internalerror(2019081002);
            2019081012  x86  ../src/fpc/compiler/x86/rax86.pas:688                      else Internalerror(2019081002);
2019081003              compiler  ../src/fpc/compiler/ogomf.pas:4244            internalerror(2019081003);
            2019081013  x86  ../src/fpc/compiler/x86/aasmcpu.pas:2151                    Internalerror(2019081003);
2019081004              compiler  ../src/fpc/compiler/ogomf.pas:4690                    internalerror(2019081004);
            2019081014  x86  ../src/fpc/compiler/x86/aasmcpu.pas:3867                          Internalerror(2019081004);
2019081005              compiler  ../src/fpc/compiler/ogomf.pas:4693                    internalerror(2019081005);
            2019081015  x86  ../src/fpc/compiler/x86/rax86.pas:521                  Internalerror(2019081005);
            2019081016  x86  ../src/fpc/compiler/x86/rax86.pas:715                Internalerror(2019081005);
2019081006              compiler  ../src/fpc/compiler/ogomf.pas:4698                    internalerror(2019081006);
            2019081017  x86  ../src/fpc/compiler/x86/rax86.pas:831                          Internalerror(2019081006);
2019081007              compiler  ../src/fpc/compiler/ogomf.pas:4726                    internalerror(2019081007);
            2019081018  x86  ../src/fpc/compiler/x86/rax86.pas:1190                                         Internalerror(2019081007);
2019091701              x86_64  ../src/fpc/compiler/x86_64/cpuelf.pas:180              InternalError(2019091701);
            2019091702  x86_64  ../src/fpc/compiler/x86_64/cpuelf.pas:189              InternalError(2019091701);
2019092802              compiler  ../src/fpc/compiler/assemble.pas:2098                             Internalerror(2019092802);
            2019092803  compiler  ../src/fpc/compiler/assemble.pas:2104                             Internalerror(2019092802);
            2019092806  arm  ../src/fpc/compiler/arm/narmld.pas:160                      Internalerror(2019092802);
                    IF NOT cpu64bitaddr
2019092805              compiler  ../src/fpc/compiler/aggas.pas:1042                         Internalerror(2019092805);
            2019092807  arm  ../src/fpc/compiler/arm/cgcpu.pas:5157                        Internalerror(2019092805);
2019122801              compiler  ../src/fpc/compiler/ncginl.pas:322            Internalerror(2019122801);
            2019122805  llvm  ../src/fpc/compiler/llvm/hlcgllvm.pas:761          internalerror(2019122801);
            2019122809  x86  ../src/fpc/compiler/x86/nx86inl.pas:1377            Internalerror(2019122801);
2019122802              compiler  ../src/fpc/compiler/ninl.pas:4874             Internalerror(2019122802);
            2019122812  llvm  ../src/fpc/compiler/llvm/hlcgllvm.pas:688          internalerror(2019122802);
2020030701              xtensa  ../src/fpc/compiler/xtensa/aasmcpu.pas:482              internalerror(2020030701);
            2020030702  xtensa  ../src/fpc/compiler/xtensa/aasmcpu.pas:495              internalerror(2020030701);
2020030801              xtensa  ../src/fpc/compiler/xtensa/ncpuadd.pas:172              internalerror(2020030801);
            2020030803  xtensa  ../src/fpc/compiler/xtensa/ncpuadd.pas:183              internalerror(2020030801);
            2020030805  xtensa  ../src/fpc/compiler/xtensa/cgcpu.pas:286            internalerror(2020030801);
            2020030806  xtensa  ../src/fpc/compiler/xtensa/cgcpu.pas:907                Internalerror(2020030801);
            2020030807  xtensa  ../src/fpc/compiler/xtensa/cgcpu.pas:923                Internalerror(2020030801);
            2020030808  xtensa  ../src/fpc/compiler/xtensa/cgcpu.pas:938                Internalerror(2020030801);
                    IF     aarch64
2020032202              compiler  ../src/fpc/compiler/ogcoff.pas:1111                        internalerror(2020032202);  { offset overflow }
            2020032204  xtensa  ../src/fpc/compiler/xtensa/cpupara.pas:224                    Internalerror(2020032202);
2020033101              aarch64  ../src/fpc/compiler/aarch64/ncpuflw.pas:183            InternalError(2020033101);
            2020033104  aarch64  ../src/fpc/compiler/aarch64/ncpuflw.pas:358            InternalError(2020033101);
2020040201              z80  ../src/fpc/compiler/z80/agsdasz80.pas:426                          internalerror(2020040201);
            2020040203  z80  ../src/fpc/compiler/z80/agsdasz80.pas:444                          internalerror(2020040201);
            2020040204  z80  ../src/fpc/compiler/z80/agz80vasm.pas:455                          internalerror(2020040201);
            2020040205  z80  ../src/fpc/compiler/z80/agz80vasm.pas:478                          internalerror(2020040201);
2020040202              z80  ../src/fpc/compiler/z80/agsdasz80.pas:432                          internalerror(2020040202);
            2020040206  z80  ../src/fpc/compiler/z80/agsdasz80.pas:451                          internalerror(2020040202);
            2020040207  z80  ../src/fpc/compiler/z80/agz80vasm.pas:461                          internalerror(2020040202);
            2020040208  z80  ../src/fpc/compiler/z80/agz80vasm.pas:485                          internalerror(2020040202);
2020040402              z80  ../src/fpc/compiler/z80/nz80add.pas:262                  internalerror(2020040402);
            2020040403  z80  ../src/fpc/compiler/z80/nz80add.pas:305                  internalerror(2020040402);
2020040903              z80  ../src/fpc/compiler/z80/cgcpu.pas:852                     internalerror(2020040903);
            2020040905  z80  ../src/fpc/compiler/z80/cgcpu.pas:1074                         internalerror(2020040903);
2020040904              z80  ../src/fpc/compiler/z80/cgcpu.pas:867                             internalerror(2020040904);
            2020040906  z80  ../src/fpc/compiler/z80/cgcpu.pas:1089                                 internalerror(2020040904);
2020041101              z80  ../src/fpc/compiler/z80/agsdasz80.pas:393                      internalerror(2020041101);
            2020041102  z80  ../src/fpc/compiler/z80/agz80vasm.pas:429                      internalerror(2020041101);
2020042002              z80  ../src/fpc/compiler/z80/cgcpu.pas:1406                        internalerror(2020042002);
            2020042003  z80  ../src/fpc/compiler/z80/cgcpu.pas:1433                        internalerror(2020042002);
2020042102              z80  ../src/fpc/compiler/z80/nz80add.pas:375                              internalerror(2020042102);
            2020042104  z80  ../src/fpc/compiler/z80/nz80add.pas:403                            internalerror(2020042102);
            2020042105  z80  ../src/fpc/compiler/z80/nz80add.pas:425                            internalerror(2020042102);
2020042103              z80  ../src/fpc/compiler/z80/nz80add.pas:436                  internalerror(2020042103);
            2020042106  z80  ../src/fpc/compiler/z80/nz80add.pas:624                  internalerror(2020042103);
2020042202              z80  ../src/fpc/compiler/z80/nz80add.pas:486                                internalerror(2020042202);
            2020042207  z80  ../src/fpc/compiler/z80/nz80add.pas:497                                internalerror(2020042202);
            2020042210  z80  ../src/fpc/compiler/z80/nz80add.pas:541                              internalerror(2020042202);
            2020042211  z80  ../src/fpc/compiler/z80/nz80add.pas:552                              internalerror(2020042202);
            2020042212  z80  ../src/fpc/compiler/z80/nz80add.pas:590                              internalerror(2020042202);
            2020042213  z80  ../src/fpc/compiler/z80/nz80add.pas:601                              internalerror(2020042202);
            2020042214  xtensa  ../src/fpc/compiler/xtensa/ncpumem.pas:76                 Internalerror(2020042202);
2020042203              z80  ../src/fpc/compiler/z80/nz80add.pas:510                                internalerror(2020042203);
            2020042215  z80  ../src/fpc/compiler/z80/nz80add.pas:565                              internalerror(2020042203);
            2020042216  z80  ../src/fpc/compiler/z80/nz80add.pas:614                              internalerror(2020042203);
            2020042217  xtensa  ../src/fpc/compiler/xtensa/ncpumem.pas:79                 internalerror(2020042203);
2020042206              z80  ../src/fpc/compiler/z80/cgcpu.pas:1733                      internalerror(2020042206);
            2020042218  z80  ../src/fpc/compiler/z80/cgcpu.pas:1748                      internalerror(2020042206);
            2020042219  z80  ../src/fpc/compiler/z80/cgcpu.pas:1767                      internalerror(2020042206);
            2020042220  z80  ../src/fpc/compiler/z80/cgcpu.pas:1786                      internalerror(2020042206);
            2020042221  z80  ../src/fpc/compiler/z80/cgcpu.pas:1808                      internalerror(2020042206);
            2020042222  z80  ../src/fpc/compiler/z80/cgcpu.pas:1831                        internalerror(2020042206);
            2020042223  z80  ../src/fpc/compiler/z80/cgcpu.pas:1846                        internalerror(2020042206);
            2020042224  z80  ../src/fpc/compiler/z80/cgcpu.pas:1863                      internalerror(2020042206);
2020042501              compiler  ../src/fpc/compiler/symdef.pas:4611                    internalerror(2020042501);
            2020042502  compiler  ../src/fpc/compiler/aasmbase.pas:316                Internalerror(2020042501);
                    IF     not defined(cpu64bitalu) and not defined(cpuhighleveltarget)
2020042801              compiler  ../src/fpc/compiler/ncginl.pas:492                       Internalerror(2020042801);
            2020042804  z80  ../src/fpc/compiler/z80/cpubase.pas:439              internalerror(2020042801);
2020042802              compiler  ../src/fpc/compiler/ncginl.pas:504                       Internalerror(2020042802);
            2020042805  z80  ../src/fpc/compiler/z80/agsdasz80.pas:420                      internalerror(2020042802);
2020050402              z80  ../src/fpc/compiler/z80/aasmcpu.pas:464                    internalerror(2020050402);
            2020050424  z80  ../src/fpc/compiler/z80/aasmcpu.pas:950                    internalerror(2020050402);
2020050408              z80  ../src/fpc/compiler/z80/aasmcpu.pas:586                                  internalerror(2020050408);
            2020050425  z80  ../src/fpc/compiler/z80/aasmcpu.pas:907                      internalerror(2020050408);
2020050409              z80  ../src/fpc/compiler/z80/aasmcpu.pas:591                            internalerror(2020050409);
            2020050426  z80  ../src/fpc/compiler/z80/aasmcpu.pas:872                internalerror(2020050409);
2020050419              z80  ../src/fpc/compiler/z80/aasmcpu.pas:778                          internalerror(2020050419);
            2020050427  z80  ../src/fpc/compiler/z80/aasmcpu.pas:805                      internalerror(2020050419);
            2020050428  z80  ../src/fpc/compiler/z80/aasmcpu.pas:823                      internalerror(2020050419);
2020050601              compiler  ../src/fpc/compiler/ogrel.pas:192              internalerror(2020050601);
            2020050613  compiler  ../src/fpc/compiler/ogrel.pas:216              internalerror(2020050601);
2020050606              z80  ../src/fpc/compiler/z80/aasmcpu.pas:855                          internalerror(2020050606);
            2020050614  z80  ../src/fpc/compiler/z80/aasmcpu.pas:865                          internalerror(2020050606);
2020050701              compiler  ../src/fpc/compiler/cgobj.pas:2257            internalerror(2020050701);
            2020050710  compiler  ../src/fpc/compiler/cgobj.pas:2268            internalerror(2020050701);
            2020050711  compiler  ../src/fpc/compiler/hlcgobj.pas:3127          internalerror(2020050701);
            2020050712  compiler  ../src/fpc/compiler/hlcgobj.pas:3136          internalerror(2020050701);
                    IF NOT cpu64bitalu
2020050706              compiler  ../src/fpc/compiler/cgobj.pas:3156            internalerror(2020050706);
                    IF NOT cpu64bitalu
            2020050713  compiler  ../src/fpc/compiler/cgobj.pas:3166            internalerror(2020050706);
2020051111              z80  ../src/fpc/compiler/z80/aoptcpu.pas:288                internalerror(2020051111);
            2020051108  z80  ../src/fpc/compiler/z80/aoptcpu.pas:355              internalerror(2020051111);
            2020051113  z80  ../src/fpc/compiler/z80/aoptcpub.pas:314                internalerror(2020051111);
2020051112              z80  ../src/fpc/compiler/z80/aoptcpu.pas:208                    internalerror(2020051112);
            2020051114  z80  ../src/fpc/compiler/z80/aoptcpu.pas:296                  internalerror(2020051112);
            2020051115  z80  ../src/fpc/compiler/z80/aoptcpub.pas:234                    internalerror(2020051112);
2020051601              z80  ../src/fpc/compiler/z80/aoptcpu.pas:251                    internalerror(2020051601);
            2020051611  z80  ../src/fpc/compiler/z80/aoptcpub.pas:277                    internalerror(2020051601);
2020051602              z80  ../src/fpc/compiler/z80/aoptcpu.pas:227                    internalerror(2020051602);
            2020051612  z80  ../src/fpc/compiler/z80/aoptcpu.pas:277                    internalerror(2020051602);
            2020051613  z80  ../src/fpc/compiler/z80/aoptcpub.pas:253                    internalerror(2020051602);
            2020051614  z80  ../src/fpc/compiler/z80/aoptcpub.pas:303                    internalerror(2020051602);
2020082209              xtensa  ../src/fpc/compiler/xtensa/cgcpu.pas:1441                  Internalerror(2020082209);
            2020082204  xtensa  ../src/fpc/compiler/xtensa/ncpumat.pas:322              internalerror(2020082209);
2020083001              xtensa  ../src/fpc/compiler/xtensa/cgcpu.pas:754                      Internalerror(2020083001);
            2020083002  xtensa  ../src/fpc/compiler/xtensa/cpupara.pas:293            Internalerror(2020083001);
intererror_log.txt (101,974 bytes)   
interr.patch (205,624 bytes)   
Index: compiler/aarch64/aasmcpu.pas
===================================================================
--- compiler/aarch64/aasmcpu.pas	(revision 47063)
+++ compiler/aarch64/aasmcpu.pas	(working copy)
@@ -569,7 +569,7 @@
           R_MMREGISTER:
             result:=taicpu.op_reg_ref(op,r,ref);
           else
-            internalerror(200401041);
+            internalerror(2004010407);
         end;
       end;
 
Index: compiler/aarch64/agcpugas.pas
===================================================================
--- compiler/aarch64/agcpugas.pas	(revision 47063)
+++ compiler/aarch64/agcpugas.pas	(working copy)
@@ -650,7 +650,7 @@
                 else
                   begin
                     if ref.refaddr<>addr_no then
-                      internalerror(2014121506);
+                      internalerror(2014121502);
                     if (ref.offset<>0) then
                       result:=result+', #'+tostr(ref.offset);
                   end;
Index: compiler/aarch64/cgcpu.pas
===================================================================
--- compiler/aarch64/cgcpu.pas	(revision 47063)
+++ compiler/aarch64/cgcpu.pas	(working copy)
@@ -274,7 +274,7 @@
               { todo }
               A_LD1,A_LD2,A_LD3,A_LD4,
               A_ST1,A_ST2,A_ST3,A_ST4:
-                internalerror(2014110704);
+                internalerror(2014110702);
               { these don't support base+index }
               A_LDUR,A_STUR,
               A_LDP,A_STP:
@@ -301,7 +301,7 @@
                     offset may still be too big }
                 end;
               else
-                internalerror(2014110901);
+                internalerror(2014110903);
             end;
           end;
 
Index: compiler/aarch64/cpupara.pas
===================================================================
--- compiler/aarch64/cpupara.pas	(revision 47063)
+++ compiler/aarch64/cpupara.pas	(working copy)
@@ -682,7 +682,7 @@
             result:=curstackoffset;
           end
         else
-          internalerror(200410231);
+          internalerror(2004102303);
 
         create_funcretloc_info(p,side);
       end;
Index: compiler/aarch64/hlcgcpu.pas
===================================================================
--- compiler/aarch64/hlcgcpu.pas	(revision 47063)
+++ compiler/aarch64/hlcgcpu.pas	(working copy)
@@ -184,7 +184,7 @@
           not is_objectpascal_helper(procdef.struct) then
         begin
           if (procdef.extnumber=$ffff) then
-            Internalerror(200006139);
+            Internalerror(2000061302);
           { mov  0(%rdi),%rax ; load vmt}
           reference_reset_base(href,voidpointertype,paraloc^.register,0,ctempposinvalid,sizeof(pint),[]);
           getcpuregister(list,NR_IP0);
Index: compiler/aarch64/ncpuflw.pas
===================================================================
--- compiler/aarch64/ncpuflw.pas	(revision 47063)
+++ compiler/aarch64/ncpuflw.pas	(working copy)
@@ -355,7 +355,7 @@
     if (target_info.system=system_aarch64_win64) then
       begin
         if df_generic in current_procinfo.procdef.defoptions then
-          InternalError(2020033101);
+          InternalError(2020033104);
 
         p.finalizepi:=tcgprocinfo(current_procinfo.create_for_outlining('$fin$',current_procinfo.procdef.struct,potype_exceptfilter,voidtype,p.right));
         if pi_do_call in finalizepi.flags then
Index: compiler/aarch64/racpugas.pas
===================================================================
--- compiler/aarch64/racpugas.pas	(revision 47063)
+++ compiler/aarch64/racpugas.pas	(working copy)
@@ -859,7 +859,7 @@
                        OPR_REFERENCE :
                          inc(oper.opr.ref.offset,l);
                        else
-                         internalerror(200309202);
+                         internalerror(2003092005);
                      end;
                    end
                end;
Index: compiler/aasmbase.pas
===================================================================
--- compiler/aasmbase.pas	(revision 47063)
+++ compiler/aasmbase.pas	(working copy)
@@ -313,7 +313,7 @@
             Delete(Result,(Length(Result)-charstoremove) div 2,charstoremove);
             Result:='_'+target_asm.dollarsign+'CRC'+hexstr(crc,8)+Result;
             if Length(Result)>target_asm.labelmaxlen then
-              Internalerror(2020042501);
+              Internalerror(2020042502);
           end;
       end;
 
Index: compiler/aasmcnst.pas
===================================================================
--- compiler/aasmcnst.pas	(revision 47063)
+++ compiler/aasmcnst.pas	(working copy)
@@ -1312,7 +1312,7 @@
        else if (assigned(finternal_data_asmlist) and
            (list<>finternal_data_asmlist)) or
            not assigned(list) then
-         internalerror(2015032101);
+         internalerror(2015032102);
        finternal_data_asmlist:=list;
        if not assigned(l) then
          l:=get_internal_data_section_internal_label;
Index: compiler/arm/aasmcpu.pas
===================================================================
--- compiler/arm/aasmcpu.pas	(revision 47063)
+++ compiler/arm/aasmcpu.pas	(working copy)
@@ -723,7 +723,7 @@
           R_MMREGISTER :
             result:=taicpu.op_reg_ref(A_VLDR,r,ref);
           else
-            internalerror(200401041);
+            internalerror(2004010415);
         end;
       end;
 
@@ -741,7 +741,7 @@
           R_MMREGISTER :
             result:=taicpu.op_reg_ref(A_VSTR,r,ref);
           else
-            internalerror(200401041);
+            internalerror(2004010416);
         end;
       end;
 
@@ -925,7 +925,7 @@
             else
               begin
                 writeln(opcode);
-                internalerror(200403151);
+                internalerror(2004031502);
               end;
           end;
       end;
Index: compiler/arm/agarmgas.pas
===================================================================
--- compiler/arm/agarmgas.pas	(revision 47063)
+++ compiler/arm/agarmgas.pas	(working copy)
@@ -238,7 +238,7 @@
                      else if shiftmode <> SM_None then
                        s:=s+', '+gas_shiftmode2str[shiftmode]+' #'+tostr(shiftimm);
                      if offset<>0 then
-                       Internalerror(2019012601);
+                       Internalerror(2019012602);
                   end
                 else if offset<>0 then
                   s:=s+', #'+tostr(offset);
@@ -426,7 +426,7 @@
                      top_const:
                        s:=s+sep+tostr(taicpu(hp).oper[1]^.val);
                      else
-                       internalerror(200311292);
+                       internalerror(2003112903);
                    end;
                  end
                else
Index: compiler/arm/cgcpu.pas
===================================================================
--- compiler/arm/cgcpu.pas	(revision 47063)
+++ compiler/arm/cgcpu.pas	(working copy)
@@ -329,7 +329,7 @@
           imm1, imm2: DWord;
        begin
           if not(size in [OS_8,OS_S8,OS_16,OS_S16,OS_32,OS_S32]) then
-            internalerror(2002090902);
+            internalerror(2002090907);
           if is_shifter_const(a,imm_shift) then
             list.concat(taicpu.op_reg_const(A_MOV,reg,a))
           else if is_shifter_const(not(a),imm_shift) then
@@ -516,7 +516,7 @@
         hsym:=tsym(procdef.parast.Find('self'));
         if not(assigned(hsym) and
           (hsym.typ=paravarsym)) then
-          internalerror(200305251);
+          internalerror(2003052503);
         paraloc:=tparavarsym(hsym).paraloc[callerside].location;
         while paraloc<>nil do
           with paraloc^ do
@@ -546,7 +546,7 @@
                       end;
                   end
                 else
-                  internalerror(200309189);
+                  internalerror(2003091803);
               end;
               paraloc:=next;
             end;
@@ -1089,7 +1089,7 @@
           OP_ROL:
             begin
               if not(size in [OS_32,OS_S32]) then
-                internalerror(2008072801);
+                internalerror(2008072804);
               { simulate ROL by ror'ing 32-value }
               tmpreg:=getintregister(list,OS_32);
               list.concat(taicpu.op_reg_reg_const(A_RSB,tmpreg,src1, 32));
@@ -1210,7 +1210,7 @@
         if (ref.base=NR_NO) then
           begin
             if ref.shiftmode<>SM_None then
-              internalerror(2014020701);
+              internalerror(2014020707);
             ref.base:=ref.index;
             ref.index:=NR_NO;
           end;
@@ -1368,7 +1368,7 @@
            OS_F32:
              oppostfix:=PF_None;
            else
-             InternalError(200308299);
+             InternalError(2003082912);
          end;
 
          if ((ref.alignment in [1,2]) and (ref.alignment<tcgsize2size[tosize])) or
@@ -2187,7 +2187,7 @@
                   mmregs:=(rg[R_MMREGISTER].used_in_proc-paramanager.get_volatile_registers_mm(pocall_stdcall))*[0..31];
                 end
               else
-                internalerror(2019050926);
+                internalerror(2019050908);
             end;
 
             if (firstfloatreg<>RS_NO) or
@@ -3193,7 +3193,7 @@
               tosize:=OS_F32;
               { since we are loading an integer, no conversion may be required }
               if (fromsize<>tosize) then
-                internalerror(2009112801);
+                internalerror(2009112802);
             end;
           OS_64,OS_S64:
             begin
@@ -3200,7 +3200,7 @@
               tosize:=OS_F64;
               { since we are loading an integer, no conversion may be required }
               if (fromsize<>tosize) then
-                internalerror(2009112901);
+                internalerror(2009112902);
             end;
           OS_F32,OS_F64:
             ;
@@ -3264,7 +3264,7 @@
         if (fromsize<>OS_F32) then
           internalerror(2009112430);
         if not(tosize in [OS_32,OS_S32]) then
-          internalerror(2009112420);
+          internalerror(2009112409);
         if assigned(shuffle) and
            not shufflescalar(shuffle) then
           internalerror(2009112514);
@@ -3595,7 +3595,7 @@
                   list.concat(setoppostfix(taicpu.op_reg_reg_reg(A_SBC,regdst.reghi,regsrc2.reghi,regsrc1.reghi),PF_S));
                 end;
               else
-                internalerror(2003083101);
+                internalerror(2003083102);
             end;
             if size=OS_64 then
               begin
@@ -3634,7 +3634,7 @@
                   cg.a_reg_dealloc(list,NR_DEFAULTFLAGS);
                 end;
               else
-                internalerror(2003083101);
+                internalerror(2003083104);
             end;
           end;
       end;
@@ -3976,7 +3976,7 @@
           hr : treference;
        begin
           if not(size in [OS_8,OS_S8,OS_16,OS_S16,OS_32,OS_S32]) then
-            internalerror(2002090902);
+            internalerror(2002090908);
           if is_thumb_imm(a) then
             list.concat(taicpu.op_reg_const(A_MOV,reg,a))
           else
@@ -4008,7 +4008,7 @@
         hsym:=tsym(procdef.parast.Find('self'));
         if not(assigned(hsym) and
           (hsym.typ=paravarsym)) then
-          internalerror(200305251);
+          internalerror(2003052504);
         paraloc:=tparavarsym(hsym).paraloc[callerside].location;
         while paraloc<>nil do
           with paraloc^ do
@@ -4058,7 +4058,7 @@
                       end;
                   end
                 else
-                  internalerror(200309189);
+                  internalerror(2003091804);
               end;
               paraloc:=next;
             end;
@@ -4145,7 +4145,7 @@
           OP_ROL:
             begin
               if not(size in [OS_32,OS_S32]) then
-                internalerror(2008072801);
+                internalerror(2008072805);
               { simulate ROL by ror'ing 32-value }
               tmpreg:=getintregister(list,OS_32);
               a_load_const_reg(list,OS_32,32,tmpreg);
@@ -4227,7 +4227,7 @@
             else if (op in [OP_MUL,OP_IMUL]) and ispowerof2(a-1,l1) and not(cgsetflags or setflags) then
               begin
                 if l1>32 then{roozbeh does this ever happen?}
-                  internalerror(200308296);
+                  internalerror(2003082903);
                 shifterop_reset(so);
                 so.shiftmode:=SM_LSL;
                 so.shiftimm:=l1;
@@ -4237,7 +4237,7 @@
             else if (op in [OP_MUL,OP_IMUL]) and ispowerof2(a+1,l1) and not(cgsetflags or setflags) then
               begin
                 if l1>32 then{does this ever happen?}
-                  internalerror(201205181);
+                  internalerror(2012051802);
                 shifterop_reset(so);
                 so.shiftmode:=SM_LSL;
                 so.shiftimm:=l1;
@@ -4384,7 +4384,7 @@
           hr : treference;
        begin
           if not(size in [OS_8,OS_S8,OS_16,OS_S16,OS_32,OS_S32]) then
-            internalerror(2002090902);
+            internalerror(2002090909);
           if is_thumb32_imm(a) then
             list.concat(taicpu.op_reg_const(A_MOV,reg,a))
           else if is_thumb32_imm(not(a)) then
@@ -4431,7 +4431,7 @@
            OS_S32:
              oppostfix:=PF_None;
            else
-             InternalError(200308299);
+             InternalError(2003082913);
          end;
          if (ref.alignment in [1,2]) and (ref.alignment<tcgsize2size[fromsize]) then
            begin
@@ -4702,7 +4702,7 @@
             else if (op in [OP_MUL,OP_IMUL]) and ispowerof2(a-1,l1) and not(cgsetflags or setflags) then
               begin
                 if l1>32 then{roozbeh does this ever happen?}
-                  internalerror(200308296);
+                  internalerror(2003082911);
                 shifterop_reset(so);
                 so.shiftmode:=SM_LSL;
                 so.shiftimm:=l1;
@@ -4712,7 +4712,7 @@
             else if (op in [OP_MUL,OP_IMUL]) and ispowerof2(a+1,l1) and not(cgsetflags or setflags) then
               begin
                 if l1>32 then{does this ever happen?}
-                  internalerror(201205181);
+                  internalerror(2012051803);
                 shifterop_reset(so);
                 so.shiftmode:=SM_LSL;
                 so.shiftimm:=l1;
@@ -4774,7 +4774,7 @@
            OP_ROL:
               begin
                 if not(size in [OS_32,OS_S32]) then
-                   internalerror(2008072801);
+                   internalerror(2008072806);
                 { simulate ROL by ror'ing 32-value }
                 tmpreg:=getintregister(list,OS_32);
                 list.concat(taicpu.op_reg_const(A_MOV,tmpreg,32));
@@ -5154,7 +5154,7 @@
                 else if ref.refaddr=addr_tpoff then
                   begin
                     if assigned(ref.relsymbol) or (ref.offset<>0) then
-                      Internalerror(2019092805);
+                      Internalerror(2019092807);
 
                     current_procinfo.aktlocaldata.concat(tai_const.Create_type_sym(aitconst_tpoff,ref.symbol));
                   end
@@ -5224,7 +5224,7 @@
         if ((op in [A_LDF,A_STF,A_FLDS,A_FLDD,A_FSTS,A_FSTD]) or (op=A_VSTR) or (op=A_VLDR)) and (ref.index<>NR_NO) then
           begin
             if ref.shiftmode<>SM_none then
-              internalerror(200309121);
+              internalerror(2003091202);
             if tmpreg<>NR_NO then
               begin
                 if ref.base=tmpreg then
@@ -5238,7 +5238,7 @@
                 else
                   begin
                     if ref.index<>tmpreg then
-                      internalerror(200403161);
+                      internalerror(2004031602);
                     if ref.signindex<0 then
                       list.concat(taicpu.op_reg_reg_reg(A_SUB,tmpreg,ref.base,tmpreg))
                     else
@@ -5377,7 +5377,7 @@
               list.concat(taicpu.op_reg_reg(A_SBC,regdst.reghi,regsrc.reghi));
             end;
           else
-            internalerror(2003083101);
+            internalerror(2003083105);
         end;
       end;
 
@@ -5431,7 +5431,7 @@
               list.concat(taicpu.op_reg_reg(A_SBC,reg.reghi,tmpreg));
             end;
           else
-            internalerror(2003083101);
+            internalerror(2003083106);
         end;
       end;
 
Index: compiler/arm/cpuelf.pas
===================================================================
--- compiler/arm/cpuelf.pas	(revision 47063)
+++ compiler/arm/cpuelf.pas	(working copy)
@@ -923,7 +923,7 @@
           else
             begin
               writeln(objreloc.ftype);
-              internalerror(200604014);
+              internalerror(2006040107);
             end;
           end
         else           { not relocsec.Used }
Index: compiler/arm/cpupara.pas
===================================================================
--- compiler/arm/cpupara.pas	(revision 47063)
+++ compiler/arm/cpupara.pas	(working copy)
@@ -915,7 +915,7 @@
               end;
           end
         else
-          internalerror(200410231);
+          internalerror(2004102306);
 
         create_funcretloc_info(p,side);
       end;
Index: compiler/arm/hlcgcpu.pas
===================================================================
--- compiler/arm/hlcgcpu.pas	(revision 47063)
+++ compiler/arm/hlcgcpu.pas	(working copy)
@@ -106,7 +106,7 @@
         l : TAsmLabel;
       begin
         if (procdef.extnumber=$ffff) then
-          Internalerror(200006139);
+          Internalerror(2000061311);
         if GenerateThumbCode then
           begin
             reference_reset_base(href,voidpointertype,NR_R0,tobjectdef(procdef.struct).vmtmethodoffset(procdef.extnumber),ctempposinvalid,sizeof(pint),[]);
Index: compiler/arm/narmadd.pas
===================================================================
--- compiler/arm/narmadd.pas	(revision 47063)
+++ compiler/arm/narmadd.pas	(working copy)
@@ -207,7 +207,7 @@
             end;
           fpu_soft:
             { this case should be handled already by pass1 }
-            internalerror(200308252);
+            internalerror(2003082503);
           else if FPUARM_HAS_VFP_DOUBLE in fpu_capabilities[current_settings.fputype] then
             begin
               { force mmreg as location, left right doesn't matter
@@ -260,7 +260,7 @@
                 slashn :
                   op:=A_VDIV;
                 else
-                  internalerror(2009111401);
+                  internalerror(2009111404);
               end;
 
               current_asmdata.CurrAsmList.concat(setoppostfix(taicpu.op_reg_reg_reg(op, location.register,left.location.register,right.location.register), PF_F32));
Index: compiler/arm/narmcnv.pas
===================================================================
--- compiler/arm/narmcnv.pas	(revision 47063)
+++ compiler/arm/narmcnv.pas	(working copy)
@@ -128,7 +128,7 @@
                       left:=nil;
                     end;
                   else
-                    internalerror(200610151);
+                    internalerror(2006101504);
                 end;
               s64real:
                 case tfloatdef(resultdef).floattype of
@@ -141,10 +141,10 @@
                       left:=nil;
                     end;
                   else
-                    internalerror(200610152);
+                    internalerror(2006101505);
                 end;
               else
-                internalerror(200610153);
+                internalerror(2006101506);
             end;
             left:=nil;
             firstpass(result);
@@ -223,7 +223,7 @@
                           end;
                       end;
                     else
-                      internalerror(200410031);
+                      internalerror(2004100307);
                   end;
               end;
             end;
@@ -248,7 +248,7 @@
               signed:=left.location.size=OS_S32;
               hlcg.location_force_mmregscalar(current_asmdata.CurrAsmList,left.location,left.resultdef,false);
               if (left.location.size<>OS_F32) then
-                internalerror(2009112703);
+                internalerror(2009112704);
               if left.location.size<>location.size then
                 location.register:=cg.getmmregister(current_asmdata.CurrAsmList,location.size)
               else
@@ -260,7 +260,7 @@
             end
           else
             { should be handled in pass 1 }
-            internalerror(2019050934);
+            internalerror(2019050909);
         end;
       end;
 
@@ -358,7 +358,7 @@
                 tbasecgarm(cg).cgsetflags:=false;
               end;
             else
-              internalerror(200311301);
+              internalerror(2003113002);
          end;
          { load flags to register }
          location_reset(location,LOC_REGISTER,def_cgsize(resultdef));
Index: compiler/arm/narminl.pas
===================================================================
--- compiler/arm/narminl.pas	(revision 47063)
+++ compiler/arm/narminl.pas	(working copy)
@@ -333,7 +333,7 @@
               cg.maybe_check_for_fpu_exception(current_asmdata.CurrAsmList);
             end
           else
-            internalerror(2009111402);
+            internalerror(2009111405);
         end;
       end;
 
Index: compiler/arm/narmld.pas
===================================================================
--- compiler/arm/narmld.pas	(revision 47063)
+++ compiler/arm/narmld.pas	(working copy)
@@ -157,7 +157,7 @@
                       handled:=true;
                     end;
                   else
-                    Internalerror(2019092802);
+                    Internalerror(2019092806);
                 end;
               end;
           end;
Index: compiler/arm/narmmat.pas
===================================================================
--- compiler/arm/narmmat.pas	(revision 47063)
+++ compiler/arm/narmmat.pas	(working copy)
@@ -420,7 +420,7 @@
                 OS_64:
                   cg.a_op_const_reg(current_asmdata.CurrAsmList,OP_XOR,OS_32,tcgint($80000000),location.registerhi);
               else
-                internalerror(2014033101);
+                internalerror(2014033103);
               end;
             end
           else if FPUARM_HAS_VFP_DOUBLE in fpu_capabilities[init_settings.fputype] then
Index: compiler/arm/raarmgas.pas
===================================================================
--- compiler/arm/raarmgas.pas	(revision 47063)
+++ compiler/arm/raarmgas.pas	(working copy)
@@ -988,7 +988,7 @@
                        OPR_REFERENCE :
                          inc(oper.opr.ref.offset,l);
                        else
-                         internalerror(200309202);
+                         internalerror(2003092021);
                      end;
                    end
                end;
Index: compiler/arm/rgcpu.pas
===================================================================
--- compiler/arm/rgcpu.pas	(revision 47063)
+++ compiler/arm/rgcpu.pas	(working copy)
@@ -491,7 +491,7 @@
             tmpref.index:=hreg;
 
             if spilltemp.index<>NR_NO then
-              internalerror(200401263);
+              internalerror(2004012601);
 
             helplist.concat(spilling_create_load(tmpref,tempreg));
             if getregtype(tempreg)=R_INTREGISTER then
@@ -545,7 +545,7 @@
             helplist.concat(taicpu.op_reg_ref(A_LDR,hreg,tmpref));
 
             if spilltemp.index<>NR_NO then
-              internalerror(200401263);
+              internalerror(2004012602);
 
             reference_reset_base(tmpref,current_procinfo.framepointer,0,ctempposinvalid,sizeof(pint),[]);
             tmpref.index:=hreg;
Index: compiler/assemble.pas
===================================================================
--- compiler/assemble.pas	(revision 47063)
+++ compiler/assemble.pas	(working copy)
@@ -1140,7 +1140,7 @@
 	      else if sizeof(tai_realconst(hp).value.s80val) = sizeof(single) then
 	        eextended:=float32_to_floatx80(float32(single(tai_realconst(hp).value.s80val)))
 	      else
-	        internalerror(2017091901);
+	        internalerror(2017091902);
               pdata:=@eextended;
             end;
 {$pop}
@@ -2062,7 +2062,7 @@
 		       else if sizeof(tai_realconst(hp).value.s80val) = sizeof(single) then
 			 eextended:=float32_to_floatx80(float32(single(tai_realconst(hp).value.s80val)))
 		       else
-			 internalerror(2017091901);
+			 internalerror(2017091903);
                        pdata:=@eextended;
                      end;
            {$pop}
@@ -2101,7 +2101,7 @@
                      else if Tai_const(hp).consttype in [aitconst_tlsgd,aitconst_tlsdesc] then
                        begin
                          if objsymend.objsection<>ObjData.CurrObjSec then
-                           Internalerror(2019092802);
+                           Internalerror(2019092803);
                          Tai_const(hp).value:=ObjData.CurrObjSec.Size-objsymend.address+Tai_const(hp).symofs;
                        end
                      else if objsymend.objsection<>objsym.objsection then
Index: compiler/avr/aasmcpu.pas
===================================================================
--- compiler/avr/aasmcpu.pas	(revision 47063)
+++ compiler/avr/aasmcpu.pas	(working copy)
@@ -355,7 +355,7 @@
             else
               result:=taicpu.op_reg_ref(A_LD,r,ref);
           else
-            internalerror(200401041);
+            internalerror(2004010413);
         end;
       end;
 
@@ -374,7 +374,7 @@
             else
               result:=taicpu.op_ref_reg(A_ST,ref,r);
           else
-            internalerror(200401041);
+            internalerror(2004010414);
         end;
       end;
 
Index: compiler/avr/agavrgas.pas
===================================================================
--- compiler/avr/agavrgas.pas	(revision 47063)
+++ compiler/avr/agavrgas.pas	(working copy)
@@ -93,7 +93,7 @@
               //   internalerror(200308293);
   {$endif extdebug}
               if index<>NR_NO then
-                internalerror(2011021701)
+                internalerror(2011021707)
               else if base<>NR_NO then
                 begin
                   if addressmode=AM_PREDRECEMENT then
Index: compiler/avr/cgcpu.pas
===================================================================
--- compiler/avr/cgcpu.pas	(revision 47063)
+++ compiler/avr/cgcpu.pas	(working copy)
@@ -214,7 +214,7 @@
                  list.concat(taicpu.op_reg(A_PUSH,r));
                end;
              else
-               internalerror(2002071004);
+               internalerror(2002071007);
           end;
         end;
 
@@ -224,7 +224,7 @@
 
       begin
         if not(tcgsize2size[cgpara.Size] in [1..4]) then
-          internalerror(2014011101);
+          internalerror(2014011106);
 
         hp:=cgpara.location;
 
@@ -268,7 +268,7 @@
         tmpreg: TRegister;
       begin
         if not(tcgsize2size[paraloc.Size] in [1..4]) then
-          internalerror(2014011101);
+          internalerror(2014011107);
 
         hp:=paraloc.location;
 
@@ -302,7 +302,7 @@
                   hp:=hp^.Next;
                 end;
               else
-                internalerror(2002071004);
+                internalerror(2002071008);
             end;
           end;
       end;
@@ -955,7 +955,7 @@
                              list.concat(taicpu.op_reg(A_ROL,reg))
                            end;
                          else
-                           internalerror(2011030901);
+                           internalerror(2011030903);
                        end;
                        if size in [OS_S16,OS_16,OS_S32,OS_32,OS_S64,OS_64] then
                          begin
@@ -971,7 +971,7 @@
                                  OP_SAR:
                                    list.concat(taicpu.op_reg(A_ROR,GetOffsetReg64(reg,reghi,tcgsize2size[size]-i)));
                                  else
-                                   internalerror(2011030902);
+                                   internalerror(2011030904);
                                end;
                            end;
                          end;
@@ -1098,7 +1098,7 @@
         Result:=ref;
 
          if ref.addressmode<>AM_UNCHANGED then
-           internalerror(2011021701);
+           internalerror(2011021705);
 
         { Be sure to have a base register }
         if (ref.base=NR_NO) then
@@ -1248,7 +1248,7 @@
            QuickRef:=true;
 
          if (tcgsize2size[fromsize]>32) or (tcgsize2size[tosize]>32) or (fromsize=OS_NO) or (tosize=OS_NO) then
-           internalerror(2011021307);
+           internalerror(2011021303);
 
          conv_done:=false;
          if tosize<>fromsize then
@@ -1469,7 +1469,7 @@
            QuickRef:=true;
 
          if (tcgsize2size[fromsize]>32) or (tcgsize2size[tosize]>32) or (fromsize=OS_NO) or (tosize=OS_NO) then
-           internalerror(2011021307);
+           internalerror(2011021304);
 
          conv_done:=false;
          if tosize<>fromsize then
@@ -2362,7 +2362,7 @@
         tmpref : treference;
       begin
          if ref.addressmode<>AM_UNCHANGED then
-           internalerror(2011021701);
+           internalerror(2011021706);
 
         if assigned(ref.symbol) or (ref.offset<>0) then
           begin
Index: compiler/avr/cpupara.pas
===================================================================
--- compiler/avr/cpupara.pas	(revision 47063)
+++ compiler/avr/cpupara.pas	(working copy)
@@ -555,7 +555,7 @@
               end;
           end
         else
-          internalerror(200410231);
+          internalerror(2004102305);
       end;
 
 begin
Index: compiler/avr/navrmat.pas
===================================================================
--- compiler/avr/navrmat.pas	(revision 47063)
+++ compiler/avr/navrmat.pas	(working copy)
@@ -166,7 +166,7 @@
           shln: op:=OP_SHL;
           shrn: op:=OP_SHR;
           else
-            internalerror(2013120102);
+            internalerror(2013120109);
         end;
         opsize:=left.location.size;
         opdef:=left.resultdef;
Index: compiler/avr/raavrgas.pas
===================================================================
--- compiler/avr/raavrgas.pas	(revision 47063)
+++ compiler/avr/raavrgas.pas	(working copy)
@@ -415,7 +415,7 @@
                     OPR_REFERENCE :
                       inc(oper.opr.ref.offset,l);
                     else
-                      internalerror(200309202);
+                      internalerror(2003092012);
                   end;
                   Consume(AS_RPAREN);
                 end
@@ -499,7 +499,7 @@
                        OPR_REFERENCE :
                          inc(oper.opr.ref.offset,l);
                        else
-                         internalerror(200309202);
+                         internalerror(2003092013);
                      end;
                    end
                end;
Index: compiler/cg64f32.pas
===================================================================
--- compiler/cg64f32.pas	(revision 47063)
+++ compiler/cg64f32.pas	(working copy)
@@ -705,7 +705,7 @@
           LOC_CONSTANT :
             cg.a_load_const_reg(list,OS_32,longint(hi(l.value64)),reg);
           else
-            internalerror(200203244);
+            internalerror(2002032411);
         end;
       end;
 
Index: compiler/cgobj.pas
===================================================================
--- compiler/cgobj.pas	(revision 47063)
+++ compiler/cgobj.pas	(working copy)
@@ -1427,7 +1427,7 @@
                        OS_M8..OS_M512:
                          a_loadmm_reg_reg(list,paraloc.size,paraloc.size,paraloc.register,reg,nil);
                        else
-                         internalerror(2010053102);
+                         internalerror(2010053106);
                      end;
                    end;
                  else
@@ -1464,7 +1464,7 @@
                end;
              end;
            else
-             internalerror(2002081302);
+             internalerror(2002081303);
          end;
       end;
 
@@ -2086,7 +2086,7 @@
           LOC_REFERENCE, LOC_CREFERENCE:
             a_op_reg_ref(list,op,loc.size,reg,loc.reference);
           else
-            internalerror(200109061);
+            internalerror(2001090602);
         end;
       end;
 
@@ -2123,7 +2123,7 @@
               a_op_reg_ref(list,op,loc.size,tmpreg,loc.reference);
             end;
           else
-            internalerror(200109061);
+            internalerror(2001090603);
         end;
       end;
 
@@ -2265,7 +2265,7 @@
         tmpref: treference;
       begin
         if not (Op in [OP_NOT,OP_NEG]) then
-          internalerror(2020050701);
+          internalerror(2020050710);
         if assigned(ref.symbol) then
           begin
             tmpreg:=getaddressregister(list);
@@ -2325,7 +2325,7 @@
           LOC_REFERENCE,LOC_CREFERENCE:
             a_cmp_const_ref_label(list,size,cmp_op,a,loc.reference,l);
           else
-            internalerror(200109061);
+            internalerror(2001090604);
         end;
       end;
 
@@ -2388,7 +2388,7 @@
               a_cmp_ref_reg_label(list,size,cmp_op,ref,tmpreg,l);
             end;
           else
-            internalerror(200109061);
+            internalerror(2001090605);
         end;
       end;
 
@@ -2522,7 +2522,7 @@
           LOC_REFERENCE,LOC_CREFERENCE:
             a_loadmm_ref_cgpara(list,loc.size,loc.reference,cgpara,shuffle);
           else
-            internalerror(200310123);
+            internalerror(2003101204);
         end;
       end;
 
@@ -2616,7 +2616,7 @@
           LOC_CREFERENCE,LOC_REFERENCE:
             a_opmm_ref_reg_reg(list,op,size,loc.reference,src,dst,shuffle);
           else
-            internalerror(200312232);
+            internalerror(2003122304);
         end;
       end;
 
@@ -3163,7 +3163,7 @@
         tempreg: tregister64;
       begin
         if not (op in [OP_NOT,OP_NEG]) then
-          internalerror(2020050706);
+          internalerror(2020050713);
         tempreg.reghi:=cg.getintregister(list,OS_32);
         tempreg.reglo:=cg.getintregister(list,OS_32);
         a_load64_ref_reg(list,ref,tempreg);
Index: compiler/dbgdwarf.pas
===================================================================
--- compiler/dbgdwarf.pas	(revision 47063)
+++ compiler/dbgdwarf.pas	(working copy)
@@ -1309,7 +1309,7 @@
             if data[i].VType<>vtInteger then
               internalerror(200601261);
             if data[i+1].VType<>vtInteger then
-              internalerror(200601261);
+              internalerror(2006012602);
             append_attribute(tdwarf_attribute(data[i].VInteger),tdwarf_form(data[i+1].VInteger),data[i+2]);
             inc(i,3);
           end;
@@ -2552,7 +2552,7 @@
                 currdef:=tarraydef(currdef).elementdef;
               end;
             else
-              internalerror(2009031401);
+              internalerror(2009031403);
           end;
           symlist:=symlist^.next;
         until not assigned(symlist);
Index: compiler/dbgstabs.pas
===================================================================
--- compiler/dbgstabs.pas	(revision 47063)
+++ compiler/dbgstabs.pas	(working copy)
@@ -1561,7 +1561,7 @@
                   ss:=sym_stabstr_evaluate(sym,'"${name}:$1",'+base_stabs_str(paravarsymref_stab,'0','${line}','$2'),[c+st,getoffsetstr(sym.localloc.reference)])
                 end;
               else
-                internalerror(2003091814);
+                internalerror(2003091805);
             end;
           end;
         write_sym_stabstr(list,sym,ss);
Index: compiler/fpcp.pas
===================================================================
--- compiler/fpcp.pas	(revision 47063)
+++ compiler/fpcp.pas	(working copy)
@@ -326,7 +326,7 @@
       if pcpfile.readentry<>ibpackagefiles then
         begin
           message(package_f_pcp_read_error);
-          internalerror(424242);
+          internalerror(2020100818);
         end;
       pplfilename:=pcpfile.getstring;
 
@@ -342,13 +342,13 @@
       if pcpfile.readentry<>ibstartcontained then
         begin
           message(package_f_pcp_read_error);
-          internalerror(424242);
+          internalerror(2020100819);
         end;
       cnt:=pcpfile.getlongint;
       if pcpfile.readentry<>ibendcontained then
         begin
           message(package_f_pcp_read_error);
-          internalerror(424242);
+          internalerror(2020100820);
         end;
       for i:=0 to cnt-1 do
         begin
Index: compiler/hlcg2ll.pas
===================================================================
--- compiler/hlcg2ll.pas	(revision 47063)
+++ compiler/hlcg2ll.pas	(working copy)
@@ -837,7 +837,7 @@
     begin
 {$ifdef extdebug}
       if def_cgsize(size)<>loc.size then
-        internalerror(2010112101);
+        internalerror(2010112103);
 {$endif}
       case loc.loc of
         LOC_SUBSETREG,LOC_CSUBSETREG,
Index: compiler/hlcgobj.pas
===================================================================
--- compiler/hlcgobj.pas	(revision 47063)
+++ compiler/hlcgobj.pas	(working copy)
@@ -999,7 +999,7 @@
                    begin
                      { should be the last part }
                      if assigned(location^.next) then
-                       internalerror(2010052907);
+                       internalerror(2010052902);
                      { load the value piecewise to get it into the register }
                      orgsizeleft:=sizeleft;
                      reghasvalue:=false;
@@ -1083,7 +1083,7 @@
                    OS_M8..OS_M128:
                      a_loadmm_ref_reg(list,location^.def,location^.def,tmpref,location^.register,nil);
                    else
-                     internalerror(2010053101);
+                     internalerror(2010053103);
                  end;
               end
             else
@@ -1644,7 +1644,7 @@
       if sref.bitlen>AIntBits then
         begin
           if ((sref.bitlen mod AIntBits)<>0) then
-            internalerror(2019052901);
+            internalerror(2019052902);
           tmpsref:=sref;
           tmpsref.bitlen:=AIntBits;
           if target_info.endian=endian_big then
@@ -2762,7 +2762,7 @@
         LOC_REFERENCE,LOC_CREFERENCE:
           a_loadmm_reg_ref(list,fromsize,tosize,reg,loc.reference,shuffle);
         else
-          internalerror(2010120415);
+          internalerror(2010120417);
       end;
     end;
 
@@ -3069,7 +3069,7 @@
             a_load_reg_subsetref(list,size,size,tmpreg,loc.sref);
           end;
         else
-          internalerror(2010120429);
+          internalerror(2010120418);
       end;
     end;
 
@@ -3124,7 +3124,7 @@
   procedure thlcgobj.a_op_reg(list: TAsmList; Op: TOpCG; size: tdef; reg: TRegister);
     begin
       if not (Op in [OP_NOT,OP_NEG]) then
-        internalerror(2020050701);
+        internalerror(2020050711);
       a_op_reg_reg(list,op,size,reg,reg);
     end;
 
@@ -3133,7 +3133,7 @@
       tmpreg: TRegister;
     begin
       if not (Op in [OP_NOT,OP_NEG]) then
-        internalerror(2020050701);
+        internalerror(2020050712);
       tmpreg:=getintregister(list,size);
       a_load_ref_reg(list,size,size,ref,tmpreg);
       a_op_reg_reg(list,op,size,tmpreg,tmpreg);
@@ -4252,7 +4252,7 @@
           begin
             { vectors can't be represented yet using tdef }
             if size.typ<>floatdef then
-              internalerror(2012062301);
+              internalerror(2012062302);
             tg.gethltemp(list,size,size.size,tt_normal,r);
             a_loadmm_reg_ref(list,size,size,l.register,r,mms_movescalar);
             location_reset_ref(l,LOC_REFERENCE,l.size,size.alignment,[]);
@@ -5036,7 +5036,7 @@
                            begin
                              hsym:=tparavarsym(get_high_value_sym(tparavarsym(p)));
                              if not assigned(hsym) then
-                               internalerror(201003032);
+                               internalerror(2010030303);
                              highloc:=hsym.initialloc
                            end
                          else
@@ -5067,7 +5067,7 @@
                              begin
                                hsym:=tparavarsym(get_high_value_sym(tparavarsym(p)));
                                if not assigned(hsym) then
-                                 internalerror(201003032);
+                                 internalerror(2010030304);
                                highloc:=hsym.initialloc
                              end
                            else
@@ -5232,7 +5232,7 @@
                 a_loadfpu_reg_cgpara(list,size,tmploc.register,cgpara);
               end;
             else
-              internalerror(200204249);
+              internalerror(2002042402);
           end;
         LOC_FPUREGISTER,
         LOC_CFPUREGISTER:
@@ -5381,7 +5381,7 @@
                       a_load_ref_ref(list,para.def,para.def,href,destloc.reference);
                     end;
                   else
-                    internalerror(2013102301);
+                    internalerror(2013102305);
                 end;
               end;
           end;
Index: compiler/i386/cgcpu.pas
===================================================================
--- compiler/i386/cgcpu.pas	(revision 47063)
+++ compiler/i386/cgcpu.pas	(working copy)
@@ -636,7 +636,7 @@
               op2:=A_AND;
             end;
           else
-            internalerror(200203241);
+            internalerror(2002032408);
         end;
       end;
 
@@ -857,7 +857,7 @@
                     list.Concat(taicpu.op_reg_reg(A_SAR,S_L,NR_CL,regdst.reghi));
                   end;
                 else
-                  internalerror(2017041801);
+                  internalerror(2017041802);
               end;
               cg.a_label(list,l2);
 
@@ -980,7 +980,7 @@
                           list.concat(taicpu.op_const_reg(A_SHL,S_L,value,reg.reglo));
                         end;
                       else
-                        internalerror(2017041201);
+                        internalerror(2017041202);
                     end;
                 end;
             end;
@@ -1049,7 +1049,7 @@
                           cg.a_reg_dealloc(list,NR_DEFAULTFLAGS);
                         end;
                       else
-                        internalerror(2019050901);
+                        internalerror(2019050903);
                     end
                   else if value>31 then
                     case op of
@@ -1086,7 +1086,7 @@
                           cg.a_load_const_ref(list,OS_32,0,tempref);
                         end;
                       else
-                        internalerror(2017041801);
+                        internalerror(2017041803);
                     end
                   else
                     case op of
@@ -1130,7 +1130,7 @@
                             end;
                         end;
                       else
-                        internalerror(2017041201);
+                        internalerror(2017041203);
                     end;
                 end;
             end;
Index: compiler/i386/cpuelf.pas
===================================================================
--- compiler/i386/cpuelf.pas	(revision 47063)
+++ compiler/i386/cpuelf.pas	(working copy)
@@ -473,7 +473,7 @@
               else
                 begin
                   writeln(reltyp);
-                  internalerror(200604014);
+                  internalerror(2006040108);
                 end;
             end
           else           { not relocsec.Used }
Index: compiler/i386/cpupara.pas
===================================================================
--- compiler/i386/cpupara.pas	(revision 47063)
+++ compiler/i386/cpupara.pas	(working copy)
@@ -522,7 +522,7 @@
             else
               begin
                 if paralen=0 then
-                  internalerror(200501163);
+                  internalerror(2005011606);
                 firstparaloc:=true;
                 while (paralen>0) do
                   begin
@@ -688,7 +688,7 @@
                           else
                             begin
                               if paralen=0 then
-                                internalerror(200501163);
+                                internalerror(2005011607);
                               firstparaloc:=true;
                               while (paralen>0) do
                                 begin
Index: compiler/i386/hlcgcpu.pas
===================================================================
--- compiler/i386/hlcgcpu.pas	(revision 47063)
+++ compiler/i386/hlcgcpu.pas	(working copy)
@@ -352,7 +352,7 @@
         href : treference;
       begin
         if (procdef.extnumber=$ffff) then
-          Internalerror(200006139);
+          Internalerror(2000061312);
         { call/jmp  vmtoffs(%reg) ; method offs }
         reference_reset_base(href,voidpointertype,reg,tobjectdef(procdef.struct).vmtmethodoffset(procdef.extnumber),ctempposinvalid,4,[]);
         list.concat(taicpu.op_ref(op,S_L,href));
@@ -364,7 +364,7 @@
         href : treference;
       begin
         if (procdef.extnumber=$ffff) then
-          Internalerror(200006139);
+          Internalerror(2000061313);
         { mov vmtoffs(%eax),%eax ; method offs }
         reference_reset_base(href,voidpointertype,NR_EAX,tobjectdef(procdef.struct).vmtmethodoffset(procdef.extnumber),ctempposinvalid,4,[]);
         cg.a_load_ref_reg(list,OS_ADDR,OS_ADDR,href,NR_EAX);
Index: compiler/i386/n386add.pas
===================================================================
--- compiler/i386/n386add.pas	(revision 47063)
+++ compiler/i386/n386add.pas	(working copy)
@@ -141,7 +141,7 @@
           else
             begin
               { everything should be handled in pass_1 (JM) }
-              internalerror(200109051);
+              internalerror(2001090505);
             end;
         end;
 
@@ -409,7 +409,7 @@
                 end;
             end;
         else
-          internalerror(200203282);
+          internalerror(2002032803);
         end;
 
       end;
@@ -622,7 +622,7 @@
       else if (hreg2<>NR_NO) then
         emit_reg_reg(A_ADD,S_L,hreg2,NR_EDX)
       else
-        InternalError(2014011604);
+        InternalError(2014011601);
 
       { Result is now in EDX:EAX. Copy it to virtual registers. }
       set_mul_result_location;
Index: compiler/i386/n386flw.pas
===================================================================
--- compiler/i386/n386flw.pas	(revision 47063)
+++ compiler/i386/n386flw.pas	(working copy)
@@ -209,7 +209,7 @@
           begin
             selfsym:=tparavarsym(current_procinfo.procdef.parast.Find('self'));
             if (selfsym=nil) or (selfsym.typ<>paravarsym) then
-              InternalError(2011123101);
+              InternalError(2011123102);
             selfsym.varregable:=vr_none;
           end;
       end;
Index: compiler/i386/n386mat.pas
===================================================================
--- compiler/i386/n386mat.pas	(revision 47063)
+++ compiler/i386/n386mat.pas	(working copy)
@@ -71,7 +71,7 @@
       begin
         if is_64bitint(resultdef) then
           { should be handled in pass_1 (JM) }
-          internalerror(200109052);
+          internalerror(2001090507);
 
         if (nodetype=divn) and (right.nodetype=ordconstn) and
           is_signed(left.resultdef) and
Index: compiler/i8086/cgcpu.pas
===================================================================
--- compiler/i8086/cgcpu.pas	(revision 47063)
+++ compiler/i8086/cgcpu.pas	(working copy)
@@ -261,7 +261,7 @@
                         OP_OR,OP_XOR:
                           {do nothing};
                         else
-                          InternalError(2013100701);
+                          InternalError(2013100704);
                       end;
                     end
                   else if aint(a and $FFFF) = aint($FFFF) then
@@ -274,7 +274,7 @@
                         OP_XOR:
                           list.concat(taicpu.op_reg(A_NOT,S_W,reg));
                         else
-                          InternalError(2013100701);
+                          InternalError(2013100705);
                       end;
                     end
                   else
@@ -289,7 +289,7 @@
                         OP_OR,OP_XOR:
                           {do nothing};
                         else
-                          InternalError(2013100701);
+                          InternalError(2013100706);
                       end;
                     end
                   else if aint(a shr 16) = aint($FFFF) then
@@ -302,7 +302,7 @@
                         OP_XOR:
                           list.concat(taicpu.op_reg(A_NOT,S_W,GetNextReg(reg)));
                         else
-                          InternalError(2013100701);
+                          InternalError(2013100707);
                       end;
                     end
                   else
@@ -450,7 +450,7 @@
                                 list.concat(taicpu.op_reg_reg(A_OR,S_W,tmpreg,GetNextReg(reg)));
                               end;
                             else
-                              internalerror(2017040301);
+                              internalerror(2017040302);
                           end;
 
                           ungetcpuregister(list,NR_CX);
@@ -522,7 +522,7 @@
                                     cg.a_reg_dealloc(list,NR_DEFAULTFLAGS);
                                   end;
                                 else
-                                  internalerror(2013030903);
+                                  internalerror(2013030907);
                               end;
                             end;
                         end;
@@ -739,7 +739,7 @@
                 else
                   { OP_MUL should be handled specifically in the code        }
                   { generator because of the silly register usage restraints }
-                  internalerror(200109225);
+                  internalerror(2001092208);
               end
             else
               inherited a_op_const_reg(list, Op, size, a, reg);
@@ -801,7 +801,7 @@
                         OP_OR,OP_XOR:
                           {do nothing};
                         else
-                          InternalError(2013100701);
+                          InternalError(2013100708);
                       end;
                     end
                   else if aint(a and $FFFF) = aint($FFFF) then
@@ -814,7 +814,7 @@
                         OP_XOR:
                           list.concat(taicpu.op_ref(A_NOT,S_W,tmpref));
                         else
-                          InternalError(2013100701);
+                          InternalError(2013100709);
                       end;
                     end
                   else
@@ -830,7 +830,7 @@
                         OP_OR,OP_XOR:
                           {do nothing};
                         else
-                          InternalError(2013100701);
+                          InternalError(2013100710);
                       end;
                     end
                   else if aint(a shr 16) = aint($FFFF) then
@@ -843,7 +843,7 @@
                         OP_XOR:
                           list.concat(taicpu.op_ref(A_NOT,S_W,tmpref));
                         else
-                          InternalError(2013100701);
+                          InternalError(2013100711);
                       end;
                     end
                   else
@@ -991,7 +991,7 @@
                         cg.a_reg_dealloc(list,NR_DEFAULTFLAGS);
                       end;
                     else
-                      internalerror(2013030903);
+                      internalerror(2013030908);
                   end;
 
                   ai:=Taicpu.Op_Sym(A_LOOP,S_W,hl_loop_start);
@@ -1051,7 +1051,7 @@
                   ungetcpuregister(list,NR_CX);
                 end;
               else
-                internalerror(2013030901);
+                internalerror(2013030905);
             end;
           end
         else
@@ -1069,7 +1069,7 @@
         check_register_size(size,reg);
 
         if size in [OS_64, OS_S64] then
-          internalerror(2013030902);
+          internalerror(2013030906);
 
         if size in [OS_32, OS_S32] then
           begin
@@ -1123,7 +1123,7 @@
               OP_MUL,OP_DIV,OP_IDIV:
                 { special stuff, needs separate handling inside code }
                 { generator                                          }
-                internalerror(200109238);
+                internalerror(2001092304);
               OP_ADD,OP_SUB,OP_XOR,OP_OR,OP_AND:
                 begin
                   get_32bit_ops(op, op1, op2);
@@ -1180,7 +1180,7 @@
                         cg.a_reg_dealloc(list,NR_DEFAULTFLAGS);
                       end;
                     else
-                      internalerror(2013030903);
+                      internalerror(2013030909);
                   end;
 
                   ai:=Taicpu.Op_Sym(A_LOOP,S_W,hl_loop_start);
@@ -1215,7 +1215,7 @@
         make_simple_ref(list,tmpref);
 
         if size in [OS_64, OS_S64] then
-          internalerror(2013050803);
+          internalerror(2013050805);
 
         if size in [OS_32, OS_S32] then
           begin
@@ -1279,7 +1279,7 @@
                   a_load_reg_ref(list,paraloc^.size,paraloc^.size,r,ref);
                end;
              else
-               internalerror(2002071004);
+               internalerror(2002071006);
           end;
         end;
       var
@@ -1296,16 +1296,16 @@
                 if cgpara.location^.Next = nil then
                   begin
                     if tcgsize2size[cgpara.location^.size] <> 4 then
-                      internalerror(2013031101);
+                      internalerror(2013031103);
                   end
                 else
                   begin
                     if tcgsize2size[cgpara.location^.size] <> 2 then
-                      internalerror(2013031101);
+                      internalerror(2013031104);
                     if tcgsize2size[cgpara.location^.Next^.size] <> 2 then
-                      internalerror(2013031101);
+                      internalerror(2013031105);
                     if cgpara.location^.Next^.Next <> nil then
-                      internalerror(2013031101);
+                      internalerror(2013031106);
                   end;
 
                 if tcgsize2size[cgpara.size]>cgpara.alignment then
@@ -1354,23 +1354,23 @@
             if tcgsize2size[cgpara.Size] > 2 then
               begin
                 if tcgsize2size[cgpara.Size] <> 4 then
-                  internalerror(2013031101);
+                  internalerror(2013031107);
                 if cgpara.location^.Next = nil then
                   begin
                     if tcgsize2size[cgpara.location^.size] <> 4 then
-                      internalerror(2013031101);
+                      internalerror(2013031108);
                   end
                 else
                   begin
                     if tcgsize2size[cgpara.location^.size] <> 2 then
-                      internalerror(2013031101);
+                      internalerror(2013031109);
                     if tcgsize2size[cgpara.location^.Next^.size] <> 2 then
-                      internalerror(2013031101);
+                      internalerror(2013031110);
                     if cgpara.location^.Next^.Next <> nil then
-                      internalerror(2013031101);
+                      internalerror(2013031111);
                   end;
                 if (cgpara.alignment <> 4) and (cgpara.alignment <> 2) then
-                  internalerror(2013031101);
+                  internalerror(2013031112);
 
                 push_const(list,OS_16,a shr 16);
                 push_const(list,OS_16,a and $FFFF);
@@ -1501,19 +1501,19 @@
                     if cgpara.location^.Next = nil then
                       begin
                         if tcgsize2size[cgpara.location^.size] <> 4 then
-                          internalerror(2014032401);
+                          internalerror(2014032404);
                       end
                     else
                       begin
                         if tcgsize2size[cgpara.location^.size] <> 2 then
-                          internalerror(2014032401);
+                          internalerror(2014032405);
                         if tcgsize2size[cgpara.location^.Next^.size] <> 2 then
-                          internalerror(2014032401);
+                          internalerror(2014032406);
                         if cgpara.location^.Next^.Next <> nil then
-                          internalerror(2014032401);
+                          internalerror(2014032407);
                       end;
                     if cgpara.alignment > 4 then
-                      internalerror(2014032401);
+                      internalerror(2014032408);
 
                     if segment<>NR_NO then
                       begin
@@ -1764,7 +1764,7 @@
         check_register_size(tosize,reg);
 
         if (tcgsize2size[fromsize]>32) or (tcgsize2size[tosize]>32) or (fromsize=OS_NO) or (tosize=OS_NO) then
-          internalerror(2011021307);
+          internalerror(2011021302);
 {        if tcgsize2size[tosize]<=tcgsize2size[fromsize] then
           fromsize:=tosize;}
 
@@ -1919,7 +1919,7 @@
                       add_mov(taicpu.op_reg_reg(A_MOV, S_B, reg1, reg2));
                   end
                 else
-                  internalerror(2013030210);
+                  internalerror(2013030203);
               OS_16,OS_S16:
                 case fromsize of
                   OS_8:
@@ -1955,7 +1955,7 @@
                         add_mov(taicpu.op_reg_reg(A_MOV, S_W, reg1, reg2));
                     end
                   else
-                    internalerror(2013030212);
+                    internalerror(2013030205);
                 end;
               OS_32,OS_S32:
                 case fromsize of
@@ -2013,10 +2013,10 @@
                         end;
                     end;
                   else
-                    internalerror(2013030213);
+                    internalerror(2013030206);
                 end;
               else
-                internalerror(2013030211);
+                internalerror(2013030204);
             end;
           end;
       end;
@@ -2176,7 +2176,7 @@
               a_jmp_cond(list, OC_B, l_skip);
             end;
           else
-            internalerror(2014010305);
+            internalerror(2014010321);
         end;
       end;
 
@@ -2204,7 +2204,7 @@
           OC_A:
             a_jmp_cond(list, OC_A, l_target);
           else
-            internalerror(2014010306);
+            internalerror(2014010322);
         end;
       end;
 
@@ -2276,7 +2276,7 @@
                   list.concat(Taicpu.op_const_reg(A_SBB, S_W, 0, reg));
                 end;
               else
-                internalerror(2013123101);
+                internalerror(2013123102);
             end;
             a_load_reg_reg(list,tmpsize,size,reg,reg);
           end
@@ -2297,7 +2297,7 @@
                   list.concat(Taicpu.op_const_reg(A_MOV, S_W, 0, reg));
                 end;
               else
-                internalerror(2013123101);
+                internalerror(2013123103);
             end;
 
             current_asmdata.getjumplabel(hl_skip);
@@ -2682,7 +2682,7 @@
         hsym:=tsym(procdef.parast.Find('self'));
         if not(assigned(hsym) and
                (hsym.typ=paravarsym)) then
-          internalerror(200305251);
+          internalerror(2003052502);
         paraloc:=tparavarsym(hsym).paraloc[callerside].location;
         with paraloc^ do
           begin
@@ -2715,7 +2715,7 @@
                     end;
                 end
               else
-                internalerror(200309189);
+                internalerror(2003091802);
             end;
             paraloc:=next;
           end;
@@ -2753,7 +2753,7 @@
               op2:=A_AND;
             end;
           else
-            internalerror(200203241);
+            internalerror(2002032403);
         end;
       end;
 
Index: compiler/i8086/cpupara.pas
===================================================================
--- compiler/i8086/cpupara.pas	(revision 47063)
+++ compiler/i8086/cpupara.pas	(working copy)
@@ -120,7 +120,7 @@
     function tcpuparamanager.asm_result_var(def:tdef;pd:tabstractprocdef):boolean;
       begin
         if not(po_assembler in pd.procoptions) then
-          internalerror(2018021501);
+          internalerror(2018021502);
         result:=ret_in_param(def,pd);
       end;
 
@@ -495,7 +495,7 @@
             else
               begin
                 if paralen=0 then
-                  internalerror(200501163);
+                  internalerror(2005011604);
                 firstparaloc:=true;
                 while (paralen>0) do
                   begin
@@ -691,7 +691,7 @@
                           else
                             begin
                               if paralen=0 then
-                                internalerror(200501163);
+                                internalerror(2005011605);
                               firstparaloc:=true;
                               while (paralen>0) do
                                 begin
Index: compiler/i8086/hlcgcpu.pas
===================================================================
--- compiler/i8086/hlcgcpu.pas	(revision 47063)
+++ compiler/i8086/hlcgcpu.pas	(working copy)
@@ -423,7 +423,7 @@
         size:=voidpointertype;
 
       if is_hugepointer(size) then
-        internalerror(2015111201)
+        internalerror(2015111204)
       else if is_farpointer(size) then
         cg.a_op_const_reg(list,Op,OS_16,a,reg)
       else
@@ -581,7 +581,7 @@
         srcseg: TRegister;
       begin
         if (procdef.extnumber=$ffff) then
-          Internalerror(200006139);
+          Internalerror(2000061306);
         if current_settings.x86memorymodel in x86_far_data_models then
           srcseg:=NR_ES
         else
Index: compiler/i8086/n8086add.pas
===================================================================
--- compiler/i8086/n8086add.pas	(revision 47063)
+++ compiler/i8086/n8086add.pas	(working copy)
@@ -106,7 +106,7 @@
               niln:
                 lv:=0;
               else
-                internalerror(2002080202);
+                internalerror(2002080201);
             end;
             case rt of
               ordconstn:
@@ -116,7 +116,7 @@
               niln:
                 rv:=0;
               else
-                internalerror(2002080203);
+                internalerror(2002080204);
             end;
 
             case nodetype of
@@ -138,7 +138,7 @@
                     if (rt=pointerconstn) then
                       begin
                         if not(nf_has_pointerdiv in flags) then
-                          internalerror(2008030101);
+                          internalerror(2008030102);
                         { todo: implement pointer-pointer as well }
                         internalerror(2014040607);
                         //t := cpointerconstnode.create(qword(v),resultdef);
@@ -240,7 +240,7 @@
           else
             begin
               { everything should be handled in pass_1 (JM) }
-              internalerror(200109051);
+              internalerror(2001090503);
             end;
         end;
 
@@ -456,7 +456,7 @@
         else if (left.resultdef.typ<>pointerdef) and (right.resultdef.typ=pointerdef) then
           pointernode:=right
         else
-          internalerror(2014040601);
+          internalerror(2014040608);
 
         if not (nodetype in [addn,subn]) then
           internalerror(2014040602);
@@ -927,7 +927,7 @@
                    end;
                end;
              else
-               internalerror(200203282);
+               internalerror(2002032801);
            end;
          end;
       end;
Index: compiler/i8086/n8086inl.pas
===================================================================
--- compiler/i8086/n8086inl.pas	(revision 47063)
+++ compiler/i8086/n8086inl.pas	(working copy)
@@ -178,7 +178,7 @@
                          { find proc field in methodpointer record }
                          hsym:=tfieldvarsym(trecorddef(procpointertype).symtable.Find('proc'));
                          if not assigned(hsym) then
-                           internalerror(200412041);
+                           internalerror(2004120404);
                          { Load tmehodpointer(left).proc }
                          result:=csubscriptnode.create(
                                       hsym,
@@ -346,7 +346,7 @@
                      addvalue:=tpointerdef(tcallparanode(left).left.resultdef).pointeddef.size;
                  end;
                else
-                 internalerror(10081);
+                 internalerror(2020100815);
              end;
              { second_ argument specified?, must be a s16bit in register }
              if assigned(tcallparanode(left).right) then
Index: compiler/i8086/n8086ld.pas
===================================================================
--- compiler/i8086/n8086ld.pas	(revision 47063)
+++ compiler/i8086/n8086ld.pas	(working copy)
@@ -134,7 +134,7 @@
             { make sure hregister can't allocate the register necessary for the parameter }
             pvd:=search_system_type('TRELOCATETHREADVARHANDLER').typedef;
             if pvd.typ<>procvardef then
-              internalerror(2012120901);
+              internalerror(2012120902);
             paraloc1.init;
             paramanager.getcgtempparaloc(current_asmdata.CurrAsmList,tprocvardef(pvd),1,paraloc1);
             hregister:=hlcg.getaddressregister(current_asmdata.CurrAsmList,pvd);
Index: compiler/i8086/n8086mat.pas
===================================================================
--- compiler/i8086/n8086mat.pas	(revision 47063)
+++ compiler/i8086/n8086mat.pas	(working copy)
@@ -114,7 +114,7 @@
 
         if is_64bitint(resultdef) or is_32bitint(resultdef) then
           { should be handled in pass_1 (JM) }
-          internalerror(200109052);
+          internalerror(2001090506);
         { put numerator in register }
         location_reset(location,LOC_REGISTER,def_cgsize(resultdef));
         hlcg.location_force_reg(current_asmdata.CurrAsmList,left.location,left.resultdef,resultdef,false);
Index: compiler/i8086/n8086mem.pas
===================================================================
--- compiler/i8086/n8086mem.pas	(revision 47063)
+++ compiler/i8086/n8086mem.pas	(working copy)
@@ -96,7 +96,7 @@
             location_reset(location,LOC_REGISTER,OS_16);
             location.register:=hlcg.getaddressregister(current_asmdata.CurrAsmList,voidnearpointertype);
             if not(left.location.loc in [LOC_REFERENCE,LOC_CREFERENCE]) then
-              internalerror(2015103001);
+              internalerror(2015103003);
             hlcg.a_loadaddr_ref_reg(current_asmdata.CurrAsmList,left.resultdef,voidnearpointertype,left.location.reference,location.register);
           end
         else
@@ -151,7 +151,7 @@
                    cg.a_load_const_reg(current_asmdata.CurrAsmList,OS_16,(left.location.value shr 16) and $FFFF,location.reference.segment);
                  end;
                else
-                 internalerror(200507031);
+                 internalerror(2005070302);
             end;
             if (cs_use_heaptrc in current_settings.globalswitches) and
                (cs_checkpointer in current_settings.localswitches) and
@@ -165,7 +165,7 @@
              begin
                if not searchsym_in_named_module('HEAPTRC','CHECKPOINTER',sym,st) or
                   (sym.typ<>procsym) then
-                 internalerror(2012010601);
+                 internalerror(2012010603);
                pd:=tprocdef(tprocsym(sym).ProcdefList[0]);
                paraloc1.init;
                paramanager.getcgtempparaloc(current_asmdata.CurrAsmList,pd,1,paraloc1);
Index: compiler/i8086/symcpu.pas
===================================================================
--- compiler/i8086/symcpu.pas	(revision 47063)
+++ compiler/i8086/symcpu.pas	(working copy)
@@ -250,7 +250,7 @@
     else if p is tcpuprocvardef then
       result:=tcpuprocvardef(p).is_far
     else
-      internalerror(2014041301);
+      internalerror(2014041303);
   end;
 
   { true if p is a far proc var }
Index: compiler/jvm/agjasmin.pas
===================================================================
--- compiler/jvm/agjasmin.pas	(revision 47063)
+++ compiler/jvm/agjasmin.pas	(working copy)
@@ -865,7 +865,7 @@
         kindname: ansistring;
       begin
         if not(obj.owner.defowner.typ in [objectdef,recorddef]) then
-          internalerror(2011021701);
+          internalerror(2011021704);
         { Nested classes in the Pascal sense are equivalent to "static"
           inner classes in Java -- will be changed when support for
           Java-style non-static classes is added }
Index: compiler/jvm/hlcgcpu.pas
===================================================================
--- compiler/jvm/hlcgcpu.pas	(revision 47063)
+++ compiler/jvm/hlcgcpu.pas	(working copy)
@@ -756,7 +756,7 @@
                 end;
               end;
             else
-              internalerror(2011081801);
+              internalerror(2011081802);
           end;
         end;
     end;
@@ -843,7 +843,7 @@
               decstack(list,2);
             end;
           else
-            internalerror(2010120538);
+            internalerror(2010120505);
         end;
       end;
 
@@ -1618,7 +1618,7 @@
             s64real:
               opc:=a_dreturn;
             else
-              internalerror(2011010213);
+              internalerror(2011010202);
           end;
         else
           opc:=a_areturn;
@@ -2429,7 +2429,7 @@
         exit;
       selfpara:=tparavarsym(current_procinfo.procdef.parast.find('self'));
       if not assigned(selfpara) then
-        internalerror(2011033001);
+        internalerror(2011033002);
       selfreg:=getaddressregister(list,selfpara.vardef);
       a_load_loc_reg(list,obj,obj,selfpara.localloc,selfreg);
       cgutils.reference_reset_base(ref,selfreg,0,ctempposinvalid,1,[]);
Index: compiler/jvm/jvmdef.pas
===================================================================
--- compiler/jvm/jvmdef.pas	(revision 47063)
+++ compiler/jvm/jvmdef.pas	(working copy)
@@ -449,7 +449,7 @@
         errdef: tdef;
       begin
         if not jvmtryencodetype(def,result,false,errdef) then
-          internalerror(2011012205);
+          internalerror(2011012201);
         primitivetype:=false;
         if length(result)=1 then
           begin
@@ -463,7 +463,7 @@
               'F': result:='float';
               'D': result:='double';
               else
-                internalerror(2011012206);
+                internalerror(2011012203);
               end;
             primitivetype:=true;
           end
Index: compiler/jvm/njvmcnv.pas
===================================================================
--- compiler/jvm/njvmcnv.pas	(revision 47063)
+++ compiler/jvm/njvmcnv.pas	(working copy)
@@ -1021,7 +1021,7 @@
           fsym:=tfieldvarsym(search_struct_member(tcpuprocvardef(fromdef).classdef,'METHOD'));
           if not assigned(fsym) or
              (fsym.typ<>fieldvarsym) then
-            internalerror(2011072414);
+            internalerror(2011072401);
           result:=csubscriptnode.create(fsym,left);
           left:=nil;
         end;
Index: compiler/jvm/njvmmem.pas
===================================================================
--- compiler/jvm/njvmmem.pas	(revision 47063)
+++ compiler/jvm/njvmmem.pas	(working copy)
@@ -263,7 +263,7 @@
                   end;
               end
             else
-              internalerror(2011072506);
+              internalerror(2011072503);
           end
         else if (left.resultdef.typ=procdef) then
           begin
@@ -334,7 +334,7 @@
             vs:=search_struct_member(tobjectdef(left.resultdef),'GETCLASS');
             if not assigned(vs) or
                (tsym(vs).typ<>procsym) then
-              internalerror(2011041901);
+              internalerror(2011041903);
             result:=ccallnode.create(nil,tprocsym(vs),vs.owner,left,[],nil);
             inserttypeconv_explicit(result,resultdef);
             { reused }
@@ -391,7 +391,7 @@
             psym:=search_struct_member(tabstractrecorddef(stringclass),'CHARAT');
             if not assigned(psym) or
                (psym.typ<>procsym) then
-              internalerror(2011031501);
+              internalerror(2011031502);
             { Pascal strings are 1-based, Java strings 0-based }
             result:=ccallnode.create(ccallparanode.create(
               caddnode.create(subn,right,genintconstnode(1)),nil),tprocsym(psym),
Index: compiler/jvm/njvmtcon.pas
===================================================================
--- compiler/jvm/njvmtcon.pas	(revision 47063)
+++ compiler/jvm/njvmtcon.pas	(working copy)
@@ -197,7 +197,7 @@
                 if (tstringconstnode(n).cst_type in [cst_unicodestring,cst_widestring]) then
                   inserttypeconv(n,getansistringdef);
                   if n.nodetype<>stringconstn then
-                    internalerror(2010033003);
+                    internalerror(2010033010);
                   ca:=pbyte(tstringconstnode(n).value_str);
                 { For tp7 the maximum lentgh can be 255 }
                 if (m_tp7 in current_settings.modeswitches) and
@@ -214,7 +214,7 @@
                begin
                  inserttypeconv(n,cansichartype);
                  if not is_constcharnode(n) then
-                   internalerror(2010033001);
+                   internalerror(2010033007);
                  ch[0]:=chr(tordconstnode(n).value.uvalue and $ff);
                  ca:=@ch;
                  len:=1;
Index: compiler/jvm/pjvm.pas
===================================================================
--- compiler/jvm/pjvm.pas	(revision 47063)
+++ compiler/jvm/pjvm.pas	(working copy)
@@ -267,11 +267,11 @@
         pd.synthetickind:=tsk_jvm_enum_fpcordinal;
         { add static class method to convert an ordinal to the corresponding enum }
         if not str_parse_method_dec('function FPCValueOf(__fpc_int: longint): __FPC_TEnumClassAlias; static;',potype_function,true,enumclass,pd) then
-          internalerror(2011062402);
+          internalerror(2011062403);
         pd.synthetickind:=tsk_jvm_enum_fpcvalueof;
         { similar (instance) function for use in set factories; implements FpcEnumValueObtainable interface }
         if not str_parse_method_dec('function fpcGenericValueOf(__fpc_int: longint): JLEnum;',potype_function,false,enumclass,pd) then
-          internalerror(2011062402);
+          internalerror(2011062404);
         pd.synthetickind:=tsk_jvm_enum_fpcvalueof;
 
         { insert "public static valueOf(string): tenumclass" that returns tenumclass(inherited valueOf(tenumclass,string)) }
@@ -417,7 +417,7 @@
             old_current_structdef:=current_structdef;
             current_structdef:=pvclass;
             if not str_parse_method_dec('constructor Create(__intf:'+pvintf.objextname^+');overload;',potype_constructor,false,pvclass,methoddef) then
-              internalerror(2011092401);
+              internalerror(2011092402);
             methoddef.synthetickind:=tsk_jvm_procvar_intconstr;
             methoddef.skpara:=def;
             current_structdef:=old_current_structdef;
Index: compiler/llvm/aasmllvm.pas
===================================================================
--- compiler/llvm/aasmllvm.pas	(revision 47063)
+++ compiler/llvm/aasmllvm.pas	(working copy)
@@ -671,7 +671,7 @@
                 2:
                   result:=oper[1]^.def;
                 else
-                  internalerror(2013110105);
+                  internalerror(2013110111);
               end;
             end;
           la_fence,
Index: compiler/llvm/agllvm.pas
===================================================================
--- compiler/llvm/agllvm.pas	(revision 47063)
+++ compiler/llvm/agllvm.pas	(working copy)
@@ -307,7 +307,7 @@
             if ref.offset<>0 then
               result:=result+'offset='+tostr(ref.offset);
             result:=result+')**';
-            internalerror(2013060225);
+            internalerror(2013060203);
           end;
          if ref.base<>NR_NO then
            result:=result+getregisterstring(ref.base)
@@ -454,7 +454,7 @@
                else
                  getopstr:='null';
                if o.ref^.offset<>0 then
-                 internalerror(2013060223);
+                 internalerror(2013060202);
              end
            else
              getopstr:=getreferencestring(o.ref^,refwithalign);
@@ -883,7 +883,7 @@
               aitrealconst_s64comp:
                 writer.AsmWriteLn(asminfo^.comment+'value: '+extended2str(tai_realconst(hp).value.s64compval));
               else
-                internalerror(2014050604);
+                internalerror(2014050603);
             end;
             internalerror(2016120202);
           end;
@@ -960,7 +960,7 @@
 }
             end;
           else
-            internalerror(200704251);
+            internalerror(2007042504);
         end;
       end;
 
@@ -1378,7 +1378,7 @@
             begin
               { must only appear as an operand }
               if fdecllevel=0 then
-                internalerror(2019050110);
+                internalerror(2019050101);
               writer.AsmWrite('!');
               writer.AsmWrite(tai_llvmmetadatareferenceoperand(hp).id);
               writer.AsmWrite(' !');
Index: compiler/llvm/hlcgllvm.pas
===================================================================
--- compiler/llvm/hlcgllvm.pas	(revision 47063)
+++ compiler/llvm/hlcgllvm.pas	(working copy)
@@ -270,7 +270,7 @@
             LOC_REFERENCE,LOC_CREFERENCE:
               begin
                  if assigned(location^.next) then
-                   internalerror(2010052906);
+                   internalerror(2010052901);
                  reference_reset_base(ref,cpointerdef.getreusable(size),location^.reference.index,location^.reference.offset,ctempposinvalid,newalignment(cgpara.alignment,cgpara.intsize-sizeleft),[]);
                  if (def_cgsize(size)<>OS_NO) and
                     (size.size=sizeleft) and
@@ -295,11 +295,11 @@
                    OS_NO:
                      a_loadmm_ref_reg(list,location^.def,location^.def,tmpref,location^.register,nil);
                    else
-                     internalerror(2010053101);
+                     internalerror(2010053105);
                  end;
               end
             else
-              internalerror(2010053111);
+              internalerror(2010053107);
           end;
           inc(totaloffset,tcgsize2size[location^.size]);
           dec(sizeleft,tcgsize2size[location^.size]);
@@ -685,7 +685,7 @@
     begin
       if (fromsize=llvm_metadatatype) or
          (tosize=llvm_metadatatype) then
-        internalerror(2019122802);
+        internalerror(2019122812);
       sref:=make_simple_ref(list,ref,tosize);
       hreg:=register;
       (* typecast the pointer to the value instead of the value itself if
@@ -758,7 +758,7 @@
     begin
       if (fromsize=llvm_metadatatype) or
          (tosize=llvm_metadatatype) then
-        internalerror(2019122801);
+        internalerror(2019122805);
       op:=llvmconvop(fromsize,tosize,true);
       { converting from pointer to something else and vice versa is only
         possible via an intermediate pass to integer. Same for "something else"
Index: compiler/llvm/llvmdef.pas
===================================================================
--- compiler/llvm/llvmdef.pas	(revision 47063)
+++ compiler/llvm/llvmdef.pas	(working copy)
@@ -224,7 +224,7 @@
                   begin
                     { todo: update once we support vectors }
                     if not(toregtyp in [R_FPUREGISTER,R_MMREGISTER]) then
-                      internalerror(2014062203);
+                      internalerror(2014062202);
                     if tobytesize<frombytesize then
                       result:=la_fptrunc
                     else
Index: compiler/llvm/llvmpara.pas
===================================================================
--- compiler/llvm/llvmpara.pas	(revision 47063)
+++ compiler/llvm/llvmpara.pas	(working copy)
@@ -75,7 +75,7 @@
   procedure tllvmparamanager.getcgtempparaloc(list: TAsmList; pd: tabstractprocdef; nr: longint; var cgpara: tcgpara);
     begin
       if (nr<1) or (nr>pd.paras.count) then
-        InternalError(2015040401);
+        InternalError(2015040402);
       pd.init_paraloc_info(callerside);
       createtempparaloc(list,pd.proccalloption,tparavarsym(pd.paras[nr-1]),true,cgpara);
     end;
@@ -256,7 +256,7 @@
           not(po_assembler in p.procoptions)) then
         begin
           if not(paraloc^.loc in [LOC_REGISTER,LOC_FPUREGISTER,LOC_MMREGISTER]) then
-            internalerror(2019011902);
+            internalerror(2019011901);
           reducetosingleregparaloc(paraloc,result.def,paraloc^.register);
         end;
     end;
Index: compiler/llvm/llvmpi.pas
===================================================================
--- compiler/llvm/llvmpi.pas	(revision 47063)
+++ compiler/llvm/llvmpi.pas	(working copy)
@@ -408,7 +408,7 @@
       begin
         result:=TAsmLabel(fexceptlabelstack.last);
         if not assigned(result) then
-          internalerror(2016121703);
+          internalerror(2016121706);
       end;
 
 
Index: compiler/llvm/llvmtype.pas
===================================================================
--- compiler/llvm/llvmtype.pas	(revision 47063)
+++ compiler/llvm/llvmtype.pas	(working copy)
@@ -685,9 +685,9 @@
                     dbg_state_written:
                       continue;
                     dbg_state_writing:
-                      internalerror(200610052);
+                      internalerror(2006100501);
                     dbg_state_unused:
-                      internalerror(200610053);
+                      internalerror(2006100505);
                     dbg_state_used:
                       appenddef(current_asmdata.asmlists[al_start],def)
                   else
Index: compiler/llvm/nllvmmem.pas
===================================================================
--- compiler/llvm/nllvmmem.pas	(revision 47063)
+++ compiler/llvm/nllvmmem.pas	(working copy)
@@ -244,7 +244,7 @@
           exit;
         end;
       if (l>8*sizeof(aint)) then
-        internalerror(200608051);
+        internalerror(2006080502);
 
       { adjust the index by subtracting the lower bound of the array and adding
         any constant adjustments }
Index: compiler/llvm/nllvmtcon.pas
===================================================================
--- compiler/llvm/nllvmtcon.pas	(revision 47063)
+++ compiler/llvm/nllvmtcon.pas	(working copy)
@@ -469,7 +469,7 @@
       if not assigned(ll.lab) then
         begin
           if ll.ofs<>0 then
-            internalerror(2015030701);
+            internalerror(2015030703);
           inherited;
           exit;
         end;
Index: compiler/m68k/cgcpu.pas
===================================================================
--- compiler/m68k/cgcpu.pas	(revision 47063)
+++ compiler/m68k/cgcpu.pas	(working copy)
@@ -1194,7 +1194,7 @@
           OP_DIV,
           OP_IDIV:
               begin
-                 internalerror(20020816);
+                 internalerror(2002081601);
               end;
           OP_MUL,
           OP_IMUL:
@@ -1294,7 +1294,7 @@
                 move_if_needed(list, size, scratch_reg, reg);
               end;
         else
-            internalerror(20020729);
+            internalerror(2002072901);
          end;
       end;
 
@@ -1425,7 +1425,7 @@
           OP_DIV,
           OP_IDIV :
               begin
-                internalerror(20020816);
+                internalerror(2002081602);
               end;
           OP_MUL,
           OP_IMUL:
@@ -1471,7 +1471,7 @@
                 move_if_needed(list, size, hreg2, dst);
               end;
         else
-            internalerror(20020729);
+            internalerror(2002072902);
          end;
       end;
 
@@ -2212,7 +2212,7 @@
               OS_16:
                 begin
                   if (isaddressregister(reg)) then
-                    internalerror(2015031502);
+                    internalerror(2015031503);
                   //list.concat(tai_comment.create(strpnew('zero extend word')));
                   list.concat(taicpu.op_const_reg(A_AND,S_L,$FFFF,reg));
                 end;
@@ -2577,10 +2577,10 @@
           { this is handled in 1st pass for 32-bit cpus (helper call) }
           OP_IDIV,OP_DIV,
           OP_IMUL,OP_MUL:
-            internalerror(2002081701);
+            internalerror(2002081703);
           { this is also handled in 1st pass for 32-bit cpus (helper call) }
           OP_SAR,OP_SHL,OP_SHR:
-            internalerror(2002081702);
+            internalerror(2002081704);
           { these should have been handled already by earlier passes }
           OP_NOT,OP_NEG:
             internalerror(2012110403);
Index: compiler/m68k/cpupara.pas
===================================================================
--- compiler/m68k/cpupara.pas	(revision 47063)
+++ compiler/m68k/cpupara.pas	(working copy)
@@ -699,7 +699,7 @@
               end;
           end
         else
-          internalerror(200410231);
+          internalerror(2004102304);
         create_funcretloc_info(p,side);
       end;
 
Index: compiler/m68k/n68kadd.pas
===================================================================
--- compiler/m68k/n68kadd.pas	(revision 47063)
+++ compiler/m68k/n68kadd.pas	(working copy)
@@ -410,7 +410,7 @@
                 cgop:=OP_IMUL;
             end;
           else
-            internalerror(2013120104);
+            internalerror(2013120111);
         end;
 
         pass_left_right;
Index: compiler/m68k/n68kcal.pas
===================================================================
--- compiler/m68k/n68kcal.pas	(revision 47063)
+++ compiler/m68k/n68kcal.pas	(working copy)
@@ -81,7 +81,7 @@
                   inc(pushedparasize,2); { kludge, trap code should be a hidden para instead... }
                 end
               else
-                internalerror(2016100301);
+                internalerror(2016100302);
             end;
           system_m68k_amiga:
             begin
Index: compiler/m68k/n68kmat.pas
===================================================================
--- compiler/m68k/n68kmat.pas	(revision 47063)
+++ compiler/m68k/n68kmat.pas	(working copy)
@@ -218,7 +218,7 @@
                current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_FNEG,fpuregopsize,left.location.register,location.register));
             end;
           else
-            internalerror(200306021);
+            internalerror(2003060202);
         end;
       end;
 
Index: compiler/m68k/n68kmem.pas
===================================================================
--- compiler/m68k/n68kmem.pas	(revision 47063)
+++ compiler/m68k/n68kmem.pas	(working copy)
@@ -161,7 +161,7 @@
              exit;
            end;
          if (l > 8*sizeof(aint)) then
-           internalerror(200608051);
+           internalerror(2006080503);
          sref.ref := location.reference;
          hreg := cg.getintregister(current_asmdata.CurrAsmList,OS_ADDR);
          cg.a_op_const_reg_reg(current_asmdata.CurrAsmList,OP_SUB,OS_INT,tarraydef(left.resultdef).lowrange,maybe_const_reg,hreg);
Index: compiler/mips/aasmcpu.pas
===================================================================
--- compiler/mips/aasmcpu.pas	(revision 47063)
+++ compiler/mips/aasmcpu.pas	(working copy)
@@ -453,11 +453,11 @@
                 R_SUBFD :
                   result:=taicpu.op_reg_ref(A_LDC1,r,ref);
                 else
-                  internalerror(200401042);
+                  internalerror(2004010418);
               end;
             end
           else
-            internalerror(200401041);
+            internalerror(2004010408);
         end;
       end;
 
@@ -475,11 +475,11 @@
                 R_SUBFD :
                   result:=taicpu.op_reg_ref(A_SDC1,r,ref);
                 else
-                  internalerror(200401042);
+                  internalerror(2004010419);
               end;
             end
           else
-            internalerror(200401041);
+            internalerror(2004010409);
         end;
       end;
 
Index: compiler/mips/cgcpu.pas
===================================================================
--- compiler/mips/cgcpu.pas	(revision 47063)
+++ compiler/mips/cgcpu.pas	(working copy)
@@ -630,7 +630,7 @@
   if (cs_create_pic in current_settings.moduleswitches) then
     begin
       if not (pi_needs_got in current_procinfo.flags) then
-        InternalError(2013060103);
+        InternalError(2013060104);
       { For PIC global symbols offset must be handled separately.
         Otherwise (non-PIC or local symbols) offset can be encoded
         into relocation even if exceeds 16 bits. }
Index: compiler/mips/cpuelf.pas
===================================================================
--- compiler/mips/cpuelf.pas	(revision 47063)
+++ compiler/mips/cpuelf.pas	(working copy)
@@ -1069,7 +1069,7 @@
           else
             begin
               writeln(objsec.fullname,'+',objreloc.dataoffset,' ',objreloc.ftype);
-              internalerror(200604014);
+              internalerror(2006040106);
             end;
           end
         else           { not relocsec.Used }
Index: compiler/mips/cpugas.pas
===================================================================
--- compiler/mips/cpugas.pas	(revision 47063)
+++ compiler/mips/cpugas.pas	(working copy)
@@ -177,7 +177,7 @@
             top_ref:
               getopstr := getreferencestring(ref^);
             else
-              internalerror(10001);
+              internalerror(2020100809);
           end;
       end;
 
Index: compiler/mips/hlcgcpu.pas
===================================================================
--- compiler/mips/hlcgcpu.pas	(revision 47063)
+++ compiler/mips/hlcgcpu.pas	(working copy)
@@ -249,7 +249,7 @@
       list.concat(taicpu.op_reg_ref(A_LW,NR_VMT,href));
 
       if (procdef.extnumber=$ffff) then
-        Internalerror(200006139);
+        Internalerror(2000061303);
 
       { TODO: case of large VMT is not handled }
       { We have no reason not to use $t9 even in non-PIC mode. }
Index: compiler/mips/ncpucnv.pas
===================================================================
--- compiler/mips/ncpucnv.pas	(revision 47063)
+++ compiler/mips/ncpucnv.pas	(working copy)
@@ -185,7 +185,7 @@
         end;
       end;
       else
-        internalerror(200410031);
+        internalerror(2004100306);
     end;
   end;
 end;
Index: compiler/mips/ncpuinln.pas
===================================================================
--- compiler/mips/ncpuinln.pas	(revision 47063)
+++ compiler/mips/ncpuinln.pas	(working copy)
@@ -102,7 +102,7 @@
     s64real:
       current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_ABS_d, location.Register, left.location.Register));
     else
-      internalerror(200410031);
+      internalerror(2004100305);
   end;
 end;
 
Index: compiler/mips/racpugas.pas
===================================================================
--- compiler/mips/racpugas.pas	(revision 47063)
+++ compiler/mips/racpugas.pas	(working copy)
@@ -251,7 +251,7 @@
                   OPR_LOCAL:
                     inc(oper.opr.localsymofs,l);
                 else
-                  InternalError(12345);
+                  InternalError(2020100817);
                 end;
                 GotPlus:=(prevasmtoken=AS_PLUS) or
                          (prevasmtoken=AS_MINUS);
@@ -291,7 +291,7 @@
                   OPR_REFERENCE :
                     inc(oper.opr.ref.offset,l);
                   else
-                    internalerror(200309202);
+                    internalerror(2003092006);
                 end;
                 Consume(AS_RPAREN);
                 gotplus:=false;
@@ -380,7 +380,7 @@
                          OPR_REFERENCE :
                            inc(oper.opr.ref.offset,l);
                          else
-                           internalerror(200309202);
+                           internalerror(2003092007);
                        end;
                      end
                  end;
Index: compiler/nadd.pas
===================================================================
--- compiler/nadd.pas	(revision 47063)
+++ compiler/nadd.pas	(working copy)
@@ -2891,7 +2891,7 @@
                     { find proc field in methodpointer record }
                     hsym:=tfieldvarsym(trecorddef(methodpointertype).symtable.Find('proc'));
                     if not assigned(hsym) then
-                      internalerror(200412043);
+                      internalerror(2004120405);
                     { Compare tmehodpointer(left).proc }
                     right:=csubscriptnode.create(
                                  hsym,
Index: compiler/nbas.pas
===================================================================
--- compiler/nbas.pas	(revision 47063)
+++ compiler/nbas.pas	(working copy)
@@ -1666,7 +1666,7 @@
       begin
         temp:=ttempcreatenode(nodeppuidxget(tempidx));
         if temp.nodetype<>tempcreaten then
-          internalerror(200311075);
+          internalerror(2003110701);
         tempinfo:=temp.tempinfo;
       end;
 
Index: compiler/ncgadd.pas
===================================================================
--- compiler/ncgadd.pas	(revision 47063)
+++ compiler/ncgadd.pas	(working copy)
@@ -210,7 +210,7 @@
             equaln:   result:=OC_EQ;
             unequaln: result:=OC_NE;
           else
-            internalerror(2011010412);
+            internalerror(2011010403);
           end
       end;
 
@@ -607,7 +607,7 @@
                 end;
             end;
           else
-            internalerror(2002072803);
+            internalerror(2002072804);
         end;
 {$endif cpu64bitalu or cpuhighleveltarget}
 
Index: compiler/ncgcal.pas
===================================================================
--- compiler/ncgcal.pas	(revision 47063)
+++ compiler/ncgcal.pas	(working copy)
@@ -504,7 +504,7 @@
           else
             begin
               reference_reset(tmpref,0,[]);
-              internalerror(2016090202);
+              internalerror(2016090205);
             end;
         end;
       end;
Index: compiler/ncgcon.pas
===================================================================
--- compiler/ncgcon.pas	(revision 47063)
+++ compiler/ncgcon.pas	(working copy)
@@ -312,7 +312,7 @@
                                { because we hardcode the offset below due to it
                                  not being stored in the hashset, check here }
                                if lastlabel.ofs<>datatcb.get_string_symofs(tstringdef(resultdef).stringtype,winlikewidestring) then
-                                 internalerror(2012051704);
+                                 internalerror(2012051702);
                              end;
                            { no contents of the datatcb itself to concatenate,
                              as we will just return the address of the emitted
Index: compiler/ncginl.pas
===================================================================
--- compiler/ncginl.pas	(revision 47063)
+++ compiler/ncginl.pas	(working copy)
@@ -425,7 +425,7 @@
                    addvalue:=tpointerdef(tcallparanode(left).left.resultdef).pointeddef.size;
                end;
            else
-               internalerror(10081);
+               internalerror(2020100814);
           end;
           { second_ argument specified?, must be a s32bit in register }
           if assigned(tcallparanode(left).right) then
@@ -678,27 +678,27 @@
 }
     procedure tcginlinenode.second_pi;
       begin
-        internalerror(20020718);
+        internalerror(2002071801);
       end;
 
     procedure tcginlinenode.second_arctan_real;
       begin
-        internalerror(20020718);
+        internalerror(2002071802);
       end;
 
     procedure tcginlinenode.second_abs_real;
       begin
-        internalerror(20020718);
+        internalerror(2002071803);
       end;
 
     procedure tcginlinenode.second_round_real;
       begin
-        internalerror(20020718);
+        internalerror(2002071804);
       end;
 
     procedure tcginlinenode.second_trunc_real;
       begin
-        internalerror(20020718);
+        internalerror(2002071805);
       end;
 
     procedure tcginlinenode.second_int_real;
@@ -708,27 +708,27 @@
 
     procedure tcginlinenode.second_sqr_real;
       begin
-        internalerror(20020718);
+        internalerror(2002071806);
       end;
 
     procedure tcginlinenode.second_sqrt_real;
       begin
-        internalerror(20020718);
+        internalerror(2002071807);
       end;
 
     procedure tcginlinenode.second_ln_real;
       begin
-        internalerror(20020718);
+        internalerror(2002071808);
       end;
 
     procedure tcginlinenode.second_cos_real;
       begin
-        internalerror(20020718);
+        internalerror(2002071809);
       end;
 
     procedure tcginlinenode.second_sin_real;
       begin
-        internalerror(20020718);
+        internalerror(2002071810);
       end;
 
 
@@ -966,7 +966,7 @@
 
     procedure tcginlinenode.second_popcnt;
       begin
-        internalerror(2012082601);
+        internalerror(2012082602);
       end;
 
 
Index: compiler/ncnv.pas
===================================================================
--- compiler/ncnv.pas	(revision 47063)
+++ compiler/ncnv.pas	(working copy)
@@ -1184,7 +1184,7 @@
         with tarraydef(resultdef) do
           begin
             if highrange<lowrange then
-             internalerror(200501051);
+             internalerror(2005010502);
             arrsize := highrange-lowrange+1;
           end;
         if (left.nodetype = stringconstn) and
@@ -2042,7 +2042,7 @@
           begin
             { arr[i] := param_i }
             if not assigned(elemnode.left) then
-              internalerror(2017050101);
+              internalerror(2017050103);
             addstatement(assstatement,
               cassignmentnode.create(
                 cvecnode.create(
Index: compiler/ngenutil.pas
===================================================================
--- compiler/ngenutil.pas	(revision 47063)
+++ compiler/ngenutil.pas	(working copy)
@@ -197,7 +197,7 @@
                   nil));
             end
           else
-            internalerror(200305108);
+            internalerror(2003051002);
         end
       else
         if is_object(current_structdef) then
Index: compiler/ngtcon.pas
===================================================================
--- compiler/ngtcon.pas	(revision 47063)
+++ compiler/ngtcon.pas	(working copy)
@@ -1321,7 +1321,7 @@
                       begin
                         inserttypeconv(n,cunicodestringtype);
                         if n.nodetype<>stringconstn then
-                          internalerror(2010033003);
+                          internalerror(2010033009);
                         ca:=pointer(pcompilerwidestring(tstringconstnode(n).value_str)^.data)
                       end;
                     else
@@ -1357,13 +1357,13 @@
                       begin
                         inserttypeconv(n,cansichartype);
                         if not is_constcharnode(n) then
-                          internalerror(2010033001);
+                          internalerror(2010033006);
                         ch[0]:=chr(tordconstnode(n).value.uvalue and $ff);
                       end;
                     2:
                       widechar(ch):=widechar(tordconstnode(n).value.uvalue and $ffff);
                     else
-                      internalerror(2010033002);
+                      internalerror(2010033008);
                   end;
                   ca:=@ch;
                   len:=1;
Index: compiler/ninl.pas
===================================================================
--- compiler/ninl.pas	(revision 47063)
+++ compiler/ninl.pas	(working copy)
@@ -486,7 +486,7 @@
         def : tdef;
       begin
         if not assigned(left) or (left.nodetype<>typen) then
-          internalerror(2012032101);
+          internalerror(2012032102);
         def:=ttypenode(left).typedef;
         result:=nil;
         case def.typ of
@@ -608,7 +608,7 @@
               in_rewrite_typedfile_name:
                 result := ccallnode.createintern('fpc_rewrite_typed_name_iso',left);
               else
-                internalerror(2016101501);
+                internalerror(2016101502);
             end;
           end
         else
@@ -1127,7 +1127,7 @@
             in_writeln_x:
               name:='fpc_writeln_end';
             else
-              internalerror(2019050516);
+              internalerror(2019050501);
           end;
           addstatement(Tstatementnode(newstatement),ccallnode.createintern(name,filepara.getcopy));
         end;
@@ -1500,7 +1500,7 @@
             s16bit: exit('smallint');
             u16bit: exit('word');
             else
-              internalerror(2013032604);
+              internalerror(2013032606);
           end;
         end
       else
@@ -1509,10 +1509,10 @@
             s64bit,s32bit,s16bit,s8bit: exit('sint');
             u64bit,u32bit,u16bit,u8bit: exit('uint');
             else
-              internalerror(2013032604);
+              internalerror(2013032607);
           end;
         end;
-      internalerror(2013032605);
+      internalerror(2013032608);
     end;
 
 
@@ -2082,7 +2082,7 @@
                       8:
                         vl:=vl and byte($3f);
                       else
-                        internalerror(2013122302);
+                        internalerror(2013122303);
                     end;
                   if (tcallparanode(tcallparanode(left).right).left.nodetype=ordconstn) then
                     begin
@@ -2180,7 +2180,7 @@
                       8:
                         vl:=vl and byte($3f);
                       else
-                        internalerror(2013122302);
+                        internalerror(2013122304);
                     end;
                   if (tcallparanode(tcallparanode(left).right).left.nodetype=ordconstn) then
                     begin
@@ -2795,7 +2795,7 @@
                         8:
                           result:=cordconstnode.create(BsrQWord(QWord(tordconstnode(left).value.uvalue)),resultdef,false);
                         else
-                          internalerror(2017042401);
+                          internalerror(2017042402);
                       end;
                     end;
                 end;
@@ -4109,7 +4109,7 @@
             end;
 
           in_slice_x:
-            internalerror(2005101501);
+            internalerror(2005101502);
 
           in_ord_x,
           in_chr_byte:
@@ -4119,7 +4119,7 @@
             end;
 
           in_ofs_x :
-            internalerror(2000101001);
+            internalerror(2000101002);
 
           in_seg_x :
             begin
@@ -4139,7 +4139,7 @@
           in_writeln_x :
             begin
               { should be handled by pass_typecheck }
-              internalerror(200108234);
+              internalerror(2001082302);
             end;
          in_get_frame:
             begin
@@ -4777,7 +4777,7 @@
                   lowppn:=tcallparanode(tcallparanode(paras).right).left.getcopy;
                 end;
               else
-                internalerror(2012100701);
+                internalerror(2012100703);
             end;
 
             if is_open_array(paradef) then
@@ -4789,7 +4789,7 @@
                 arrayppn:=ctypeconvnode.create_internal(ppn.left,voidpointertype);
               end
             else
-              internalerror(2012100702);
+              internalerror(2012100704);
 
             rttippn:=caddrnode.create_internal(crttinode.create(tstoreddef(resultdef),initrtti,rdt_normal));
 
Index: compiler/nmat.pas
===================================================================
--- compiler/nmat.pas	(revision 47063)
+++ compiler/nmat.pas	(working copy)
@@ -460,7 +460,7 @@
         if result.resultdef.typ<>orddef then
           internalerror(2013031701);
         if resultdef.typ<>orddef then
-          internalerror(2013031701);
+          internalerror(2013031702);
         if torddef(result.resultdef).ordtype <> torddef(resultdef).ordtype then
           inserttypeconv(result,resultdef);
       end;
@@ -833,7 +833,7 @@
 {$elseif defined(cpu16bitalu) or defined(cpu8bitalu)}
                      inserttypeconv(left,get_common_intdef(torddef(left.resultdef),torddef(uinttype),true));
 {$else}
-                     internalerror(2013031301);
+                     internalerror(2013031302);
 {$endif}
                    end
                end;
Index: compiler/ogbase.pas
===================================================================
--- compiler/ogbase.pas	(revision 47063)
+++ compiler/ogbase.pas	(working copy)
@@ -1492,7 +1492,7 @@
     function TObjData.symboldefine(const aname:string;abind:TAsmsymbind;atyp:Tasmsymtype):TObjSymbol;
       begin
         if not assigned(CurrObjSec) then
-          internalerror(200603051);
+          internalerror(2006030504);
         result:=CreateSymbol(aname);
         result.SetAddress(CurrPass,CurrObjSec,abind,atyp);
       end;
@@ -1744,7 +1744,7 @@
             if (oso_data in sec.SecOptions) then
               begin
                 if sec.Data=nil then
-                  internalerror(200403073);
+                  internalerror(2004030707);
                 FWriter.writezeros(sec.dataalignbytes);
                 if sec.Datapos<>FWriter.ObjSize then
                   internalerror(200604031);
@@ -2259,7 +2259,7 @@
       begin
         objsym:=TObjSymbol(internalObjData.ObjSymbolList.Find(aname));
         if (objsym=nil) or (objsym.ObjSection.ObjData<>internalObjData) then
-          internalerror(200603041);
+          internalerror(2006030403);
         exesym:=TExeSymbol(ExeSymbolList.Find(aname));
         if not assigned(exesym) then
           internalerror(201206301);
@@ -2385,7 +2385,7 @@
         if indexpos=MAXVAL then
           begin
             Comment(V_Error,'Too many values '+avalue);
-            internalerror(200602254);
+            internalerror(2006022505);
           end;
         len:=bytesize*indexpos;
         inc(Fvaluesnr);
@@ -3466,7 +3466,7 @@
               else if assigned(refgrp) then
                 exemap.Add('  References '+refgrp.Name)
               else
-                internalerror(200603316);
+                internalerror(2006033111);
             end;
           if assigned(refobjsec) then
             AddToObjSectionWorkList(refobjsec);
@@ -3533,7 +3533,7 @@
                       if not assigned(vtableexesym) then
                         internalerror(200603315);
                       if not assigned(vtableexesym.vtable) then
-                        internalerror(200603316);
+                        internalerror(2006033112);
                       DoVTableRef(vtableexesym.vtable,vtableidx);
                     end;
                 end;
@@ -3631,7 +3631,7 @@
                   internalerror(200603301);
                 if (objsec.ObjRelocations.Count>0) and
                    not assigned(objsec.data) then
-                  internalerror(200205183);
+                  internalerror(2002051801);
                 DoRelocationFixup(objsec);
                 {for size = 0 data is not valid PM }
                 if assigned(objsec.data) and (objsec.data.size<>objsec.size) then
@@ -3685,7 +3685,7 @@
             if oso_data in exesec.SecOptions then
               begin
                 if exesec.DataPos<FWriter.Size then
-                  InternalError(2012103001);
+                  InternalError(2012103002);
                 FWriter.Writezeros(exesec.DataPos-FWriter.Size);
                 for i:=0 to exesec.ObjSectionList.Count-1 do
                   begin
@@ -3693,13 +3693,13 @@
                     if oso_data in objsec.secoptions then
                       begin
                         if not assigned(objsec.data) then
-                          internalerror(200603042);
+                          internalerror(2006030404);
                         dpos:=objsec.MemPos-exesec.MemPos+exesec.DataPos;
                         pad:=dpos-FWriter.Size;
                         { objsection must be within SecAlign bytes from the previous one }
                         if (dpos<FWriter.Size) or
                           (pad>=max(objsec.SecAlign,1)) then
-                          internalerror(200602251);
+                          internalerror(2006022503);
                         FWriter.writeZeros(pad);
                         FWriter.writearray(objsec.data);
                       end;
Index: compiler/ogcoff.pas
===================================================================
--- compiler/ogcoff.pas	(revision 47063)
+++ compiler/ogcoff.pas	(working copy)
@@ -1097,7 +1097,7 @@
                     address:=(address and $ff000000) or ((relocval shr 1) and $ffffff) or ((relocval and 1) shl 24);
                     relocval:=relocval shr 25;
                     if (relocval<>$3f) and (relocval<>0) then
-                      internalerror(200606085);  { offset overflow }
+                      internalerror(2006060801);  { offset overflow }
                   end;
 {$endif arm}
 {$ifdef aarch64}
@@ -1287,7 +1287,7 @@
         symaddr : aword;
       begin
         if CurrObjSec=nil then
-          internalerror(200403072);
+          internalerror(2004030701);
         if assigned(p) then
           begin
             { current address }
@@ -2521,7 +2521,7 @@
         exesec : TExeSection;
       begin
         if not assigned(texesymbol(p).objsymbol) then
-          internalerror(200603053);
+          internalerror(2006030505);
         with texesymbol(p).objsymbol do
           begin
             if assigned(objsection) then
@@ -2789,7 +2789,7 @@
         bssExeSec:=FindExeSection('.bss');
         if not assigned(TextExeSec) or
            not assigned(DataExeSec) then
-          internalerror(200602231);
+          internalerror(2006022302);
         { do we need to write symbols? }
         hassymbols:=(ExeWriteMode=ewm_dbgonly) or
                     (
@@ -3359,7 +3359,7 @@
           begin
             exesec:=FindExeSection('.reloc');
             if exesec=nil then
-              InternalError(2012072401);
+              InternalError(2012072403);
             exesec.Disabled:=false;
           end;
         inherited;
Index: compiler/ogomf.pas
===================================================================
--- compiler/ogomf.pas	(revision 47063)
+++ compiler/ogomf.pas	(working copy)
@@ -907,7 +907,7 @@
             else if typ in [RELOC_RELATIVE16,RELOC_RELATIVE32,RELOC_SEGREL] then
               FOmfFixup.Mode:=fmSelfRelative
             else
-              internalerror(2015041401);
+              internalerror(2015041408);
             if typ in [RELOC_ABSOLUTE16,RELOC_ABSOLUTE32,RELOC_RELATIVE16,RELOC_RELATIVE32] then
               begin
                 FOmfFixup.TargetMethod:=ftmSegmentIndexNoDisp;
@@ -945,7 +945,7 @@
             else if typ in [RELOC_SEG,RELOC_SEGREL] then
               FOmfFixup.LocationType:=fltBase
             else
-              internalerror(2015041501);
+              internalerror(2015041505);
             FOmfFixup.FrameDeterminedByThread:=False;
             FOmfFixup.TargetDeterminedByThread:=False;
             if typ in [RELOC_ABSOLUTE16,RELOC_ABSOLUTE32,RELOC_SEG] then
@@ -953,7 +953,7 @@
             else if typ in [RELOC_RELATIVE16,RELOC_RELATIVE32,RELOC_SEGREL] then
               FOmfFixup.Mode:=fmSelfRelative
             else
-              internalerror(2015041401);
+              internalerror(2015041409);
             FOmfFixup.TargetMethod:=ftmExternalIndexNoDisp;
             FOmfFixup.TargetDatum:=symbol.symidx;
             FOmfFixup.FrameMethod:=ffmTarget;
@@ -968,7 +968,7 @@
             else if typ in [RELOC_SEG,RELOC_SEGREL] then
               FOmfFixup.LocationType:=fltBase
             else
-              internalerror(2015041501);
+              internalerror(2015041506);
             FOmfFixup.FrameDeterminedByThread:=False;
             FOmfFixup.TargetDeterminedByThread:=False;
             if typ in [RELOC_ABSOLUTE16,RELOC_ABSOLUTE32,RELOC_SEG] then
@@ -976,7 +976,7 @@
             else if typ in [RELOC_RELATIVE16,RELOC_RELATIVE32,RELOC_SEGREL] then
               FOmfFixup.Mode:=fmSelfRelative
             else
-              internalerror(2015041401);
+              internalerror(2015041410);
             FOmfFixup.FrameMethod:=ffmTarget;
             FOmfFixup.TargetMethod:=ftmGroupIndexNoDisp;
             FOmfFixup.TargetDatum:=group.index;
@@ -1190,7 +1190,7 @@
         else if Reloctype=RELOC_FARPTR48 then
           begin
             if len<>6 then
-              internalerror(2015041502);
+              internalerror(2015041507);
             writeReloc(Data,4,p,RELOC_ABSOLUTE32);
             writeReloc(0,2,p,RELOC_SEG);
             exit;
@@ -1197,7 +1197,7 @@
           end;
 
         if CurrObjSec=nil then
-          internalerror(200403072);
+          internalerror(2004030704);
         objreloc:=nil;
         if Reloctype in [RELOC_FARDATASEG,RELOC_FARDATASEGREL] then
           begin
@@ -1342,7 +1342,7 @@
         if (oso_data in sec.SecOptions) then
           begin
             if sec.Data=nil then
-              internalerror(200403073);
+              internalerror(2004030705);
             for I:=0 to sec.ObjRelocations.Count-1 do
               TOmfRelocation(sec.ObjRelocations[I]).BuildOmfFixup;
             SegIndex:=Segments.FindIndexOf(sec.Name);
@@ -1426,7 +1426,7 @@
         if (oso_data in sec.SecOptions) then
           begin
             if sec.Data=nil then
-              internalerror(200403073);
+              internalerror(2004030706);
             if sec.LinNumEntries.Count=0 then
               exit;
             SegIndex:=Segments.FindIndexOf(sec.Name);
@@ -2103,7 +2103,7 @@
               if Is32Bit then
                 begin
                   if (NextOfs+3)>=RawRec.RecordLength then
-                    internalerror(2015040504);
+                    internalerror(2015040512);
                   EnumeratedDataOffset := RawRec.RawData[NextOfs]+
                                          (RawRec.RawData[NextOfs+1] shl 8)+
                                          (RawRec.RawData[NextOfs+2] shl 16)+
@@ -2113,7 +2113,7 @@
               else
                 begin
                   if (NextOfs+1)>=RawRec.RecordLength then
-                    internalerror(2015040504);
+                    internalerror(2015040513);
                   EnumeratedDataOffset := RawRec.RawData[NextOfs]+
                                          (RawRec.RawData[NextOfs+1] shl 8);
                   Inc(NextOfs,2);
@@ -2161,7 +2161,7 @@
               FixupRawRec:=RawRec;
             end;
           else
-            internalerror(2015040301);
+            internalerror(2015040316);
         end;
 
         { also read all the FIXUPP records that may follow;                     }
@@ -2912,7 +2912,7 @@
         i: Integer;
       begin
         if SegmentList.Count=0 then
-          internalerror(2015082201);
+          internalerror(2015082202);
         for i:=0 to SegmentList.Count-1 do
           begin
             UniSeg:=TMZExeUnifiedLogicalSegment(SegmentList[i]);
@@ -4165,7 +4165,7 @@
     function TNewExeEntryTable.GetItems(i: Integer): TNewExeEntryPoint;
       begin
         if (i<1) or (i>Length(FItems)) then
-          internalerror(2019081002);
+          internalerror(2019081011);
         Result:=FItems[i-1];
       end;
 
Index: compiler/ogrel.pas
===================================================================
--- compiler/ogrel.pas	(revision 47063)
+++ compiler/ogrel.pas	(working copy)
@@ -213,7 +213,7 @@
               RelFlags:=[];
             end;
           else
-            internalerror(2020050601);
+            internalerror(2020050613);
         end;
       end;
 
Index: compiler/omfbase.pas
===================================================================
--- compiler/omfbase.pas	(revision 47063)
+++ compiler/omfbase.pas	(working copy)
@@ -1432,13 +1432,13 @@
     begin
       Result:=Offset+1;
       if result>RecordLength then
-        internalerror(2015033103);
+        internalerror(2015033108);
       IndexedRef:=RawData[Offset];
       if IndexedRef<=$7f then
         exit;
       Result:=Offset+2;
       if result>RecordLength then
-        internalerror(2015033103);
+        internalerror(2015033109);
       IndexedRef:=((IndexedRef and $7f) shl 8)+RawData[Offset+1];
     end;
 
@@ -1450,7 +1450,7 @@
         begin
           Result:=Offset+1;
           if Result>High(RawData) then
-            internalerror(2015033102);
+            internalerror(2015033106);
           RawData[Offset]:=IndexedRef;
         end
       else
@@ -1457,7 +1457,7 @@
         begin
           Result:=Offset+2;
           if Result>High(RawData) then
-            internalerror(2015033102);
+            internalerror(2015033107);
           RawData[Offset]:=$80+(IndexedRef shr 8);
           RawData[Offset+1]:=Byte(IndexedRef);
         end;
@@ -1575,7 +1575,7 @@
   procedure TOmfRecord_COMENT.DecodeFrom(RawRecord: TOmfRawRecord);
     begin
       if RawRecord.RecordType<>RT_COMENT then
-        internalerror(2015040301);
+        internalerror(2015040304);
       if RawRecord.RecordLength<3 then
         internalerror(2015033104);
       CommentType:=RawRecord.RawData[0];
@@ -1756,7 +1756,7 @@
       Name: string;
     begin
       if RawRecord.RecordType<>RT_LNAMES then
-        internalerror(2015040301);
+        internalerror(2015040308);
       NextOfs:=0;
       while NextOfs<(RawRecord.RecordLength-1) do
         begin
@@ -1802,7 +1802,7 @@
       MinLen: Integer;
     begin
       if not (RawRecord.RecordType in [RT_SEGDEF,RT_SEGDEF32]) then
-        internalerror(2015040301);
+        internalerror(2015040309);
       Is32Bit:=RawRecord.RecordType=RT_SEGDEF32;
 
       MinLen:=7; { b(1)+seglength(2..4)+segnameindex(1..2)+classnameindex(1..2)+overlaynameindex(1..2)+checksum }
@@ -1820,7 +1820,7 @@
         begin
           inc(MinLen,3);
           if RawRecord.RecordLength<MinLen then
-            internalerror(2015040305);
+            internalerror(2015040317);
           FrameNumber:=RawRecord.RawData[1]+(RawRecord.RawData[2] shl 8);
           Offset:=RawRecord.RawData[3];
           NextOfs:=4;
@@ -1850,7 +1850,7 @@
             if SegmentLength=0 then
               SegmentLength:=65536
             else
-              internalerror(2015040306);
+              internalerror(2015040323);
           Inc(NextOfs,2);
         end;
       NextOfs:=RawRecord.ReadIndexedRef(NextOfs,FSegmentNameIndex);
@@ -1922,7 +1922,7 @@
       Segment: Integer;
     begin
       if RawRecord.RecordType<>RT_GRPDEF then
-        internalerror(2015040301);
+        internalerror(2015040310);
       NextOfs:=RawRecord.ReadIndexedRef(0,FGroupNameIndex);
       SetLength(FSegmentList,0);
       while NextOfs<RawRecord.RecordLength-1 do
@@ -1981,7 +1981,7 @@
       PubName: TOmfPublicNameElement;
     begin
       if not (RawRecord.RecordType in [RT_PUBDEF,RT_PUBDEF32,RT_LPUBDEF,RT_LPUBDEF32]) then
-        internalerror(2015040301);
+        internalerror(2015040311);
       Is32Bit:=RawRecord.RecordType in [RT_PUBDEF32,RT_LPUBDEF32];
       IsLocal:=RawRecord.RecordType in [RT_LPUBDEF,RT_LPUBDEF32];
 
@@ -2003,7 +2003,7 @@
           if Is32Bit then
             begin
               if (NextOfs+3)>=RawRecord.RecordLength then
-                internalerror(2015041401);
+                internalerror(2015041405);
               PublicOffset:=RawRecord.RawData[NextOfs]+(RawRecord.RawData[NextOfs+1] shl 8)+
                 (RawRecord.RawData[NextOfs+2] shl 16)+(RawRecord.RawData[NextOfs+3] shl 24);
               Inc(NextOfs,4);
@@ -2011,7 +2011,7 @@
           else
             begin
               if (NextOfs+1)>=RawRecord.RecordLength then
-                internalerror(2015041401);
+                internalerror(2015041407);
               PublicOffset:=RawRecord.RawData[NextOfs]+(RawRecord.RawData[NextOfs+1] shl 8);
               Inc(NextOfs,2);
             end;
@@ -2129,7 +2129,7 @@
       ExtName: TOmfExternalNameElement;
     begin
       if RawRecord.RecordType<>RT_EXTDEF then
-        internalerror(2015040301);
+        internalerror(2015040312);
       NextOfs:=0;
       while NextOfs<(RawRecord.RecordLength-1) do
         begin
@@ -2181,11 +2181,11 @@
       EndData: Byte;
     begin
       if not (RawRecord.RecordType in [RT_MODEND,RT_MODEND32]) then
-        internalerror(2015040301);
+        internalerror(2015040313);
       Is32Bit:=RawRecord.RecordType=RT_MODEND32;
 
       if RawRecord.RecordLength<2 then
-        internalerror(2015040305);
+        internalerror(2015040318);
       ModTyp:=RawRecord.RawData[0];
       IsMainModule:=(ModTyp and $80)<>0;
       HasStartAddress:=(ModTyp and $40)<>0;
@@ -2209,7 +2209,7 @@
           if LogicalStartAddress then
             begin
               if NextOfs>=RawRecord.RecordLength then
-                internalerror(2015040305);
+                internalerror(2015040319);
               EndData:=RawRecord.RawData[NextOfs];
               Inc(NextOfs);
               { frame and target method determined by thread is not allowed in MODEND records }
@@ -2241,7 +2241,7 @@
                   else
                     begin
                       if (NextOfs+1)>=RawRecord.RecordLength then
-                        internalerror(2015040504);
+                        internalerror(2015040508);
                       TargetDisplacement := RawRecord.RawData[NextOfs]+
                                            (RawRecord.RawData[NextOfs+1] shl 8);
                       Inc(NextOfs,2);
@@ -2252,13 +2252,13 @@
             begin
               { physical start address }
               if (NextOfs+1)>=RawRecord.RecordLength then
-                internalerror(2015040305);
+                internalerror(2015040320);
               PhysFrameNumber:=RawRecord.RawData[NextOfs]+(RawRecord.RawData[NextOfs+1] shl 8);
               Inc(NextOfs,2);
               if Is32Bit then
                 begin
                   if (NextOfs+3)>=RawRecord.RecordLength then
-                    internalerror(2015040305);
+                    internalerror(2015040321);
                   PhysOffset:=RawRecord.RawData[NextOfs]+(RawRecord.RawData[NextOfs+1] shl 8)+
                     (RawRecord.RawData[NextOfs+2] shl 16)+(RawRecord.RawData[NextOfs+3] shl 24);
                   Inc(NextOfs,4);
@@ -2266,7 +2266,7 @@
               else
                 begin
                   if (NextOfs+1)>=RawRecord.RecordLength then
-                    internalerror(2015040305);
+                    internalerror(2015040322);
                   PhysOffset:=RawRecord.RawData[NextOfs]+(RawRecord.RawData[NextOfs+1] shl 8);
                   Inc(NextOfs,2);
                 end;
@@ -2293,7 +2293,7 @@
             begin
               { frame method ffmLocation is not allowed in an MODEND record }
               if FrameMethod=ffmLocation then
-                internalerror(2015041402);
+                internalerror(2015041411);
               EndData:=(Ord(FrameMethod) shl 4)+Ord(TargetMethod);
               RawRecord.RawData[NextOfs]:=EndData;
               Inc(NextOfs);
@@ -2340,7 +2340,7 @@
               else
                 begin
                   if PhysOffset>$ffff then
-                    internalerror(2015040502);
+                    internalerror(2015040506);
                   RawRecord.RawData[NextOfs]:=Byte(PhysOffset);
                   RawRecord.RawData[NextOfs+1]:=Byte(PhysOffset shr 8);
                   Inc(NextOfs,2);
@@ -2678,7 +2678,7 @@
       FixData: Byte;
     begin
       if (Offset+2)>=RawRecord.RecordLength then
-        internalerror(2015040504);
+        internalerror(2015040509);
       { unlike other fields in the OMF format, this one is big endian }
       Locat:=(RawRecord.RawData[Offset] shl 8) or RawRecord.RawData[Offset+1];
       FixData:=RawRecord.RawData[Offset+2];
@@ -2718,7 +2718,7 @@
           if Is32Bit then
             begin
               if (Offset+3)>=RawRecord.RecordLength then
-                internalerror(2015040504);
+                internalerror(2015040510);
               TargetDisplacement := RawRecord.RawData[Offset]+
                                    (RawRecord.RawData[Offset+1] shl 8)+
                                    (RawRecord.RawData[Offset+2] shl 16)+
@@ -2728,7 +2728,7 @@
           else
             begin
               if (Offset+1)>=RawRecord.RecordLength then
-                internalerror(2015040504);
+                internalerror(2015040511);
               TargetDisplacement := RawRecord.RawData[Offset]+
                                    (RawRecord.RawData[Offset+1] shl 8);
               Inc(Offset,2);
@@ -2781,7 +2781,7 @@
           else
             begin
               if TargetDisplacement>$ffff then
-                internalerror(2015040502);
+                internalerror(2015040507);
               RawRecord.RawData[Offset]:=Byte(TargetDisplacement);
               RawRecord.RawData[Offset+1]:=Byte(TargetDisplacement shr 8);
               Inc(Offset,2);
@@ -2830,7 +2830,7 @@
       if not ispowerof2(AValue,p) then
         internalerror(2015041802);
       if (p<4) or (p>15) then
-        internalerror(2015041802);
+        internalerror(2015041803);
       FPageSize:=AValue;
     end;
 
@@ -2837,7 +2837,7 @@
   procedure TOmfRecord_LIBHEAD.DecodeFrom(RawRecord: TOmfRawRecord);
     begin
       if RawRecord.RecordType<>RT_LIBHEAD then
-        internalerror(2015040301);
+        internalerror(2015040314);
       { this will also range check PageSize and will ensure that RecordLength>=13 }
       PageSize:=RawRecord.RecordLength+3;
       DictionaryOffset:=RawRecord.RawData[0]+
@@ -2881,7 +2881,7 @@
   procedure TOmfRecord_LIBEND.DecodeFrom(RawRecord: TOmfRawRecord);
     begin
       if RawRecord.RecordType<>RT_LIBEND then
-        internalerror(2015040301);
+        internalerror(2015040315);
       FPaddingBytes:=RawRecord.RecordLength;
     end;
 
Index: compiler/options.pas
===================================================================
--- compiler/options.pas	(revision 47063)
+++ compiler/options.pas	(working copy)
@@ -3951,7 +3951,7 @@
       InternalError(2013092801);
   if tf_x86_far_procs_push_odd_bp in target_info.flags then
     if not UpdateTargetSwitchStr('FARPROCSPUSHODDBP', init_settings.targetswitches, true) then
-      InternalError(2013092801);
+      InternalError(2013092802);
 
   { Use standard Android NDK prefixes when cross-compiling }
   if (source_info.system<>target_info.system) and (target_info.system in systems_android) then
Index: compiler/optloadmodifystore.pas
===================================================================
--- compiler/optloadmodifystore.pas	(revision 47063)
+++ compiler/optloadmodifystore.pas	(working copy)
@@ -161,7 +161,7 @@
                   xorn:
                     newinlinenodetype:=in_xor_assign_x_y;
                   else
-                    internalerror(2017032901);
+                    internalerror(2017032903);
                 end;
                 inserttypeconv_internal(taddnode(ttypeconvnode(right).left).right,left.resultdef);
                 if ttypeconvnode(right).left.nodetype in [addn,subn] then
@@ -343,7 +343,7 @@
                   shrn:
                     newinlinenodetype:=in_shr_assign_x_y;
                   else
-                    internalerror(2017051201);
+                    internalerror(2017051202);
                 end;
                 inserttypeconv_internal(tshlshrnode(ttypeconvnode(right).left).right,left.resultdef);
                 result:=cinlinenode.createintern(
@@ -486,7 +486,7 @@
                   in_ror_x_y:
                     newinlinenodetype:=in_ror_assign_x_y;
                   else
-                    internalerror(2017071701);
+                    internalerror(2017071702);
                 end;
                 result:=cinlinenode.createintern(
                   newinlinenodetype,false,ccallparanode.create(
Index: compiler/optvirt.pas
===================================================================
--- compiler/optvirt.pas	(revision 47063)
+++ compiler/optvirt.pas	(working copy)
@@ -855,7 +855,7 @@
 {$ENDIF}
                  ;
                else
-                 internalerror(2008101101);
+                 internalerror(2008101106);
              end;
            end;
 
Index: compiler/pbase.pas
===================================================================
--- compiler/pbase.pas	(revision 47063)
+++ compiler/pbase.pas	(working copy)
@@ -316,7 +316,7 @@
         if assigned(srsym) and (srsym.typ in [unitsym,namespacesym]) then
           begin
             if not(srsym.owner.symtabletype in [staticsymtable,globalsymtable]) then
-              internalerror(200501154);
+              internalerror(2005011503);
             { only allow unit.symbol access if the name was
               found in the current module
               we can use iscurrentunit because generic specializations does not
@@ -323,7 +323,7 @@
               change current_unit variable }
             hmodule:=find_module_from_symtable(srsym.Owner);
             if not Assigned(hmodule) then
-              internalerror(201001120);
+              internalerror(2010011201);
             if hmodule.unit_index=current_filepos.moduleindex then
               begin
                 if cuf_consume_id in flags then
@@ -352,7 +352,7 @@
                           end;
                       end;
                     if assigned(srsym) and (srsym.typ<>unitsym) then
-                      internalerror(201108260);
+                      internalerror(2011082601);
                     if not assigned(srsym) then
                       begin
                         result:=true;
Index: compiler/pdecobj.pas
===================================================================
--- compiler/pdecobj.pas	(revision 47063)
+++ compiler/pdecobj.pas	(working copy)
@@ -1351,7 +1351,7 @@
                               include(current_settings.localswitches,cs_typed_const_writable);
                           end
                         else
-                          internalerror(201001110);
+                          internalerror(2010011103);
                       end;
                 end;
               end;
Index: compiler/pdecsub.pas
===================================================================
--- compiler/pdecsub.pas	(revision 47063)
+++ compiler/pdecsub.pas	(working copy)
@@ -1796,7 +1796,7 @@
 procedure pd_public(pd:tabstractprocdef);
 begin
   if pd.typ<>procdef then
-    internalerror(200304266);
+    internalerror(2003042601);
   if try_to_consume(_NAME) then
     begin
       tprocdef(pd).aliasnames.insert(get_stringconst);
@@ -1846,7 +1846,7 @@
 
 begin
   if pd.typ<>procdef then
-    internalerror(200304268);
+    internalerror(2003042602);
   consume(_COLON);
   v:=get_intconst;
   if (v<int64(low(longint))) or (v>int64(high(longint))) then
Index: compiler/pexports.pas
===================================================================
--- compiler/pexports.pas	(revision 47063)
+++ compiler/pexports.pas	(working copy)
@@ -239,7 +239,7 @@
                       end;
                     end;
                   else
-                    internalerror(2019050532);
+                    internalerror(2019050502);
                 end
              end
            else
Index: compiler/pexpr.pas
===================================================================
--- compiler/pexpr.pas	(revision 47063)
+++ compiler/pexpr.pas	(working copy)
@@ -2233,7 +2233,7 @@
                                   include(tvecnode(p1).flags,nf_memindex);
                                 end;
 {$else}
-                               internalerror(2013053101);
+                               internalerror(2013053105);
 {$endif}
                              end
                            else
Index: compiler/pkgutil.pas
===================================================================
--- compiler/pkgutil.pas	(revision 47063)
+++ compiler/pkgutil.pas	(working copy)
@@ -532,7 +532,7 @@
     begin
       pkgentry:=ppackageentry(packagelist.find(package.packagename^));
       if not assigned(pkgentry) then
-        internalerror(2015100301);
+        internalerror(2015100302);
       inc(pkgentry^.usedunits);
     end;
 
Index: compiler/powerpc/agppcmpw.pas
===================================================================
--- compiler/powerpc/agppcmpw.pas	(revision 47063)
+++ compiler/powerpc/agppcmpw.pas	(working copy)
@@ -363,7 +363,7 @@
                     DH_Plus:
                       tempstr:=tempstr+('+'+#9);
                     else
-                      internalerror(2003112901);
+                      internalerror(2003112904);
                   end;
                   case c.cond of
                     C_LT..C_NU:
@@ -817,12 +817,12 @@
                 case consttype of
                    aitconst_128bit:
                       begin
-                        internalerror(200404291);
+                        internalerror(2004042904);
                       end;
                    aitconst_64bit:
                       begin
                         if assigned(tai_const(hp).sym) then
-                          internalerror(200404292);
+                          internalerror(2004042905);
                         writer.AsmWrite(ait_const2str[aitconst_32bit]);
                         if target_info.endian = endian_little then
                           begin
Index: compiler/powerpc/cgcpu.pas
===================================================================
--- compiler/powerpc/cgcpu.pas	(revision 47063)
+++ compiler/powerpc/cgcpu.pas	(working copy)
@@ -240,7 +240,7 @@
 
        begin
           if not(size in [OS_8,OS_S8,OS_16,OS_S16,OS_32,OS_S32]) then
-            internalerror(2002090902);
+            internalerror(2002090906);
           if (a >= low(smallint)) and
              (a <= high(smallint)) then
             list.concat(taicpu.op_reg_const(A_LI,reg,smallint(a)))
@@ -1161,7 +1161,7 @@
             abi_powerpc_sysv:
               firstfpureg := RS_F9;
             else
-              internalerror(2003122903);
+              internalerror(2003122904);
           end;
           for regcounter:=firstfpureg to RS_F31 do
            begin
Index: compiler/powerpc/cpupi.pas
===================================================================
--- compiler/powerpc/cpupi.pas	(revision 47063)
+++ compiler/powerpc/cpupi.pas	(working copy)
@@ -150,7 +150,7 @@
               abi_powerpc_sysv:
                 low_nonvol_fpu_reg := RS_F14;
               else
-                internalerror(2003122903);
+                internalerror(2003122905);
             end;
             for regcounter := low_nonvol_fpu_reg to RS_F31 do
               begin
Index: compiler/powerpc/nppcadd.pas
===================================================================
--- compiler/powerpc/nppcadd.pas	(revision 47063)
+++ compiler/powerpc/nppcadd.pas	(working copy)
@@ -306,12 +306,12 @@
               { should be handled in pass_1 (JM) }
               if not(torddef(left.resultdef).ordtype in [U32bit,s32bit]) or
                  (torddef(left.resultdef).typ <> torddef(right.resultdef).typ) then
-                internalerror(200109051);
+                internalerror(2001090504);
               { handled separately }
               op := OP_NONE;
             end;
           else
-            internalerror(2002072705);
+            internalerror(2002072703);
         end;
 
         if not cmpop or
@@ -483,7 +483,7 @@
                      end;
                 end;
               else
-                internalerror(2002072803);
+                internalerror(2002072805);
             end;
           end
         else
@@ -604,7 +604,7 @@
              end;
            stringdef :
              begin
-               internalerror(2002072402);
+               internalerror(2002072403);
                exit;
              end;
            setdef :
Index: compiler/powerpc/nppcmat.pas
===================================================================
--- compiler/powerpc/nppcmat.pas	(revision 47063)
+++ compiler/powerpc/nppcmat.pas	(working copy)
@@ -477,7 +477,7 @@
                        end;
                   end;
                 else
-                  internalerror(2019050947);
+                  internalerror(2019050913);
               end;
               { choose appropriate operand }
               if left.resultdef.typ <> floatdef then
Index: compiler/powerpc/rappcgas.pas
===================================================================
--- compiler/powerpc/rappcgas.pas	(revision 47063)
+++ compiler/powerpc/rappcgas.pas	(working copy)
@@ -222,7 +222,7 @@
                       OPR_REFERENCE :
                         inc(oper.opr.ref.offset,l);
                       else
-                        internalerror(200309202);
+                        internalerror(2003092018);
                     end;
                   end;
                 AS_MINUS:
@@ -521,7 +521,7 @@
                        OPR_REFERENCE :
                          inc(oper.opr.ref.offset,l);
                        else
-                         internalerror(200309202);
+                         internalerror(2003092019);
                      end;
                    end
                end;
Index: compiler/powerpc64/cgcpu.pas
===================================================================
--- compiler/powerpc64/cgcpu.pas	(revision 47063)
+++ compiler/powerpc64/cgcpu.pas	(working copy)
@@ -509,7 +509,7 @@
   {$ENDIF EXTDEBUG}
 
   if not (fromsize in [OS_8, OS_S8, OS_16, OS_S16, OS_32, OS_S32, OS_64, OS_S64]) then
-    internalerror(2002090904);
+    internalerror(2002090910);
 
   { the caller is expected to have adjusted the reference already
    in this case }
Index: compiler/powerpc64/nppcadd.pas
===================================================================
--- compiler/powerpc64/nppcadd.pas	(revision 47063)
+++ compiler/powerpc64/nppcadd.pas	(working copy)
@@ -169,7 +169,7 @@
       end;
     stringdef:
       begin
-        internalerror(2002072402);
+        internalerror(2002072401);
         exit;
       end;
     setdef:
@@ -176,7 +176,7 @@
       begin
         { normalsets are already handled in pass1 }
         if not is_smallset(left.resultdef) then
-          internalerror(200109041);
+          internalerror(2001090403);
         second_addsmallset;
         exit;
       end;
Index: compiler/powerpc64/nppcmat.pas
===================================================================
--- compiler/powerpc64/nppcmat.pas	(revision 47063)
+++ compiler/powerpc64/nppcmat.pas	(working copy)
@@ -351,7 +351,7 @@
           end;
         end;
       else
-       internalerror(2013120112);
+       internalerror(2013120113);
     end;
     { choose appropriate operand }
     if left.resultdef.typ <> floatdef then begin
Index: compiler/powerpc64/rappcgas.pas
===================================================================
--- compiler/powerpc64/rappcgas.pas	(revision 47063)
+++ compiler/powerpc64/rappcgas.pas	(working copy)
@@ -235,7 +235,7 @@
                 OPR_REFERENCE :
                   inc(oper.opr.ref.offset,l);
                 else
-                  internalerror(200309202);
+                  internalerror(2003092014);
               end;
             end;
           AS_MINUS:
@@ -525,7 +525,7 @@
                 OPR_REFERENCE:
                   inc(oper.opr.ref.offset, l);
               else
-                internalerror(200309202);
+                internalerror(2003092015);
               end;
             end
           end;
Index: compiler/ppcgen/agppcgas.pas
===================================================================
--- compiler/ppcgen/agppcgas.pas	(revision 47063)
+++ compiler/ppcgen/agppcgas.pas	(working copy)
@@ -110,7 +110,7 @@
                    (index<>NR_NO) or
                    (offset<>0) or
                    not assigned(symbol) then
-                  internalerror(2011122701);
+                  internalerror(2011122702);
                 if asminfo^.dollarsign<>'$' then
                   getreferencestring:=ApplyAsmSymbolRestrictions(symbol.name)+'('+gas_regname(NR_RTOC)+')'
                 else
@@ -217,7 +217,7 @@
         top_none:
           getopstr_jmp:='';
         else
-          internalerror(2002070603);
+          internalerror(2002070605);
       end;
     end;
 
@@ -332,7 +332,7 @@
           { we have a trap instruction }
           else
             begin
-              internalerror(2002070601);
+              internalerror(2002070602);
               { not yet implemented !!!!!!!!!!!!!!!!!!!!! }
               { case tempstr := 'tw';}
             end;
Index: compiler/ppcgen/cgppc.pas
===================================================================
--- compiler/ppcgen/cgppc.pas	(revision 47063)
+++ compiler/ppcgen/cgppc.pas	(working copy)
@@ -536,7 +536,7 @@
       op: TAsmOp;
     begin
       if not (fromsize in [OS_8..OS_INT,OS_S8..OS_SINT]) then
-        internalerror(2002090904);
+        internalerror(2002090911);
       if not (tosize in [OS_8..OS_INT,OS_S8..OS_SINT]) then
         internalerror(2002090905);
 
Index: compiler/ppcgen/hlcgppc.pas
===================================================================
--- compiler/ppcgen/hlcgppc.pas	(revision 47063)
+++ compiler/ppcgen/hlcgppc.pas	(working copy)
@@ -113,7 +113,7 @@
         href : treference;
       begin
         if (procdef.extnumber=$ffff) then
-          Internalerror(200006139);
+          Internalerror(2000061310);
         { call/jmp  vmtoffs(%eax) ; method offs }
         reference_reset_base(href,voidpointertype,NR_R11,tobjectdef(procdef.struct).vmtmethodoffset(procdef.extnumber),ctempposinvalid,sizeof(pint),[]);
         if tcgppcgen(cg).hasLargeOffset(href) then
Index: compiler/ppcgen/ngppcadd.pas
===================================================================
--- compiler/ppcgen/ngppcadd.pas	(revision 47063)
+++ compiler/ppcgen/ngppcadd.pas	(working copy)
@@ -279,7 +279,7 @@
                     andn :
                       cgop:=OP_AND;
                     else
-                      internalerror(200203247);
+                      internalerror(2002032413);
                   end;
 
                   if right.location.loc <> LOC_CONSTANT then
@@ -550,7 +550,7 @@
               opdone := true;
             end;
           else
-            internalerror(2002072701);
+            internalerror(2002072702);
         end;
 
         if not opdone then
Index: compiler/ppcgen/ngppcinl.pas
===================================================================
--- compiler/ppcgen/ngppcinl.pas	(revision 47063)
+++ compiler/ppcgen/ngppcinl.pas	(working copy)
@@ -176,7 +176,7 @@
          tmpreg: tregister;
        begin
          if (current_settings.cputype < cpu_PPC970) then
-           internalerror(2007020910);
+           internalerror(2007020901);
          secondpass(left);
          hlcg.location_force_fpureg(current_asmdata.CurrAsmList,left.location,left.resultdef,true);
          tmpreg:=cg.getfpuregister(current_asmdata.CurrAsmList,OS_F64);
Index: compiler/ppcgen/rgcpu.pas
===================================================================
--- compiler/ppcgen/rgcpu.pas	(revision 47063)
+++ compiler/ppcgen/rgcpu.pas	(working copy)
@@ -117,7 +117,7 @@
             helplist:=TAsmList.create;
 
             if (spilltemp.index<>NR_NO) then
-              internalerror(200704201);
+              internalerror(2007042002);
 
             if getregtype(tempreg)=R_INTREGISTER then
               begin
Index: compiler/psub.pas
===================================================================
--- compiler/psub.pas	(revision 47063)
+++ compiler/psub.pas	(working copy)
@@ -673,7 +673,7 @@
                             nil));
                       end
                     else
-                      internalerror(200305108);
+                      internalerror(2003051001);
                   end
                 else
                   if is_object(current_structdef) then
Index: compiler/rgobj.pas
===================================================================
--- compiler/rgobj.pas	(revision 47063)
+++ compiler/rgobj.pas	(working copy)
@@ -570,7 +570,7 @@
     procedure trgobj.ungetcpuregister(list:TAsmList;r:Tregister);
       begin
         if (getsupreg(r)>=first_imaginary) then
-          InternalError(2004020901);
+          InternalError(2004020902);
         list.concat(Tai_regalloc.dealloc(r,nil));
       end;
 
Index: compiler/riscv/hlcgrv.pas
===================================================================
--- compiler/riscv/hlcgrv.pas	(revision 47063)
+++ compiler/riscv/hlcgrv.pas	(working copy)
@@ -118,7 +118,7 @@
         l : TAsmLabel;
       begin
         if (procdef.extnumber=$ffff) then
-          Internalerror(200006139);
+          Internalerror(2000061304);
 
         reference_reset_base(href,voidpointertype,NR_X5,tobjectdef(procdef.struct).vmtmethodoffset(procdef.extnumber),ctempposinvalid, sizeof(pint),[]);
         cg.a_load_ref_reg(list,OS_ADDR,OS_ADDR,href,NR_X5);
Index: compiler/riscv32/rarv32gas.pas
===================================================================
--- compiler/riscv32/rarv32gas.pas	(revision 47063)
+++ compiler/riscv32/rarv32gas.pas	(working copy)
@@ -191,7 +191,7 @@
                       OPR_REFERENCE :
                         inc(oper.opr.ref.offset,l);
                       else
-                        internalerror(200309202);
+                        internalerror(2003092008);
                     end;
                   end;
                 AS_MINUS:
@@ -527,7 +527,7 @@
                        OPR_REFERENCE :
                          inc(oper.opr.ref.offset,l);
                        else
-                         internalerror(200309202);
+                         internalerror(2003092009);
                      end;
                    end
                end;
Index: compiler/riscv64/rarv64gas.pas
===================================================================
--- compiler/riscv64/rarv64gas.pas	(revision 47063)
+++ compiler/riscv64/rarv64gas.pas	(working copy)
@@ -192,7 +192,7 @@
                       OPR_REFERENCE :
                         inc(oper.opr.ref.offset,l);
                       else
-                        internalerror(200309202);
+                        internalerror(2003092016);
                     end;
                   end;
                 AS_MINUS:
@@ -568,7 +568,7 @@
                        OPR_REFERENCE :
                          inc(oper.opr.ref.offset,l);
                        else
-                         internalerror(200309202);
+                         internalerror(2003092017);
                      end;
                    end
                end;
Index: compiler/sparc/cgcpu.pas
===================================================================
--- compiler/sparc/cgcpu.pas	(revision 47063)
+++ compiler/sparc/cgcpu.pas	(working copy)
@@ -208,7 +208,7 @@
               op2:=A_AND;
             end;
           else
-            internalerror(200203241);
+            internalerror(2002032409);
         end;
       end;
 
@@ -262,7 +262,7 @@
         case op of
           OP_NEG,
           OP_NOT :
-            internalerror(200306017);
+            internalerror(2003060102);
           OP_AND,OP_OR,OP_XOR:
             begin
               cg.a_op_const_reg_reg(list,op,OS_INT,tcgint(lo(value)),regsrc.reglo,regdst.reglo);
@@ -283,7 +283,7 @@
         case op of
           OP_NEG,
           OP_NOT :
-            internalerror(200306017);
+            internalerror(2003060103);
           else
             ;
         end;
Index: compiler/sparc64/cpugas.pas
===================================================================
--- compiler/sparc64/cpugas.pas	(revision 47063)
+++ compiler/sparc64/cpugas.pas	(working copy)
@@ -163,7 +163,7 @@
               else
                 getopstr:=getreferencestring(ref^);
             else
-              internalerror(10001);
+              internalerror(2020100808);
           end;
         end;
 
Index: compiler/sparcgen/aasmcpu.pas
===================================================================
--- compiler/sparcgen/aasmcpu.pas	(revision 47063)
+++ compiler/sparcgen/aasmcpu.pas	(working copy)
@@ -287,7 +287,7 @@
               end;
             end
           else
-            internalerror(200401041);
+            internalerror(2004010404);
         end;
       end;
 
@@ -305,11 +305,11 @@
                 R_SUBFD :
                   result:=taicpu.op_reg_ref(A_STD,r,ref);
                 else
-                  internalerror(200401042);
+                  internalerror(2004010417);
               end;
             end
           else
-            internalerror(200401041);
+            internalerror(2004010406);
         end;
       end;
 
Index: compiler/sparcgen/cpugas.pas
===================================================================
--- compiler/sparcgen/cpugas.pas	(revision 47063)
+++ compiler/sparcgen/cpugas.pas	(working copy)
@@ -159,7 +159,7 @@
               else
                 getopstr:=getreferencestring(ref^);
             else
-              internalerror(10001);
+              internalerror(2020100807);
           end;
         end;
 
Index: compiler/sparcgen/ncpucnv.pas
===================================================================
--- compiler/sparcgen/ncpucnv.pas	(revision 47063)
+++ compiler/sparcgen/ncpucnv.pas	(working copy)
@@ -196,7 +196,7 @@
                      end;
                  end;
                else
-                 internalerror(200410031);
+                 internalerror(2004100304);
             end;
           end;
        end;
Index: compiler/sparcgen/racpugas.pas
===================================================================
--- compiler/sparcgen/racpugas.pas	(revision 47063)
+++ compiler/sparcgen/racpugas.pas	(working copy)
@@ -411,7 +411,7 @@
                          OPR_REFERENCE :
                            inc(oper.opr.ref.offset,l);
                          else
-                           internalerror(200309202);
+                           internalerror(2003092003);
                        end;
                      end
                  end;
Index: compiler/sparcgen/rgcpu.pas
===================================================================
--- compiler/sparcgen/rgcpu.pas	(revision 47063)
+++ compiler/sparcgen/rgcpu.pas	(working copy)
@@ -169,7 +169,7 @@
                   helplist.concat(taicpu.op_reg_const_reg(A_XOR,hreg,(aint(spilltemp.offset) and aint($3ff)) or aint($1c00),hreg));
               end
             else
-              Internalerror(2017090901);
+              Internalerror(2017090902);
 {$endif SPARC}
 
             reference_reset_base(tmpref,hreg,0,spilltemp.temppos,sizeof(aint),[]);
Index: compiler/symbase.pas
===================================================================
--- compiler/symbase.pas	(revision 47063)
+++ compiler/symbase.pas	(working copy)
@@ -458,7 +458,7 @@
     function TSymtablestack.top:TSymtable;
       begin
         if not assigned(stack) then
-          internalerror(200601233);
+          internalerror(2006012304);
         result:=stack^.symtable;
       end;
 
Index: compiler/symcreat.pas
===================================================================
--- compiler/symcreat.pas	(revision 47063)
+++ compiler/symcreat.pas	(working copy)
@@ -482,7 +482,7 @@
         a typecast at the scanner level }
       if (struct.typ=recorddef) and
          not assigned(struct.typesym) then
-        internalerror(2011032811);
+        internalerror(2011032804);
       { walk over all fields that need initialization }
       str:='begin ';
       for i:=0 to struct.symtable.symlist.count-1 do
Index: compiler/symdef.pas
===================================================================
--- compiler/symdef.pas	(revision 47063)
+++ compiler/symdef.pas	(working copy)
@@ -5978,7 +5978,7 @@
     function tprocdef.Getpersonality: tprocdef;
       begin
         if not assigned(implprocdefinfo) then
-          internalerror(2016121701);
+          internalerror(2016121704);
          result:=implprocdefinfo^.personality;
       end;
 
@@ -5986,7 +5986,7 @@
     procedure tprocdef.Setpersonality(AValue: tprocdef);
       begin
         if not assigned(implprocdefinfo) then
-          internalerror(2016121702);
+          internalerror(2016121705);
         implprocdefinfo^.personality:=AValue;
       end;
 
@@ -7062,7 +7062,7 @@
 
       begin
         if not assigned(current_module) then
-          internalerror(2011081301);
+          internalerror(2011081302);
         key.def:=def;
         key.copytyp:=copytyp;
         res:=current_module.procaddrdefs.FindOrAdd(@key,sizeof(key));
@@ -7777,7 +7777,7 @@
         if objecttype in [odt_interfacecom,odt_interfacecorba,odt_dispinterface,odt_objcclass,odt_objcprotocol,odt_javaclass,odt_interfacejava] then
           exit;
         if (oo_has_vmt in objectoptions) then
-          internalerror(12345)
+          internalerror(2020100816)
         else
           begin
              tObjectSymtable(symtable).datasize:=align(tObjectSymtable(symtable).datasize,
Index: compiler/symtype.pas
===================================================================
--- compiler/symtype.pas	(revision 47063)
+++ compiler/symtype.pas	(working copy)
@@ -706,7 +706,7 @@
              sl_vec:
                hp^.valuedef:=tdef(hp^.valuedefderef.resolve);
              else
-              internalerror(200110205);
+              internalerror(2001102001);
            end;
            hp:=hp^.next;
          end;
@@ -732,7 +732,7 @@
              sl_vec:
                hp^.valuedefderef.build(hp^.valuedef);
              else
-              internalerror(200110205);
+              internalerror(2001102002);
            end;
            hp:=hp^.next;
          end;
@@ -777,13 +777,13 @@
              begin
                { same as above }
                if tdef(s).defid=defid_registered_nost then
-                 Internalerror(2015102505);
+                 Internalerror(2015102501);
                if not tdef(s).registered then
                  tdef(s).register_def;
                st:=FindUnitSymtable(tdef(s).owner);
              end
            else
-             internalerror(2016090201);
+             internalerror(2016090204);
            if not st.iscurrentunit then
              begin
                { register that the unit is needed for resolving }
@@ -1147,7 +1147,7 @@
                  putderef(hp^.valuedefderef);
                end;
              else
-              internalerror(200110205);
+              internalerror(2001102003);
            end;
            hp:=hp^.next;
          end;
Index: compiler/systems/t_win16.pas
===================================================================
--- compiler/systems/t_win16.pas	(revision 47063)
+++ compiler/systems/t_win16.pas	(working copy)
@@ -202,7 +202,7 @@
           procsym:
             DllExport_COMENT_EXPDEF.InternalName:=tprocdef(tprocsym(hp.sym).ProcdefList[0]).mangledname;
           else
-            internalerror(2015092701);
+            internalerror(2015092705);
         end
       else
         DllExport_COMENT_EXPDEF.InternalName:=hp.name^;
Index: compiler/x86/aasmcpu.pas
===================================================================
--- compiler/x86/aasmcpu.pas	(revision 47063)
+++ compiler/x86/aasmcpu.pas	(working copy)
@@ -2148,7 +2148,7 @@
               case aIsEVEXW1 of
                 false: if aIsVector512 then tuplesize := 32;
                 else
-                  Internalerror(2019081003);
+                  Internalerror(2019081013);
               end;
             end
             else if IF_THVM in aInsEntry^.Flags then
@@ -2823,7 +2823,7 @@
         if ((input.ref^.index<>NR_NO) and (getregtype(input.ref^.index)=R_MMREGISTER) and (input.ref^.base<>NR_NO) and (getregtype(input.ref^.base)<>R_INTREGISTER)) or // vector memory (AVX2)
            ((input.ref^.index<>NR_NO) and (getregtype(input.ref^.index)<>R_INTREGISTER) and (getregtype(input.ref^.index)<>R_MMREGISTER)) or
            ((input.ref^.base<>NR_NO) and (getregtype(input.ref^.base)<>R_INTREGISTER)) then
-         internalerror(200301081);
+         internalerror(2003010802);
 
 
         ir:=input.ref^.index;
@@ -2997,7 +2997,7 @@
         result:=false;
         if ((input.ref^.index<>NR_NO) and (getregtype(input.ref^.index)<>R_INTREGISTER)) or
            ((input.ref^.base<>NR_NO) and (getregtype(input.ref^.base)<>R_INTREGISTER)) then
-          internalerror(200301081);
+          internalerror(2003010803);
 
 
         ir:=input.ref^.index;
@@ -3864,7 +3864,7 @@
                                  end;
                                end;
                       else
-                        Internalerror(2019081004);
+                        Internalerror(2019081014);
                     end;
 
 
@@ -4325,7 +4325,7 @@
                 else
                  objdata_writereloc(currval-insend,2,nil,currabsreloc)
 {$else i8086}
-                InternalError(777006);
+                InternalError(2020100821);
 {$endif i8086}
               end;
             &64,&65,&66 :  // 064..066 - select between 16/32 address mode, but we support only 32 (only 16 on i8086)
@@ -4482,7 +4482,7 @@
                 else
                   InternalError(2015041503);
 {$else i8086}
-                InternalError(777006);
+                InternalError(2020100822);
 {$endif i8086}
               end;
             else
@@ -4794,10 +4794,10 @@
                 R_SUBMMX:
                   result:=taicpu.op_ref_reg(A_MOVDQA,S_NO,tmpref,r);
                 else
-                  internalerror(200506043);
+                  internalerror(2005060405);
               end;
           else
-            internalerror(200401041);
+            internalerror(2004010411);
         end;
       end;
 
@@ -4852,10 +4852,10 @@
                 R_SUBMMWHOLE:
                   result:=taicpu.op_reg_ref(A_MOVQ,S_NO,r,tmpref);
                 else
-                  internalerror(200506042);
+                  internalerror(2005060404);
               end;
           else
-            internalerror(200401041);
+            internalerror(2004010412);
         end;
       end;
 
@@ -5165,7 +5165,7 @@
                                  msiYMem64: RegYMMSizeMask := RegYMMSizeMask or OT_BITS256;
                                  msiZMem32,
                                  msiZMem64: RegYMMSizeMask := RegYMMSizeMask or OT_BITS512;
-                                       else InternalError(777211);
+                                       else InternalError(2020100823);
                                end;
                     OT_ZMMREG: case MRefInfo of
                                  msiXMem32,
@@ -5174,7 +5174,7 @@
                                  msiYMem64: RegZMMSizeMask := RegZMMSizeMask or OT_BITS256;
                                  msiZMem32,
                                  msiZMem64: RegZMMSizeMask := RegZMMSizeMask or OT_BITS512;
-                                       else InternalError(777211);
+                                       else InternalError(2020100824);
                                end;
 
                           //else InternalError(777209);
Index: compiler/x86/agx86att.pas
===================================================================
--- compiler/x86/agx86att.pas	(revision 47063)
+++ compiler/x86/agx86att.pas	(working copy)
@@ -276,7 +276,7 @@
           top_const :
               owner.writer.AsmWrite('$'+tostr(o.val));
           else
-            internalerror(10001);
+            internalerror(2020100810);
         end;
 
            if o.vopext and OTVE_VECTOR_WRITEMASK = OTVE_VECTOR_WRITEMASK then
@@ -328,7 +328,7 @@
           top_const :
             owner.writer.AsmWrite(tostr(o.val));
           else
-            internalerror(10001);
+            internalerror(2020100811);
         end;
       end;
 
Index: compiler/x86/agx86int.pas
===================================================================
--- compiler/x86/agx86int.pas	(revision 47063)
+++ compiler/x86/agx86int.pas	(working copy)
@@ -685,7 +685,7 @@
                  aitrealconst_s64comp:
                    writer.AsmWriteLn(#9#9'DQ'#9+extended2str(tai_realconst(hp).value.s64compval));
                  else
-                   internalerror(2014050604);
+                   internalerror(2014050606);
                end;
              end;
            ait_string :
@@ -1013,7 +1013,7 @@
              { Ignore for now };
            else
              if not WriteComments(hp) then
-               internalerror(10000);
+               internalerror(2020100802);
          end;
          hp:=tai(hp.next);
        end;
Index: compiler/x86/agx86nsm.pas
===================================================================
--- compiler/x86/agx86nsm.pas	(revision 47063)
+++ compiler/x86/agx86nsm.pas	(working copy)
@@ -450,7 +450,7 @@
                 end;
             end;
           else
-            internalerror(10001);
+            internalerror(2020100812);
         end;
       end;
 
@@ -487,7 +487,7 @@
           top_const :
             writer.AsmWrite(tostr(aint(o.val)));
           else
-            internalerror(10001);
+            internalerror(2020100813);
         end;
       end;
 
@@ -1292,7 +1292,7 @@
                    writer.AsmWriteLn('; OMF LINNUM Line '+tai_directive(hp).name);
 {$endif OMFOBJSUPPORT}
                  else
-                   internalerror(200509191);
+                   internalerror(2005091903);
                end;
                writer.AsmLn;
              end;
@@ -1300,7 +1300,7 @@
              { Ignore for now };
            else
              if not WriteComments(hp) then
-               internalerror(10000);
+               internalerror(2020100801);
          end;
          hp:=tai(hp.next);
        end;
Index: compiler/x86/aoptx86.pas
===================================================================
--- compiler/x86/aoptx86.pas	(revision 47063)
+++ compiler/x86/aoptx86.pas	(working copy)
@@ -3787,7 +3787,7 @@
             else
               begin
                 if SetC = C_NONE then
-                  InternalError(2018061401);
+                  InternalError(2018061402);
 
                 taicpu(hp2).SetCondition(SetC);
               end;
@@ -5472,7 +5472,7 @@
                     setsubreg(taicpu(hp1).oper[0]^.reg,getsubreg(taicpu(hp2).oper[0]^.reg));
                 end;
               else
-                internalerror(2008042701);
+                internalerror(2008042702);
             end;
             {
               ->
Index: compiler/x86/cgx86.pas
===================================================================
--- compiler/x86/cgx86.pas	(revision 47063)
+++ compiler/x86/cgx86.pas	(working copy)
@@ -271,7 +271,7 @@
     function Tcgx86.getmmxregister(list:TAsmList):Tregister;
       begin
         if not assigned(rg[R_MMXREGISTER]) then
-          internalerror(2003121214);
+          internalerror(2003121204);
         result:=rg[R_MMXREGISTER].getregister(list,R_SUBNONE);
       end;
 
@@ -1705,7 +1705,7 @@
                list.concat(taicpu.op_reg_ref(get_scalar_mm_op(fromsize,tosize,tcgsize2size[tosize]=tmpref.alignment),S_NO,reg,tmpref));
            end
          else
-           internalerror(200312252);
+           internalerror(2003122501);
        end;
 
 
@@ -1891,7 +1891,7 @@
             if asmop=A_NOP then
               begin
                 { do vectorized and shuffle finally }
-                internalerror(2010060102);
+                internalerror(2010060103);
               end;
           end
         else
Index: compiler/x86/cpubase.pas
===================================================================
--- compiler/x86/cpubase.pas	(revision 47063)
+++ compiler/x86/cpubase.pas	(working copy)
@@ -509,7 +509,7 @@
               else internalerror(2003031801);
             end;
           else
-            internalerror(2003031801);
+            internalerror(2003031802);
           end;
         end;
 
@@ -591,7 +591,7 @@
       begin
         result := flags_2_cond[f];
         if (result=C_None) then
-          InternalError(2014041301);
+          InternalError(2014041302);
       end;
 
 
Index: compiler/x86/nx86add.pas
===================================================================
--- compiler/x86/nx86add.pas	(revision 47063)
+++ compiler/x86/nx86add.pas	(working copy)
@@ -634,7 +634,7 @@
               nodetype:=equaln;
             end;
           else
-            internalerror(2003042215);
+            internalerror(2003042204);
         end;
         { left must be a register }
         left_must_be_reg(opdef,opsize,false);
@@ -800,7 +800,7 @@
               else
                begin
                  if not(left.location.loc in [LOC_REFERENCE,LOC_CREFERENCE]) then
-                  internalerror(200203247);
+                  internalerror(2002032412);
                  tcgx86(cg).make_simple_ref(current_asmdata.CurrAsmList,right.location.reference);
                  emit_ref_reg(A_MOVQ,S_NO,right.location.reference,hreg);
                  emit_reg_reg(op,S_NO,left.location.register,hreg);
@@ -1040,7 +1040,7 @@
           slashn :
             op:=OP_DIV;
           else
-            internalerror(200312231);
+            internalerror(2003122303);
         end;
 
         location_reset(location,LOC_MMREGISTER,def_cgsize(resultdef));
@@ -1063,7 +1063,7 @@
                   subn:
                     current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_HSUBPD,S_NO,location.register,location.register));
                   else
-                    internalerror(201108162);
+                    internalerror(2011081601);
                 end;
               end
             else
@@ -1083,7 +1083,7 @@
                       current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_HSUBPS,S_NO,location.register,location.register));
                     end;
                   else
-                    internalerror(201108163);
+                    internalerror(2011081604);
                 end;
               end
           end
@@ -1345,7 +1345,7 @@
             else
               op:=ops_div[hasref];
           else
-            internalerror(2003042214);
+            internalerror(2003042203);
         end;
 
         if hasref then
Index: compiler/x86/nx86cnv.pas
===================================================================
--- compiler/x86/nx86cnv.pas	(revision 47063)
+++ compiler/x86/nx86cnv.pas	(working copy)
@@ -285,7 +285,7 @@
                 OS_F64:
                   op:=A_CVTSI2SD;
                 else
-                  internalerror(2007120902);
+                  internalerror(2007120904);
               end;
 
             { don't use left.location.size, because that one may be OS_32/OS_64
Index: compiler/x86/nx86inl.pas
===================================================================
--- compiler/x86/nx86inl.pas	(revision 47063)
+++ compiler/x86/nx86inl.pas	(working copy)
@@ -730,7 +730,7 @@
                  OS_F64:
                    current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_CVTSD2SI,S_NO,left.location.register,location.register));
                  else
-                   internalerror(2007031402);
+                   internalerror(2007031404);
                end;
            end
          else
@@ -774,7 +774,7 @@
                  OS_F64:
                    current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_CVTTSD2SI,S_NO,left.location.register,location.register));
                  else
-                   internalerror(2007031401);
+                   internalerror(2007031403);
                end;
            end
          else
@@ -878,7 +878,7 @@
                  s64real:
                    current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_SQRTSD,S_NO,left.location.register,location.register));
                  else
-                   internalerror(200510031);
+                   internalerror(2005100303);
                end;
            end
          else
@@ -1374,7 +1374,7 @@
       begin
         secondpass(left);
         if not(is_dynamic_array(left.resultdef)) then
-          Internalerror(2019122801);
+          Internalerror(2019122809);
         { length in dynamic arrays is at offset -sizeof(pint) }
         hlcg.location_force_reg(current_asmdata.CurrAsmList,left.location,left.resultdef,left.resultdef,false);
         current_asmdata.getjumplabel(donelab);
Index: compiler/x86/nx86mat.pas
===================================================================
--- compiler/x86/nx86mat.pas	(revision 47063)
+++ compiler/x86/nx86mat.pas	(working copy)
@@ -672,7 +672,7 @@
                 4:
                   emit_none(A_CDQ,S_NO);
                 else
-                  internalerror(2013102701);
+                  internalerror(2013102704);
               end
             else
               emit_reg_reg(A_XOR,opsize,regd,regd);
Index: compiler/x86/rax86.pas
===================================================================
--- compiler/x86/rax86.pas	(revision 47063)
+++ compiler/x86/rax86.pas	(working copy)
@@ -518,7 +518,7 @@
               msbBCST32: memrefsize := 32;
               msbBCST64: memrefsize := 64;
               else
-                Internalerror(2019081005);
+                Internalerror(2019081015);
             end;
           end
           else
@@ -637,7 +637,7 @@
                            S_XMM : memrefsize := 128;
                            S_YMM : memrefsize := 256;
                            S_ZMM : memrefsize := 512;
-                           else Internalerror(2019081001);
+                           else Internalerror(2019081010);
                          end;
                          break;
                        end;
@@ -685,7 +685,7 @@
                     msiMemRegConst128: memrefsize := 128;
                     msiMemRegConst256: memrefsize := 256;
                     msiMemRegConst512: memrefsize := 512;
-                    else Internalerror(2019081002);
+                    else Internalerror(2019081012);
                   end;
                 end;
               end;
@@ -712,7 +712,7 @@
             msiMultiple:
               ;
             else
-              Internalerror(2019081005);
+              Internalerror(2019081016);
           end;
 
           if memrefsize > -1 then
@@ -828,7 +828,7 @@
                                    tx86operand(operands[i]).size   := OS_M64;
                                  end;
                       else
-                        Internalerror(2019081006);
+                        Internalerror(2019081017);
                     end;
                   end
                   else
@@ -1187,7 +1187,7 @@
                                                           break;
                                                         end;
                                      else
-                                       Internalerror(2019081007);
+                                       Internalerror(2019081018);
                                    end;
                                  end;
                                end;
Index: compiler/x86/rax86att.pas
===================================================================
--- compiler/x86/rax86att.pas	(revision 47063)
+++ compiler/x86/rax86att.pas	(working copy)
@@ -735,7 +735,7 @@
                                   inc(oper.opr.constoffset, l);
                                 end;
                               else
-                                internalerror(200309202);
+                                internalerror(2003092011);
                             end;
                         end;
                     end;
Index: compiler/x86/symx86.pas
===================================================================
--- compiler/x86/symx86.pas	(revision 47063)
+++ compiler/x86/symx86.pas	(working copy)
@@ -109,7 +109,7 @@
       key: tx86PtrDefKey;
     begin
       if not assigned(current_module) then
-        internalerror(2011071101);
+        internalerror(2011071102);
       key.def:=def;
       key.x86typ:=x86typ;
       res:=current_module.ptrdefs.FindOrAdd(@key,sizeof(key));
Index: compiler/x86_64/cpuelf.pas
===================================================================
--- compiler/x86_64/cpuelf.pas	(revision 47063)
+++ compiler/x86_64/cpuelf.pas	(working copy)
@@ -164,7 +164,7 @@
           else if objrel.size=4 then
             result:=R_X86_64_32
           else
-            InternalError(2012061901);
+            InternalError(2012061902);
         RELOC_ABSOLUTE32 :
           result:=R_X86_64_32S;
         RELOC_GOTPCREL :
@@ -186,7 +186,7 @@
           else if objrel.size=4 then
             result:=R_X86_64_DTPOFF32
           else
-            InternalError(2019091701);
+            InternalError(2019091702);
         else
           result:=0;
           InternalError(2012082302);
@@ -557,7 +557,7 @@
               else
                 begin
                   writeln(objreloc.typ);
-                  internalerror(200604014);
+                  internalerror(2006040105);
                 end;
             end
           else           { not relocsec.Used }
@@ -577,7 +577,7 @@
                 end;
               end;
           else
-            InternalError(2012101102);
+            InternalError(2012101103);
           end;
 
           data.Seek(objreloc.dataoffset);
Index: compiler/x86_64/hlcgcpu.pas
===================================================================
--- compiler/x86_64/hlcgcpu.pas	(revision 47063)
+++ compiler/x86_64/hlcgcpu.pas	(working copy)
@@ -81,7 +81,7 @@
           not is_objectpascal_helper(procdef.struct) then
         begin
           if (procdef.extnumber=$ffff) then
-            Internalerror(200006139);
+            Internalerror(2000061301);
           { load vmt from first paramter }
           { win64 uses a different abi }
           if x86_64_use_ms_abi(procdef.proccalloption) then
Index: compiler/x86_64/rax64int.pas
===================================================================
--- compiler/x86_64/rax64int.pas	(revision 47063)
+++ compiler/x86_64/rax64int.pas	(working copy)
@@ -100,7 +100,7 @@
         err: boolean;
       begin
         if actasmtoken<>AS_TARGET_DIRECTIVE then
-          InternalError(2011100201);
+          InternalError(2011100203);
         Consume(AS_TARGET_DIRECTIVE);
         Include(current_procinfo.flags,pi_has_unwind_info);
         case actsehdirective of
Index: compiler/x86_64/win64unw.pas
===================================================================
--- compiler/x86_64/win64unw.pas	(revision 47063)
+++ compiler/x86_64/win64unw.pas	(working copy)
@@ -349,7 +349,7 @@
   if info=0 then                 { frame register cannot be RAX }
     InternalError(2011072304);
   if (ofs>240) or ((ofs and 15)<>0) then
-    InternalError(2011072310);
+    InternalError(2011072309);
   FFrameReg:=info;
   FFrameOffs:=ofs;
   { !! looks like docs aren't correct and info should be set to register }
Index: compiler/xtensa/aasmcpu.pas
===================================================================
--- compiler/xtensa/aasmcpu.pas	(revision 47063)
+++ compiler/xtensa/aasmcpu.pas	(working copy)
@@ -492,7 +492,7 @@
           R_FPUREGISTER:
             result:=taicpu.op_reg_ref(A_SSI,r,ref);
           else
-            internalerror(2020030701);
+            internalerror(2020030702);
         end;
       end;
 
Index: compiler/xtensa/cgcpu.pas
===================================================================
--- compiler/xtensa/cgcpu.pas	(revision 47063)
+++ compiler/xtensa/cgcpu.pas	(working copy)
@@ -283,7 +283,7 @@
           OS_32,
           OS_S32: op:=A_L32I;
         else
-          internalerror(2020030801);
+          internalerror(2020030805);
         end;
 
         href:=ref;
@@ -904,7 +904,7 @@
               OC_LT: op:=C_LTZ;
               OC_GTE: op:=C_GEZ;
             else
-              Internalerror(2020030801);
+              Internalerror(2020030806);
             end;     
             instr:=taicpu.op_reg_sym(A_B,reg,l);
             instr.condition:=op;
@@ -920,7 +920,7 @@
               OC_LT: op:=C_LTI;
               OC_GTE: op:=C_GEI;
             else
-              Internalerror(2020030801);
+              Internalerror(2020030807);
             end;
 
             instr:=taicpu.op_reg_const_sym(A_B,reg,a,l);
@@ -935,7 +935,7 @@
               OC_B: op:=C_LTUI;
               OC_AE: op:=C_GEUI;
             else
-              Internalerror(2020030801);
+              Internalerror(2020030808);
             end;
 
             instr:=taicpu.op_reg_const_sym(A_B,reg,a,l);
Index: compiler/xtensa/cpupara.pas
===================================================================
--- compiler/xtensa/cpupara.pas	(revision 47063)
+++ compiler/xtensa/cpupara.pas	(working copy)
@@ -221,7 +221,7 @@
                   { only call8 used/supported so far }
                   paraloc^.register:=newreg(R_INTREGISTER,RS_A11,cgsize2subreg(R_INTREGISTER,retcgsize));
                 else
-                  Internalerror(2020032202);
+                  Internalerror(2020032204);
               end
             else
               paraloc^.register:=NR_A3;
@@ -290,7 +290,7 @@
 
         result:=create_paraloc_info_intern(p,side,p.paras,curintreg,cur_stack_offset,false);
         if result<cur_stack_offset then
-          Internalerror(2020083001);
+          Internalerror(2020083002);
 
         create_funcretloc_info(p,side);
       end;
Index: compiler/xtensa/ncpuadd.pas
===================================================================
--- compiler/xtensa/ncpuadd.pas	(revision 47063)
+++ compiler/xtensa/ncpuadd.pas	(working copy)
@@ -180,7 +180,7 @@
             gtn:      cond:=OC_A;
             gten:     cond:=OC_AE;
           else
-            internalerror(2020030801);
+            internalerror(2020030803);
           end;
 
         if (right.nodetype=ordconstn) and not(nf_swapped in flags) then
Index: compiler/xtensa/ncpumat.pas
===================================================================
--- compiler/xtensa/ncpumat.pas	(revision 47063)
+++ compiler/xtensa/ncpumat.pas	(working copy)
@@ -241,7 +241,7 @@
                   cg.a_load_reg_reg(current_asmdata.CurrAsmList,OS_32,OS_32,left.location.register64.reglo,location.register64.reglo);
                 end;
             else
-              internalerror(2014033101);
+              internalerror(2014033102);
             end;
           end
         else
@@ -319,7 +319,7 @@
           end
         else
           begin
-            internalerror(2020082209);
+            internalerror(2020082204);
             { load right operators in a register - this
                is done since most target cpu which will use this
                node do not support a shift count in a mem. location (cec)
Index: compiler/xtensa/ncpumem.pas
===================================================================
--- compiler/xtensa/ncpumem.pas	(revision 47063)
+++ compiler/xtensa/ncpumem.pas	(working copy)
@@ -73,10 +73,10 @@
                  location.reference.index:=hreg;
                end
              else
-               Internalerror(2020042202);
+               Internalerror(2020042214);
              { update alignment }
              if (location.reference.alignment=0) then
-               internalerror(2020042203);
+               internalerror(2020042217);
              location.reference.alignment:=newalignment(location.reference.alignment,l);
            end
          else
Index: compiler/xtensa/racpugas.pas
===================================================================
--- compiler/xtensa/racpugas.pas	(revision 47063)
+++ compiler/xtensa/racpugas.pas	(working copy)
@@ -536,7 +536,7 @@
                        OPR_REFERENCE :
                          inc(oper.opr.ref.offset,l);
                        else
-                         internalerror(200309202);
+                         internalerror(2003092004);
                      end;
                    end
                end;
Index: compiler/z80/aasmcpu.pas
===================================================================
--- compiler/z80/aasmcpu.pas	(revision 47063)
+++ compiler/z80/aasmcpu.pas	(working copy)
@@ -802,7 +802,7 @@
                   NR_L:
                     result:=5 shl 3;
                   else
-                    internalerror(2020050419);
+                    internalerror(2020050427);
                 end;
                 case oper[1]^.reg of
                   NR_A:
@@ -820,7 +820,7 @@
                   NR_L:
                     result:=result or 5;
                   else
-                    internalerror(2020050419);
+                    internalerror(2020050428);
                 end;
               end;
             'ccc':
@@ -862,7 +862,7 @@
                   if insentry^.optypes[i]=OT_IMM3 then
                     begin
                       if oper[i]^.typ<>top_const then
-                        internalerror(2020050606);
+                        internalerror(2020050614);
                       result:=Byte(oper[i]^.val) and $07;
                     end;
               end;
@@ -869,7 +869,7 @@
             'bbbrrr':
               result:=(EvalMaskCode('bbb') shl 3) or EvalMaskCode('rrr');
             else
-              internalerror(2020050409);
+              internalerror(2020050426);
           end;
         end;
 
@@ -904,7 +904,7 @@
               '''':
                 begin
                   if (maskcode='') or (maskcode[length(maskcode)]<>'r') then
-                    internalerror(2020050408);
+                    internalerror(2020050425);
                   maskcode[length(maskcode)]:='R';
                 end;
               else
@@ -947,7 +947,7 @@
             if (ch=',') or (i>length(code)) then
               begin
                 if token='' then
-                  internalerror(2020050402);
+                  internalerror(2020050424);
                 if token[1]='$' then
                   begin
                     Val(token,b,valcode);
@@ -1311,7 +1311,7 @@
           R_INTREGISTER :
             result:=taicpu.op_ref_reg(A_LD,ref,r);
           else
-            internalerror(200401041);
+            internalerror(2004010403);
         end;
       end;
 
Index: compiler/z80/agsdasz80.pas
===================================================================
--- compiler/z80/agsdasz80.pas	(revision 47063)
+++ compiler/z80/agsdasz80.pas	(working copy)
@@ -147,7 +147,7 @@
      	         else if sizeof(tai_realconst(hp).value.s80val) = sizeof(single) then
                    writer.AsmWriteLn(asminfo^.comment+'value: '+single2str(tai_realconst(hp).value.s80val))
                 else
-     	         internalerror(2017091901);
+     	         internalerror(2017091904);
        	      end;
 {$pop}
 {$endif}
@@ -155,7 +155,7 @@
               aitrealconst_s64comp:
                 writer.AsmWriteLn(asminfo^.comment+'value: '+extended2str(tai_realconst(hp).value.s64compval));
               else
-                internalerror(2014050604);
+                internalerror(2014050601);
             end;
           end;
         writer.AsmWrite(dbdir);
@@ -190,7 +190,7 @@
 	      else if sizeof(tai_realconst(hp).value.s80val) = sizeof(single) then
 	        eextended:=float32_to_floatx80(float32(single(tai_realconst(hp).value.s80val)))
 	      else
-	        internalerror(2017091901);
+	        internalerror(2017091905);
               pdata:=@eextended;
             end;
 {$pop}
@@ -202,7 +202,7 @@
               pdata:=@ccomp;
             end;
           else
-            internalerror(2014051001);
+            internalerror(2014051002);
         end;
         count:=tai_realconst(hp).datasize;
         { write bytes in inverse order if source and target endianess don't
@@ -224,7 +224,7 @@
           begin
             { only supported for double }
             if tai_realconst(hp).datasize<>8 then
-              internalerror(2014050605);
+              internalerror(2014050607);
             { switch bit of the index so that the words are written in
               the opposite order }
             swapmask:=4;
@@ -417,7 +417,7 @@
                     catching bugs in the code generator during compilation }
                   if ((o.ref^.base<>NR_NO) or (o.ref^.index<>NR_NO)) and
                      ((o.ref^.offset<-128) or (o.ref^.offset>127)) then
-                    internalerror(2020042802);
+                    internalerror(2020042805);
                   writer.AsmWrite(tostr(o.ref^.offset));
                   writer.AsmWrite(' (');
                   if o.ref^.base<>NR_NO then
@@ -441,7 +441,7 @@
                   if o.ref^.base<>NR_NO then
                     begin
                       if o.ref^.index<>NR_NO then
-                        internalerror(2020040201);
+                        internalerror(2020040203);
                       writer.AsmWrite(std_regname(o.ref^.base));
                       need_plus:=true;
                     end
@@ -448,7 +448,7 @@
                   else if o.ref^.index<>NR_NO then
                     begin
                       if o.ref^.scalefactor>1 then
-                        internalerror(2020040202);
+                        internalerror(2020040206);
                       writer.AsmWrite(std_regname(o.ref^.index));
                       need_plus:=true;
                     end;
@@ -474,7 +474,7 @@
                 end;
             end;
           else
-            internalerror(10001);
+            internalerror(2020100803);
         end;
       end;
 
@@ -507,7 +507,7 @@
                 end;
             end;
           else
-            internalerror(10001);
+            internalerror(2020100804);
         end;
       end;
 
Index: compiler/z80/agz80vasm.pas
===================================================================
--- compiler/z80/agz80vasm.pas	(revision 47063)
+++ compiler/z80/agz80vasm.pas	(working copy)
@@ -148,7 +148,7 @@
                  else if sizeof(tai_realconst(hp).value.s80val) = sizeof(single) then
                    writer.AsmWriteLn(asminfo^.comment+'value: '+single2str(tai_realconst(hp).value.s80val))
                 else
-                  internalerror(2017091901);
+                  internalerror(2017091906);
               end;
 {$pop}
 {$endif}
@@ -156,7 +156,7 @@
               aitrealconst_s64comp:
                 writer.AsmWriteLn(asminfo^.comment+'value: '+extended2str(tai_realconst(hp).value.s64compval));
               else
-                internalerror(2014050604);
+                internalerror(2014050602);
             end;
           end;
         writer.AsmWrite(dbdir);
@@ -191,7 +191,7 @@
               else if sizeof(tai_realconst(hp).value.s80val) = sizeof(single) then
                 eextended:=float32_to_floatx80(float32(single(tai_realconst(hp).value.s80val)))
               else
-                internalerror(2017091901);
+                internalerror(2017091907);
               pdata:=@eextended;
             end;
 {$pop}
@@ -203,7 +203,7 @@
               pdata:=@ccomp;
             end;
           else
-            internalerror(2014051001);
+            internalerror(2014051003);
         end;
         count:=tai_realconst(hp).datasize;
         { write bytes in inverse order if source and target endianess don't
@@ -225,7 +225,7 @@
           begin
             { only supported for double }
             if tai_realconst(hp).datasize<>8 then
-              internalerror(2014050605);
+              internalerror(2014050609);
             { switch bit of the index so that the words are written in
               the opposite order }
             swapmask:=4;
@@ -426,7 +426,7 @@
                   {if SmartAsm then
                     AddSymbol(o.ref^.symbol.name,false);}
                   if (o.ref^.base<>NR_NO) or (o.ref^.index<>NR_NO) then
-                    internalerror(2020041101);
+                    internalerror(2020041102);
                  // writer.AsmWrite('#');
                   case o.ref^.refaddr of
                     addr_lo8:
@@ -452,13 +452,13 @@
                   if o.ref^.base<>NR_NO then
                     begin
                       if o.ref^.index<>NR_NO then
-                        internalerror(2020040201);
+                        internalerror(2020040204);
                       writer.AsmWrite(std_regname(o.ref^.base));
                     end
                   else if o.ref^.index<>NR_NO then
                     begin
                       if o.ref^.scalefactor>1 then
-                        internalerror(2020040202);
+                        internalerror(2020040207);
                       writer.AsmWrite(std_regname(o.ref^.index));
                     end;
                   if o.ref^.offset > 0 then
@@ -475,7 +475,7 @@
                   if o.ref^.base<>NR_NO then
                     begin
                       if o.ref^.index<>NR_NO then
-                        internalerror(2020040201);
+                        internalerror(2020040205);
                       writer.AsmWrite(std_regname(o.ref^.base));
                       need_plus:=true;
                     end
@@ -482,7 +482,7 @@
                   else if o.ref^.index<>NR_NO then
                     begin
                       if o.ref^.scalefactor>1 then
-                        internalerror(2020040202);
+                        internalerror(2020040208);
                       writer.AsmWrite(std_regname(o.ref^.index));
                       need_plus:=true;
                     end;
@@ -508,7 +508,7 @@
                 end;
             end;
           else
-            internalerror(10001);
+            internalerror(2020100805);
         end;
       end;
 
@@ -541,7 +541,7 @@
                 end;
             end;
           else
-            internalerror(10001);
+            internalerror(2020100806);
         end;
       end;
 
Index: compiler/z80/aoptcpu.pas
===================================================================
--- compiler/z80/aoptcpu.pas	(revision 47063)
+++ compiler/z80/aoptcpu.pas	(working copy)
@@ -274,7 +274,7 @@
             A_IN:
               begin
                 if p.ops<>2 then
-                  internalerror(2020051602);
+                  internalerror(2020051612);
                 if (p.oper[1]^.typ=top_ref) and ((p.oper[1]^.ref^.base=NR_C) or (p.oper[1]^.ref^.index=NR_C)) then
                   result:=(reg=NR_ADDSUBTRACTFLAG) or
                           (reg=NR_PARITYOVERFLOWFLAG) or
@@ -293,7 +293,7 @@
           A_LD:
             begin
               if p.ops<>2 then
-                internalerror(2020051112);
+                internalerror(2020051114);
               result:=(p.oper[0]^.typ = top_reg) and
                       (Reg1WriteOverwritesReg2Entirely(p.oper[0]^.reg,reg)) and
                       ((p.oper[1]^.typ = top_const) or
@@ -352,7 +352,7 @@
                        not(Reg1ReadDependsOnReg2(NR_BC,reg)));
             end;
           else
-            internalerror(2020051111);
+            internalerror(2020051108);
         end;
     end;
 
Index: compiler/z80/aoptcpub.pas
===================================================================
--- compiler/z80/aoptcpub.pas	(revision 47063)
+++ compiler/z80/aoptcpub.pas	(working copy)
@@ -231,7 +231,7 @@
             A_LD:
               begin
                 if p.ops<>2 then
-                  internalerror(2020051112);
+                  internalerror(2020051115);
                 { LD A,I or LD A,R ? }
                 if (p.oper[0]^.typ=top_reg) and (p.oper[0]^.reg=NR_A) and
                    (p.oper[1]^.typ=top_reg) and ((p.oper[1]^.reg=NR_I) or (p.oper[1]^.reg=NR_R)) then
@@ -250,7 +250,7 @@
             A_INC,A_DEC:
               begin
                 if p.ops<>1 then
-                  internalerror(2020051602);
+                  internalerror(2020051613);
                 if (p.oper[0]^.typ=top_reg) and ((p.oper[0]^.reg=NR_BC) or
                                                  (p.oper[0]^.reg=NR_DE) or
                                                  (p.oper[0]^.reg=NR_HL) or
@@ -274,7 +274,7 @@
             A_ADD:
               begin
                 if p.ops<>2 then
-                  internalerror(2020051601);
+                  internalerror(2020051611);
                 if (p.oper[0]^.typ=top_reg) and ((p.oper[0]^.reg=NR_HL) or (p.oper[0]^.reg=NR_IX) or (p.oper[0]^.reg=NR_IY)) then
                   result:=Reg1ReadDependsOnReg2(Reg,NR_HALFCARRYFLAG) or
                           Reg1ReadDependsOnReg2(Reg,NR_ADDSUBTRACTFLAG) or
@@ -300,7 +300,7 @@
             A_IN:
               begin
                 if p.ops<>2 then
-                  internalerror(2020051602);
+                  internalerror(2020051614);
                 if (p.oper[1]^.typ=top_ref) and ((p.oper[1]^.ref^.base=NR_C) or (p.oper[1]^.ref^.index=NR_C)) then
                   result:=Reg1ReadDependsOnReg2(Reg,NR_ADDSUBTRACTFLAG) or
                           Reg1ReadDependsOnReg2(Reg,NR_PARITYOVERFLOWFLAG) or
@@ -311,7 +311,7 @@
                   result:=false;
               end;
             else
-              internalerror(2020051111);
+              internalerror(2020051113);
           end;
         end;
     end;
Index: compiler/z80/cgcpu.pas
===================================================================
--- compiler/z80/cgcpu.pas	(revision 47063)
+++ compiler/z80/cgcpu.pas	(working copy)
@@ -233,7 +233,7 @@
                   a_load_reg_ref(list,paraloc^.size,paraloc^.size,r,ref);
                end;
              else
-               internalerror(2002071004);
+               internalerror(2002071003);
           end;
         end;
 
@@ -369,7 +369,7 @@
         ref: treference;
       begin
         if not(tcgsize2size[paraloc.Size] in [1..4]) then
-          internalerror(2014011101);
+          internalerror(2014011104);
 
         if use_push(paraloc) then
           begin
@@ -435,7 +435,7 @@
                        hp:=hp^.Next;
                      end;
                    else
-                     internalerror(2002071004);
+                     internalerror(2002071005);
                 end;
               end;
           end;
@@ -1071,7 +1071,7 @@
                        else
                          list.concat(taicpu.op_reg(A_RR,GetOffsetReg64(reg,reghi,tcgsize2size[size]-1)));
                      else
-                       internalerror(2020040903);
+                       internalerror(2020040905);
                    end;
                    if size in [OS_S16,OS_16,OS_S32,OS_32,OS_S64,OS_64] then
                      begin
@@ -1086,7 +1086,7 @@
                              OP_SHL:
                                list.concat(taicpu.op_reg(A_RL,GetOffsetReg64(reg,reghi,i-1)));
                              else
-                               internalerror(2020040904);
+                               internalerror(2020040906);
                            end;
                        end;
                      end;
@@ -1430,7 +1430,7 @@
                 if ref.index<>NR_NO then
                   begin
                     if ref.scalefactor>1 then
-                      internalerror(2020042002);
+                      internalerror(2020042003);
                     getcpuregister(list,NR_A);
                     emit_mov(list,NR_A,NR_L);
                     list.concat(taicpu.op_reg_reg(A_ADD,NR_A,ref.index));
@@ -1569,7 +1569,7 @@
          regsused: tregisterlist;
        begin
          if (tcgsize2size[fromsize]>32) or (tcgsize2size[tosize]>32) or (fromsize=OS_NO) or (tosize=OS_NO) then
-           internalerror(2011021307);
+           internalerror(2011021301);
          if tcgsize2size[fromsize]>=tcgsize2size[tosize] then
            fromsize:=tosize;
 
@@ -1745,7 +1745,7 @@
                   OC_BE:
                     a_jmp_flags(list,F_NC,l);
                   else
-                    internalerror(2020042206);
+                    internalerror(2020042218);
                 end;
                 ungetcpuregister(list,NR_A);
               end
@@ -1764,7 +1764,7 @@
                   OC_GTE:
                     a_jmp_flags(list,F_P,l);
                   else
-                    internalerror(2020042206);
+                    internalerror(2020042219);
                 end;
                 ungetcpuregister(list,NR_A);
               end
@@ -1783,7 +1783,7 @@
                   OC_LTE:
                     a_jmp_flags(list,F_P,l);
                   else
-                    internalerror(2020042206);
+                    internalerror(2020042220);
                 end;
                 ungetcpuregister(list,NR_A);
               end;
@@ -1805,7 +1805,7 @@
                   OC_NE:
                     a_jmp_flags(list,F_NE,l);
                   else
-                    internalerror(2020042206);
+                    internalerror(2020042221);
                 end;
               end;
             if cmp_op=OC_EQ then
@@ -1828,7 +1828,7 @@
                     OC_LTE:
                       a_jmp_signed_cmp_3way(list,l,nil,tmpl);
                     else
-                      internalerror(2020042206);
+                      internalerror(2020042222);
                   end
                 else if i<>0 then
                   case cmp_op of
@@ -1843,7 +1843,7 @@
                     OC_LTE:
                       a_jmp_unsigned_cmp_3way(list,l,nil,tmpl);
                     else
-                      internalerror(2020042206);
+                      internalerror(2020042223);
                   end
                 else
                 case cmp_op of
@@ -1860,7 +1860,7 @@
                   OC_LTE:
                     a_jmp_unsigned_cmp_3way(list,l,l,nil);
                   else
-                    internalerror(2020042206);
+                    internalerror(2020042224);
                 end;
               end;
             cg.a_label(current_asmdata.CurrAsmList,tmpl);
Index: compiler/z80/cpubase.pas
===================================================================
--- compiler/z80/cpubase.pas	(revision 47063)
+++ compiler/z80/cpubase.pas	(working copy)
@@ -436,7 +436,7 @@
               reghi:=NR_H;
             end;
           else
-            internalerror(2020042801);
+            internalerror(2020042804);
         end;
       end;
 
Index: compiler/z80/cpupara.pas
===================================================================
--- compiler/z80/cpupara.pas	(revision 47063)
+++ compiler/z80/cpupara.pas	(working copy)
@@ -525,7 +525,7 @@
           { just continue loading the parameters in the registers }
           result:=create_paraloc_info_intern(p,side,varargspara,curintreg,curfloatreg,curmmreg,cur_stack_offset)
         else
-          internalerror(200410231);
+          internalerror(2004102302);
       end;
 
 begin
Index: compiler/z80/nz80add.pas
===================================================================
--- compiler/z80/nz80add.pas	(revision 47063)
+++ compiler/z80/nz80add.pas	(working copy)
@@ -302,7 +302,7 @@
                   { Already handled before the case statement. Nothing to do here. }
                 end;
               else
-                internalerror(2020040402);
+                internalerror(2020040403);
             end;
             current_asmdata.getjumplabel(l);
             cg.a_jmp_flags(current_asmdata.CurrAsmList,F_PO,l);
@@ -400,7 +400,7 @@
                         unequaln:
                           cg.a_jmp_flags(current_asmdata.CurrAsmList,F_NE,truelabel);
                         else
-                          internalerror(2020042102);
+                          internalerror(2020042104);
                       end;
                     end;
                   cg.ungetcpuregister(current_asmdata.CurrAsmList,NR_A);
@@ -422,7 +422,7 @@
                         unequaln:
                           cg.a_jmp_flags(current_asmdata.CurrAsmList,F_NE,truelabel);
                         else
-                          internalerror(2020042102);
+                          internalerror(2020042105);
                       end;
                     end;
                   cg.ungetcpuregister(current_asmdata.CurrAsmList,NR_A);
@@ -494,7 +494,7 @@
                             gten:
                               tcgz80(cg).a_jmp_unsigned_cmp_3way(current_asmdata.CurrAsmList,falselabel,nil,truelabel);
                             else
-                              internalerror(2020042202);
+                              internalerror(2020042207);
                           end
                         else
                           case actualnodetype of
@@ -538,7 +538,7 @@
                           gten:
                             tcgz80(cg).a_jmp_signed_cmp_3way(current_asmdata.CurrAsmList,falselabel,nil,truelabel);
                           else
-                            internalerror(2020042202);
+                            internalerror(2020042210);
                         end
                       else if i<>0 then
                         case actualnodetype of
@@ -549,7 +549,7 @@
                           gten:
                             tcgz80(cg).a_jmp_unsigned_cmp_3way(current_asmdata.CurrAsmList,falselabel,nil,truelabel);
                           else
-                            internalerror(2020042202);
+                            internalerror(2020042211);
                         end
                       else
                         case actualnodetype of
@@ -562,7 +562,7 @@
                           gten:
                             tcgz80(cg).a_jmp_unsigned_cmp_3way(current_asmdata.CurrAsmList,falselabel,truelabel,truelabel);
                           else
-                            internalerror(2020042203);
+                            internalerror(2020042215);
                         end;
                     end;
                   cg.ungetcpuregister(current_asmdata.CurrAsmList,NR_A);
@@ -587,7 +587,7 @@
                           gten:
                             tcgz80(cg).a_jmp_signed_cmp_3way(current_asmdata.CurrAsmList,falselabel,nil,truelabel);
                           else
-                            internalerror(2020042202);
+                            internalerror(2020042212);
                         end
                       else if i<>0 then
                         case actualnodetype of
@@ -598,7 +598,7 @@
                           gten:
                             tcgz80(cg).a_jmp_unsigned_cmp_3way(current_asmdata.CurrAsmList,falselabel,nil,truelabel);
                           else
-                            internalerror(2020042202);
+                            internalerror(2020042213);
                         end
                       else
                         case actualnodetype of
@@ -611,7 +611,7 @@
                           gten:
                             tcgz80(cg).a_jmp_unsigned_cmp_3way(current_asmdata.CurrAsmList,falselabel,truelabel,truelabel);
                           else
-                            internalerror(2020042203);
+                            internalerror(2020042216);
                         end;
                     end;
                   cg.ungetcpuregister(current_asmdata.CurrAsmList,NR_A);
@@ -621,7 +621,7 @@
                   { Already handled before the case statement. Nothing to do here. }
                 end;
               else
-                internalerror(2020042103);
+                internalerror(2020042106);
             end;
           end;
       end;
Index: compiler/z80/tgcpu.pas
===================================================================
--- compiler/z80/tgcpu.pas	(revision 47063)
+++ compiler/z80/tgcpu.pas	(working copy)
@@ -54,7 +54,7 @@
   begin
     { this is a negative value normally }
     if l>0 then
-      internalerror(200204221);
+      internalerror(2002042202);
     firsttemp:=l;
     lasttemp:=l;
 {$ifdef EXTDEBUG}
interr.patch (205,624 bytes)   

J. Gareth Moreton

2020-10-08 15:40

developer   ~0126146

Last edited: 2020-10-08 15:41

View 2 revisions

I wasn't quite expecting you to fix all of them at once. Also, unless I'm thinking of the wrong platform, how good is Z80 at handling 32-bit numbers? I noticed many of them are 16-bit. Granted it shouldn't be a concern because raising an internal error isn't exactly performance-critical,

Marģers

2020-10-08 19:51

reporter   ~0126149

Z80 is available only as cross compiler so 32-bit internal error numbers are fine.

Sven Barth

2020-10-09 09:43

manager   ~0126171

@J. Gareth Moreton: The compiler is not running on Z80 so its irrelevant for the internal errors what that architecture supports. The "smallest" architecture/OS FPC itself runs on is DOS with DOS-Extender (thus 32-bit).

Marģers

2020-10-09 10:56

reporter   ~0126174

I split the big patch by folders in case all is not acceptable, but part for z80 and xtensa should not be not a problem.

Florian

2020-10-13 21:59

administrator   ~0126287

Thanks, I applied it.

Issue History

Date Modified Username Field Change
2020-10-08 12:32 Marģers New Issue
2020-10-08 12:32 Marģers File Added: intererror_log.txt
2020-10-08 12:32 Marģers File Added: interr.patch
2020-10-08 15:40 J. Gareth Moreton Note Added: 0126146
2020-10-08 15:41 J. Gareth Moreton Note Edited: 0126146 View Revisions
2020-10-08 19:51 Marģers Note Added: 0126149
2020-10-09 09:43 Sven Barth Note Added: 0126171
2020-10-09 10:56 Marģers Note Added: 0126174
2020-10-09 10:56 Marģers File Added: patch_spilt_by_folders.zip
2020-10-13 21:59 Florian Assigned To => Florian
2020-10-13 21:59 Florian Status new => resolved
2020-10-13 21:59 Florian Resolution open => fixed
2020-10-13 21:59 Florian Fixed in Version => 3.3.1
2020-10-13 21:59 Florian Fixed in Revision => 47103
2020-10-13 21:59 Florian FPCTarget => -
2020-10-13 21:59 Florian Note Added: 0126287
2020-10-14 15:49 Marģers Status resolved => closed