hedgewars/uFloat.pas
changeset 7043 7c080e5ac8d0
parent 7042 de20086a6bcc
child 7515 8957b05d368a
--- a/hedgewars/uFloat.pas	Thu May 10 23:51:05 2012 +0400
+++ b/hedgewars/uFloat.pas	Fri May 11 00:28:06 2012 +0400
@@ -63,7 +63,9 @@
 // The implemented operators
 
 operator = (const z1, z2: hwFloat) z : boolean; inline;
+{$IFDEF PAS2C}
 operator <> (const z1, z2: hwFloat) z : boolean; inline;
+{$ENDIF}
 operator + (const z1, z2: hwFloat) z : hwFloat; inline;
 operator - (const z1, z2: hwFloat) z : hwFloat; inline;
 operator - (const z1: hwFloat) z : hwFloat; inline;
@@ -213,12 +215,12 @@
     z:= (z1.isNegative = z2.isNegative) and (z1.QWordValue = z2.QWordValue);
 end;
 
-
+{$IFDEF PAS2C}
 operator <> (const z1, z2: hwFloat) z : boolean; inline;
 begin
     z:= (z1.isNegative <> z2.isNegative) or (z1.QWordValue <> z2.QWordValue);
 end;
-
+{$ENDIF}
 
 operator + (const z1, z2: hwFloat) z : hwFloat;
 begin