From ae476a9b6a16b68bad6ce69e506cbc9ced5ef0f9 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Sun, 28 Jun 2009 07:44:02 +0000
Subject: [PATCH]   * part of r13334, forgot to commit

git-svn-id: trunk@13343 -
---
 tests/webtbs/tw3971.pp | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/tests/webtbs/tw3971.pp b/tests/webtbs/tw3971.pp
index d450902d4c..0c7ecddf9c 100644
--- a/tests/webtbs/tw3971.pp
+++ b/tests/webtbs/tw3971.pp
@@ -18,15 +18,15 @@ type
         end;
         
         TDemo = object
-                constructor init;
-                destructor Destroy;
-                procedure doSomething;
-                procedure doSomething2;
-                
                 member1 : byte;
                 member5 : longint;
                 member6 : int64;
                 y : array[0..2] of TDemo1;
+
+                constructor init;
+                destructor Destroy;
+                procedure doSomething;
+                procedure doSomething2;
         end;
 var
         x : array[0..2] of TDemo;