From 89ee52cff299b951818ad30005c6fe26862efeea Mon Sep 17 00:00:00 2001
From: marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Sun, 25 May 2008 11:55:18 +0000
Subject:  * small freebsd <-> OS X fix

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@11084 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 packages/users/examples/testpass2.pp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'packages/users')

diff --git a/packages/users/examples/testpass2.pp b/packages/users/examples/testpass2.pp
index 7f843f5feb..2a2789c381 100644
--- a/packages/users/examples/testpass2.pp
+++ b/packages/users/examples/testpass2.pp
@@ -42,7 +42,9 @@ Begin
       printpchar('pw_shell',p^.pw_shell);
      {$ifdef BSD}
       printpchar('pw_expire',inttostr(p^.pw_expire));
-      printpchar('pw_fields',inttostr(p^.pw_fields));
+      {$ifdef FreeBSD}
+        printpchar('pw_fields',inttostr(p^.pw_fields)); 
+      {$endif}
      {$endif}
     End;
   nrgids := 100;
-- 
cgit v1.2.1