Bläddra i källkod

* fix compilation failure for fields after methods

git-svn-id: branches/fixes_2_4@14032 -
pierre 16 år sedan
förälder
incheckning
9469b0a6a8
1 ändrade filer med 2 tillägg och 2 borttagningar
  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;