From 4e19e473a4c2b66f8ffd6ab13636a3d530214fdb Mon Sep 17 00:00:00 2001
From: daniel <daniel@freepascal.org>
Date: Mon, 15 Jan 2007 10:32:53 +0000
Subject: [PATCH]   * Add target specifier.

git-svn-id: trunk@5988 -
---
 tests/tbs/tb0524.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/tbs/tb0524.pp b/tests/tbs/tb0524.pp
index 11db3c9ea8..e65ddf55dd 100644
--- a/tests/tbs/tb0524.pp
+++ b/tests/tbs/tb0524.pp
@@ -1,3 +1,4 @@
+{%TARGET=linux,freebsd,darwin}
 program tb0524;
 
 uses sockets,baseunix;
@@ -11,7 +12,6 @@ var s,t:string;
     saddr:Tinetsockaddr;
     len:longInt;
     sin,sout:text;
-    raw_port:word;
     i:byte;
 
 begin