View Issue Details

IDProjectCategoryView StatusLast Update
0038653FPCRTLpublic2021-03-23 21:57
ReporterArnaud Bouchez Assigned ToFlorian  
PrioritynormalSeverityminorReproducibilityrandom
Status resolvedResolutionfixed 
Product Version3.2.0 
Fixed in Version3.3.1 
Summary0038653: Random GPF in TInvokeableVariantType.DispInvoke
DescriptionIn variants.pp:

procedure TInvokeableVariantType.DispInvoke(Dest: PVarData; var Source: TVarData;
  CallDesc: PCallDesc; Params: Pointer);
...
        // may be function?
        try
          variant(dummy_data) := Unassigned;

This last line is incorrect. dummy_data is on stack so may contain garbage.

Correct code would be the cleaner (and faster):
    dummy_data.VType := varEmpty;
TagsNo tags attached.
Fixed in Revision49037
FPCOldBugId
FPCTarget-
Attached Files

Activities

Florian

2021-03-23 21:57

administrator   ~0129844

Thanks, applied.

Issue History

Date Modified Username Field Change
2021-03-22 12:03 Arnaud Bouchez New Issue
2021-03-23 21:57 Florian Assigned To => Florian
2021-03-23 21:57 Florian Status new => resolved
2021-03-23 21:57 Florian Resolution open => fixed
2021-03-23 21:57 Florian Fixed in Version => 3.3.1
2021-03-23 21:57 Florian Fixed in Revision => 49037
2021-03-23 21:57 Florian FPCTarget => -
2021-03-23 21:57 Florian Note Added: 0129844