View Issue Details

IDProjectCategoryView StatusLast Update
0036157FPCCompilerpublic2019-10-13 13:11
ReporterMartin FriebeAssigned ToJonas Maebe 
PrioritynormalSeverityminorReproducibilityalways
Status resolvedResolutionfixed 
Platform64bit IntelOSwin 10OS Version10
Product Version3.0.4Product Build 
Target VersionFixed in Version3.3.1 
Summary0036157: Internal error 2007022010 / with small sample code
Descriptionfpc 3.0.4 for 64bits on win10

program WatchesValuePrg;

type
  TEnum = (EnVal1, EnVal2, EnVal3, EnVal4);
  TSet = set of TEnum;
  TBitPackSetArray2 = bitpacked array [0..1, 0..2] of TSet;
const
  gcBitPackSetArray2 : TBitPackSetArray2 = (([EnVal3, EnVal1], [], [EnVal3]), ([],[EnVal1,EnVal2],[EnVal1]));

begin
end.
TagsNo tags attached.
Fixed in Revision43187
FPCOldBugId
FPCTarget-
Attached Files

Activities

Serge Anvarov

2019-10-09 16:46

reporter   ~0118448

According to the documentation https://www.freepascal.org/docs-html/current/ref/refse14.html#QQ2-37-54 specifying bitpacked for an array which elements are not ordinal types is pointless.

Martin Friebe

2019-10-09 17:35

manager   ~0118449

Just tested the error also happens for a none packed array.
Besides (and off topic to the report) this code is not from a production set. It is from a generated source to test fpdebug.

Bart Broersma

2019-10-09 17:37

reporter   ~0118450

Any occurrence InternalError is a bug found in the compiler, wether or not the code example makes sense or not.

Thaddy de Koning

2019-10-09 20:55

reporter   ~0118454

Also happens with the latest trunk

Issue History

Date Modified Username Field Change
2019-10-09 15:23 Martin Friebe New Issue
2019-10-09 16:46 Serge Anvarov Note Added: 0118448
2019-10-09 17:35 Martin Friebe Note Added: 0118449
2019-10-09 17:37 Bart Broersma Note Added: 0118450
2019-10-09 20:55 Thaddy de Koning Note Added: 0118454
2019-10-13 13:11 Jonas Maebe Assigned To => Jonas Maebe
2019-10-13 13:11 Jonas Maebe Status new => resolved
2019-10-13 13:11 Jonas Maebe Resolution open => fixed
2019-10-13 13:11 Jonas Maebe Fixed in Version => 3.3.1
2019-10-13 13:11 Jonas Maebe Fixed in Revision => 43187
2019-10-13 13:11 Jonas Maebe FPCTarget => -