Delphi 12 CE stürzt ab

[Redeemer]

Zitat von jaenicke:

Starte Delphi einfach zweimal und verbinde den Debugger mit der zweiten Instanz (Mit Prozess verbinden). Dann öffne dort das Projekt. Dann solltest du eine Exception und einen Stacktrace sehen.

Code:

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt bds.exe ist eine Exception der Klasse $C0000090 mit der Meldung 'floating point invalid operation at 0x6c754779' aufgetreten.
---------------------------
Anhalten   Fortsetzen   Kopieren   Hilfe   
---------------------------

Call von coreide290.bpl nach clr.dll, das dann zigmal und am Ende noch achtmal clrjit.dll (clrjit.dll liegt also oben auf dem Stack). Der Fehler tritt immer wieder auf. Der Stack bleibt offenbar gleich, nur ab dem zweiten Mal ohne clrjit.dll. Der Stack sieht auch noch so aus, wenn es irgendwann einen "stack overflow at $6e2394ba" gibt.

Zitat von himitsu:

Zitat:

... C:\Windows\Microsoft.NET\Framework\v4.0.30319\clr.dll ...

Im Setup (bzw. IDE > Tools > Features verwalten), kannst du einige Zusatzoptionen an-/abschalten (Hilfe, Demos, SDKs uvm.) ... mach ganz unten, in der Liste, das scheiß Refactoring Modeling weg.

Hat nicht geholfen.

[jaenicke]

Mehr steht in dem Stacktrace nicht drin? Normalerweise stehen dort auch Namen der Methoden.

[Redeemer]

Zitat von jaenicke:

Mehr steht in dem Stacktrace nicht drin? Normalerweise stehen dort auch Namen der Methoden.

Da stehen keine Methodennamen.

[Sinspin]

Kannst ja mal Madexcept probieren. Ich habe damit schon so manche Sauerei aufgedeckt.

[a-s-z-work]

Hallo zusammen,

ich habe Dumps mit procdump erstellt und durch DebugDiag analysieren lassen. Hier ist der Callstack in der fünften Runde ...

Code:

procdump -accepteula -e 1 -n 5 -f C0000090.FLOAT_INVALID_OPERATION -g -mm <PID> <OUTPUT PATH>

Code:

[[PrestubMethodFrame] (Borland.Delphi.Scanner.GetReal)] Borland.Delphi.Scanner.GetReal(Int32)
Borland.Delphi.Scanner.GetDecimal(Int32)+d9
Borland.Delphi.Scanner.Next()+6aa
Borland.Delphi.Parser.SingleExpression_(Boolean ByRef)+346
Borland.Delphi.Parser.Expression_(Boolean ByRef)+63
Borland.Delphi.Parser.ConstExpr_(Boolean ByRef)+51
Borland.Delphi.Parser.ConstExpr()+31
Borland.Delphi.Scanner.EvalCondExpr(Int32)+3c
Borland.Delphi.Scanner.CondDirective(System.String, Int32)+1ed
Borland.Delphi.Scanner.Directive(Boolean, Int32, System.String ByRef)+662
Borland.Delphi.Scanner.SkipPascalComment(Int32, Boolean)+85
Borland.Delphi.Scanner.Next()+406
Borland.Delphi.Parser.expect(Char, Int32, Int32)+4b
Borland.Delphi.Parser.ClassMethod_(Boolean ByRef)+192c
Borland.Delphi.Parser.ClassArea_(Boolean ByRef)+170
Borland.Delphi.Parser.ClassTypeBody_(Boolean ByRef)+88e
Borland.Delphi.Parser.ClassOptions_(Boolean ByRef)+17e4
Borland.Delphi.Parser.ClassType_(Boolean ByRef)+465
Borland.Delphi.Parser.TypeDeclType_(Boolean ByRef)+1b52
Borland.Delphi.Parser.TypeDecl_(Boolean ByRef)+1ed
Borland.Delphi.Parser.TypeSection_(Boolean ByRef)+ff
Borland.Delphi.Parser.InterfaceDecl_(Boolean ByRef)+11a
Borland.Delphi.Parser.InterfaceDeclSections_(Boolean ByRef)+116
Borland.Delphi.Parser.InterfaceSection_(Boolean ByRef)+c1
Borland.Delphi.Parser.UnitInterface_(Boolean ByRef)+b7f
Borland.Delphi.Parser.InterfaceGoal(Borland.Delphi.IProjectInformation)+51
Borland.Studio.Delphi.DelphiProjectSymbolManager.RealInternalParserGoal(System.String, Boolean)+2b4
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalParserGoal(System.String, Boolean)+30
Borland.Studio.Delphi.DelphiProjectSymbolManager.UseSourceUnit(System.Collections.ArrayList, Borland.Delphi.CompiledNode, System.String, Boolean)+b9
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalFindProjectUnit(Borland.Delphi.CompiledNode, System.String, Boolean)+36
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalFindUnit(Borland.Delphi.CompiledNode, System.String, Boolean)+1c
Borland.Studio.Delphi.DelphiProjectSymbolManager.Borland.Delphi.IProjectInformation.UseUnit(Borland.Delphi.CompiledNode, System.String)+2a
Borland.Delphi.Parser.UseUnit(Borland.Delphi.Node, Int32, Int32)+51
Borland.Delphi.Parser.UsesList_(Boolean ByRef)+101
Borland.Delphi.Parser.UsesClause_(Boolean ByRef)+69
Borland.Delphi.Parser.InterfaceSection_(Boolean ByRef)+8b
Borland.Delphi.Parser.UnitInterface_(Boolean ByRef)+b7f
Borland.Delphi.Parser.InterfaceGoal(Borland.Delphi.IProjectInformation)+51
Borland.Studio.Delphi.DelphiProjectSymbolManager.RealInternalParserGoal(System.String, Boolean)+2b4
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalParserGoal(System.String, Boolean)+30
Borland.Studio.Delphi.DelphiProjectSymbolManager.UseSourceUnit(System.Collections.ArrayList, Borland.Delphi.CompiledNode, System.String, Boolean)+b9
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalFindProjectUnit(Borland.Delphi.CompiledNode, System.String, Boolean)+36
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalFindUnit(Borland.Delphi.CompiledNode, System.String, Boolean)+1c
Borland.Studio.Delphi.DelphiProjectSymbolManager.Borland.Delphi.IProjectInformation.UseUnit(Borland.Delphi.CompiledNode, System.String)+2a
Borland.Delphi.Parser.UseUnit(Borland.Delphi.Node, Int32, Int32)+51
Borland.Delphi.Parser.UsesList_(Boolean ByRef)+101
Borland.Delphi.Parser.UsesClause_(Boolean ByRef)+69
Borland.Delphi.Parser.InterfaceSection_(Boolean ByRef)+8b
Borland.Delphi.Parser.UnitInterface_(Boolean ByRef)+b7f
Borland.Delphi.Parser.InterfaceGoal(Borland.Delphi.IProjectInformation)+51
Borland.Studio.Delphi.DelphiProjectSymbolManager.RealInternalParserGoal(System.String, Boolean)+2b4
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalParserGoal(System.String, Boolean)+30
Borland.Studio.Delphi.DelphiProjectSymbolManager.UseSourceUnit(System.Collections.ArrayList, Borland.Delphi.CompiledNode, System.String, Boolean)+b9
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalFindProjectUnit(Borland.Delphi.CompiledNode, System.String, Boolean)+36
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalFindUnit(Borland.Delphi.CompiledNode, System.String, Boolean)+1c
Borland.Studio.Delphi.DelphiProjectSymbolManager.Borland.Delphi.IProjectInformation.UseUnit(Borland.Delphi.CompiledNode, System.String)+2a
Borland.Delphi.Parser.UseUnit(Borland.Delphi.Node, Int32, Int32)+51
Borland.Delphi.Parser.UsesList_(Boolean ByRef)+101
Borland.Delphi.Parser.UsesClause_(Boolean ByRef)+69
Borland.Delphi.Parser.InterfaceSection_(Boolean ByRef)+8b
Borland.Delphi.Parser.UnitInterface_(Boolean ByRef)+b7f
Borland.Delphi.Parser.InterfaceGoal(Borland.Delphi.IProjectInformation)+51
Borland.Studio.Delphi.DelphiProjectSymbolManager.RealInternalParserGoal(System.String, Boolean)+2b4
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalParserGoal(System.String, Boolean)+30
Borland.Studio.Delphi.DelphiProjectSymbolManager.UseSourceUnit(System.Collections.ArrayList, Borland.Delphi.CompiledNode, System.String, Boolean)+b9
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalFindProjectUnit(Borland.Delphi.CompiledNode, System.String, Boolean)+36
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalFindUnit(Borland.Delphi.CompiledNode, System.String, Boolean)+1c
Borland.Studio.Delphi.DelphiProjectSymbolManager.Borland.Delphi.IProjectInformation.UseUnit(Borland.Delphi.CompiledNode, System.String)+2a
Borland.Delphi.Parser.UseUnit(Borland.Delphi.Node, Int32, Int32)+51
Borland.Delphi.Parser.UsesList_(Boolean ByRef)+94
Borland.Delphi.Parser.UsesClause_(Boolean ByRef)+69
Borland.Delphi.Parser.InterfaceSection_(Boolean ByRef)+8b
Borland.Delphi.Parser.UnitInterface_(Boolean ByRef)+b7f
Borland.Delphi.Parser.Unit_(Boolean ByRef)+52
Borland.Delphi.Parser.goal_(Boolean ByRef)+2dc
Borland.Delphi.Parser.Goal(Borland.Delphi.IProjectInformation)+7d
Borland.Studio.Delphi.DelphiProjectSymbolManager.RealInternalParserGoal(System.String, Boolean)+2a4
Borland.Studio.Delphi.DelphiProjectSymbolManager.InternalParserGoal(System.String, Boolean)+30
Borland.Studio.Delphi.DelphiProjectSymbolManager.ParserGoal(System.String, Boolean)+ce
Borland.Studio.Delphi.DelphiFileSymbolManager.FindNodeAndSymbolAtOffset(Int32, Borland.Delphi.Symbol ByRef)+3d
Borland.Studio.Delphi.DelphiFileSymbolManager.GetSymbolAtCursor()+3f
Borland.Studio.Delphi.BaseRefactoringItem.Update()+11
DomainBoundILStubClass.IL_STUB_COMtoCLR()+12
[[ComMethodFrame]]

[jaenicke]

Offenbar ist da noch das Refactoring Package (refactoride*.bpl unter known packages in der Registry müsste das sein) aktiv. Wenn du das deaktivierst, sollte der Fehler im Stacktrace nicht mehr auftreten.

[a-s-z-work]

Hallo Sebastian,

ja natürlich ist es aktiv. Ich möchte ja nun mal heraus finden was da falsch läuft

Das mit dem Deaktivieren ist mir bekannt, aber dann fehlt ja z.B. auch Verwendung/Deklaration suchen.

Ich habe den Dump inzwischen mal mit VS2022 analysieren lassen und da kommt ein Gleitkommafehler in clrjit.dll raus.
Anscheinend passiert da irgendetwas mit der FPU-Maske, und die aktuelle .NET-Runtime ist anfälliger dafür.

Zum Problem mit der FPU-Maske ist auch hier angesprochen worden: https://stackoverflow.com/a/78613691

[himitsu]

Im ganz neuen Delphi wurde das nun endgültig entfernt.
Ansonsten kann man es im Setup, seit paar Jahren das Modeling auch direkt deaktivieren.