From 4525c8bedaa56662fac13c2918f9d04a5ae6a3ae Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Fri, 13 Aug 2010 11:34:37 +0000
Subject: [PATCH] DebuggeR: Fix a range check, when clearing a condition

git-svn-id: trunk@27089 -
---
 debugger/gdbmidebugger.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/debugger/gdbmidebugger.pp b/debugger/gdbmidebugger.pp
index 2f65b7c197..a34e4b5127 100644
--- a/debugger/gdbmidebugger.pp
+++ b/debugger/gdbmidebugger.pp
@@ -3957,7 +3957,7 @@ begin
   ValMode := #0;
   Value := 0;
 
-  P := @AExpression[1];
+  P := PChar(AExpression);
   for n := 1 to Length(AExpression) do
   begin
     if InString