diff --git a/wst/trunk/binary_streamer.pas b/wst/trunk/binary_streamer.pas
index e4b01936a..0c4fcc594 100644
--- a/wst/trunk/binary_streamer.pas
+++ b/wst/trunk/binary_streamer.pas
@@ -542,6 +542,7 @@ begin
   Result := ( FStream.Position >= FStream.Size );
 end;
 
+{$HINTS OFF}
 function TDataStoreReader.ReadInt8U(): TInt8U;
 begin
   FStream.Read(Result,SizeOf(Result));
@@ -587,6 +588,7 @@ begin
   FStream.Read(Result,SizeOf(Result));
   Result := Reverse_64(Result);
 end;
+{$HINTS ON}
 
 function TDataStoreReader.ReadBool(): TBoolData;
 begin
@@ -654,6 +656,7 @@ begin
 end;
 {$ENDIF WST_UNICODESTRING}
 
+{$HINTS OFF}
 function TDataStoreReader.ReadSingle(): TFloat_Single_4;
 begin
   FStream.Read(Result,SizeOf(Result));
@@ -677,6 +680,7 @@ begin
   FStream.Read(Result,SizeOf(Result));
   Result := Reverse_Currency(Result);
 end;
+{$HINTS ON}
 
 constructor TDataStoreReader.Create(AStream: TStream);
 begin
diff --git a/wst/trunk/date_utils.pas b/wst/trunk/date_utils.pas
index 6197e1797..a986a65b6 100644
--- a/wst/trunk/date_utils.pas
+++ b/wst/trunk/date_utils.pas
@@ -65,6 +65,7 @@ begin
     Result := IncMinute(Result,-ADate.MinuteOffset);
 end;
 
+{$HINTS OFF}
 function DateEquals(const AA,AB: TDateTimeRec) : Boolean;
 var
   e, a : TDateTime;
@@ -78,6 +79,7 @@ begin
   Result := ( e_y = a_y ) and ( e_m = a_m ) and ( e_d = a_d ) and
             (e_h = a_h ) and ( e_mn = a_mn ) and ( e_ss = a_ss ) and ( e_ms = a_ms );
 end;
+{$HINTS ON}
 
 function xsd_TryStrToDate(const AStr : string; out ADate : TDateTimeRec) : Boolean;
 const