summaryrefslogtreecommitdiff
path: root/ide
diff options
context:
space:
mode:
authordaniel <daniel@3ad0048d-3df7-0310-abae-a5850022a9f2>2007-03-19 21:33:33 +0000
committerdaniel <daniel@3ad0048d-3df7-0310-abae-a5850022a9f2>2007-03-19 21:33:33 +0000
commitf43d3204f0df100f6ae060167a8e8ef8d92ebbc8 (patch)
tree52da629d4f53743123995659ebf14ee3b1dceca3 /ide
parent144a21c5ffaab37f2b3bb2dbf19acc184ac63d0d (diff)
downloadfpc-f43d3204f0df100f6ae060167a8e8ef8d92ebbc8.tar.gz
+ Prevent error message after program terminates.
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@6936 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'ide')
-rw-r--r--ide/fpmrun.inc3
1 files changed, 2 insertions, 1 deletions
diff --git a/ide/fpmrun.inc b/ide/fpmrun.inc
index 0a79e69bf9..fd5e767ce0 100644
--- a/ide/fpmrun.inc
+++ b/ide/fpmrun.inc
@@ -99,7 +99,8 @@ begin
else
Debugger^.TraceNext;
end;}
- Debugger^.AnnotateError;
+ if Debugger^.IsRunning then
+ Debugger^.AnnotateError;
{$else NODEBUG}
NoDebugger;
{$endif NODEBUG}