View Issue Details

IDProjectCategoryView StatusLast Update
0038716FPCCompilerpublic2021-04-07 18:16
ReporterOndrej Pokorny Assigned To 
PrioritynormalSeverityminorReproducibilityalways
Status newResolutionopen 
Platformi386-win32OSWindows 
Product Version3.3.1 
Summary0038716: SIGSEGV when passing a constant to a Variant parameter
DescriptionSIGSEGV when passing a constant to a Variant parameter.

program SimpleRoundToPrg;

{$mode objfpc}{$H+}

uses
  Unit1;

begin
  Test_OtherUnit('a'); // SIGSEGV here
  Readln;
end.

unit Unit1;

{$mode Delphi}

interface

procedure Test_OtherUnit(const aValue: Variant);

implementation

procedure Test_OtherUnit(const aValue: Variant);
begin
end;

end.
Steps To ReproduceFull project is included.
TagsNo tags attached.
Fixed in Revision
FPCOldBugId
FPCTarget
Attached Files

Activities

Ondrej Pokorny

2021-04-07 18:16

developer  

VariantParam.zip (481 bytes)

Issue History

Date Modified Username Field Change
2021-04-07 18:16 Ondrej Pokorny New Issue
2021-04-07 18:16 Ondrej Pokorny File Added: VariantParam.zip