View Issue Details

IDProjectCategoryView StatusLast Update
0034821FPCCompilerpublic2019-01-06 16:23
ReporterBenito van der ZanderAssigned ToJonas Maebe 
PrioritynormalSeverityminorReproducibilityhave not tried
Status resolvedResolutionfixed 
Platformamd64OSlinuxOS Versionopensuse
Product Version3.3.1Product Buildr40721 
Target VersionFixed in Version3.3.1 
Summary0034821: Internal error 2011010304
DescriptionI forgot to write "class" and defined this

type TWTF = object
   procedure huh;
end;
procedure TWTF.huh;
begin
end;

then in an inline function I wrote

procedure theinlinefunction; inline;
begin
   TWTF.huh
end;


and it compiled fine. (although it does not compile in a test project)



When the inline function is used, it also compiles at first, but on the second compilation it gives Internal error 2011010304
TagsNo tags attached.
Fixed in Revision40785
FPCOldBugId
FPCTarget
Attached Files

Activities

Jonas Maebe

2019-01-06 11:38

manager   ~0113200

Without a test case that reproduces the issue, this cannot be fixed.

Benito van der Zander

2019-01-06 13:01

reporter   ~0113202

unit inlinetest;

{$mode objfpc}{$H+}


interface

uses
  Classes, SysUtils;

type TStrBuilder = class
  procedure append(); inline;
end;

type TTest = object
  procedure xyz;
end;

implementation

procedure TStrBuilder.append();
begin
  TTest.xyz;
end;

procedure TTest.xyz;
begin

end;
end.


unit inlinetest2;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, inlinetest;


procedure foo;


implementation


procedure foo;
var s: TStrBuilder;
begin
  s.append();
end;

end.



First compile both, then inlinetest2 alone

Benito van der Zander

2019-01-06 13:10

reporter   ~0113203

If TStrBuilder is an object, it gives internal error 200109092

Jonas Maebe

2019-01-06 16:23

manager   ~0113208

The compiler now prints a proper error message.

Issue History

Date Modified Username Field Change
2019-01-06 01:18 Benito van der Zander New Issue
2019-01-06 11:38 Jonas Maebe Note Added: 0113200
2019-01-06 11:38 Jonas Maebe Status new => resolved
2019-01-06 11:38 Jonas Maebe Resolution open => not fixable
2019-01-06 11:38 Jonas Maebe Assigned To => Jonas Maebe
2019-01-06 13:01 Benito van der Zander Note Added: 0113202
2019-01-06 13:01 Benito van der Zander Status resolved => feedback
2019-01-06 13:01 Benito van der Zander Resolution not fixable => reopened
2019-01-06 13:10 Benito van der Zander Note Added: 0113203
2019-01-06 13:10 Benito van der Zander Status feedback => assigned
2019-01-06 16:23 Jonas Maebe Fixed in Revision => 40785
2019-01-06 16:23 Jonas Maebe Note Added: 0113208
2019-01-06 16:23 Jonas Maebe Status assigned => resolved
2019-01-06 16:23 Jonas Maebe Fixed in Version => 3.3.1
2019-01-06 16:23 Jonas Maebe Resolution reopened => fixed