anchor.diff:    if p <> nil then
       result := p^.gr_name;
   end;
  -
  +{$ELSE}
  +// Still need to find a alternative as we can't use the libc unit.
  +function GetGroupName(gid: integer): string;
  +begin
  +  result := IntToStr(gid);
  +end;
  +{$ENDIF}
  +
  +{$IFDEF LINUX}
   function GetUserName(uid: integer): string;
   var
     p: PPasswd;
  
positive.code: end;
  
  {$IFDEF UNIX}
  function GetGroupName(gid: integer): string;
  var
    p: PGroup;
  
negative.code:   ,Windows   // Graeme: temporary, just to see how the grid looks under Windows.
    {$ENDIF}
    {$IFDEF UNIX}
      {$IFDEF LINUX},libc{$ENDIF} // Graeme: temporary. libc is not available for FreeBSD.
    ,baseunix
    {$ENDIF}
    ;
  