[fpc-pascal] Internal error 200312122

[Peter Vreman]

> #2  0x0809a6db in TCGARM__A_OP_CONST_REG_REG_CHECKOVERFLOW
> (LIST=0x411f3f34, OP=OP_SUB, SIZE=OS_32, A=373, SRC=16777216,
> DST=16777216, SETFLAGS=false, OVLOC=
>          {LOC = LOC_VOID, SIZE = 166, RESFLAGS = 186, VALUE = 134759354,
> VALUE64 = 4713231088527885242, REFERENCE = {OFFSET = 134759354, SYMBOL =
> 0x4168c2b4, RELSYMBOL = 0x4168c2b4, SEGMENT = 1097666932, BASE =
> -2068527460, INDEX = 135726240, REFADDR = 60, SCALEFACTOR = 142,
> SYMBOLDATA = 0x809ff56, SIGNINDEX = 52, SHIFTIMM = 4, ADDRESSMODE = 9,
> SHIFTMODE = 8}, REGISTER = 134759354, REGISTER64 = {REGLO = 134759354,
> REGHI = 1097384628}}, this=0x40068014) at cgcpu.pas:435
> 435     in cgcpu.pas
> (gdb) fr 1
> #1  0x080c926f in TCG__GETINTREGISTER (LIST=0x411f3f34, SIZE=OS_32,
> this=0x40068014) at cgobj.pas:548
> 548               internalerror(200312122);

Fixed