Browse Source

* fix compilation failure for fields after methods

git-svn-id: branches/fixes_2_4@14032 -
pierre 15 years ago
parent
commit
9469b0a6a8
1 changed files with 2 additions and 2 deletions
  1. 2 2
      ide/fpdebug.pas

+ 2 - 2
ide/fpdebug.pas

@@ -205,6 +205,8 @@ type
 
     PWatch = ^TWatch;
     TWatch =  Object(TObject)
+      expr : pstring;
+      last_value,current_value : pchar;
       constructor Init(s : string);
       constructor Load(var S: TStream);
       procedure   Store(var S: TStream);
@@ -212,8 +214,6 @@ type
       procedure Get_new_value;
       procedure Force_new_value;
       destructor done;virtual;
-      expr : pstring;
-      last_value,current_value : pchar;
     private
       GDBRunCount : longint;
     end;