debugger: don't double the single quote in strings shown to the user

git-svn-id: trunk@11119 -
This commit is contained in:
vincents 2007-05-09 22:20:26 +00:00
parent 75734cdf1d
commit 1f8d81dc9d

View File

@ -881,7 +881,7 @@ function TGDBMIDebugger.GDBEvaluate(const AExpression: String;
Result := Result + '''';
end;
Result := Result + AString[n];
if AString[n] = '''' then Result := Result + '''';
//if AString[n] = '''' then Result := Result + '''';
end;
else
if InString