diff options
Diffstat (limited to 'lowlevelunit.pas')
-rw-r--r-- | lowlevelunit.pas | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lowlevelunit.pas b/lowlevelunit.pas index 17ac70b..7ff4268 100644 --- a/lowlevelunit.pas +++ b/lowlevelunit.pas @@ -505,10 +505,10 @@ begin raise e; end; -procedure dumpExceptionCallStack(E: Exception); +procedure dumpExceptionCallStack(e: exception); var - I: Integer; - Frames: PPointer; + I: integer; + Frames: pPointer; Report: string; begin Report := 'Program exception! ' + LineEnding + |