[Jcl-checkins] jcl/source/common JclHashSets.pas,1.7,1.8

[Robert R. <rro...@us...>]

Update of /cvsroot/jcl/jcl/source/common
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27685/source/common

Modified Files:
	JclHashSets.pas 
Log Message:
- changed to compile with FPC

Index: JclHashSets.pas
===================================================================
RCS file: /cvsroot/jcl/jcl/source/common/JclHashSets.pas,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** JclHashSets.pas	3 Mar 2005 08:02:57 -0000	1.7
--- JclHashSets.pas	17 Apr 2005 23:00:10 -0000	1.8
***************
*** 129,135 ****
  implementation
  
! const
    // (rom) this needs an explanation
!   RefUnique: TObject = @RefUnique;
  
  var
--- 129,135 ----
  implementation
  
! var
    // (rom) this needs an explanation
!   RefUnique: TObject {$IFNDEF FPC} = @RefUnique {$ENDIF};
  
  var
***************
*** 583,589 ****
--- 583,597 ----
  end;
  
+ {$IFDEF FPC}
+ initialization
+   RefUnique := @RefUnique;
+ {$ENDIF FPC}
+ 
  // History:
  
  // $Log$
+ // Revision 1.8  2005/04/17 23:00:10  rrossmair
+ // - changed to compile with FPC
+ //
  // Revision 1.7  2005/03/03 08:02:57  marquardt
  // various style cleanings, bugfixes and improvements