Fixes for compilation errors with type cast.

diff --git a/src/Storage/Storage_IStream.cxx b/src/Storage/Storage_IStream.cxx
index c91f1df2f0663956d4d1a5f54cb3c2a01547f38b..d3db5caa22bab72a997cd1d8fb3fee38db9c54b8 100644 (file)
--- a/src/Storage/Storage_IStream.cxx
+++ b/src/Storage/Storage_IStream.cxx
@@ -177,7 +177,9 @@ Standard_Size Storage_IStream::Write (const Standard_Address /*theBuffer*/, cons
 //=======================================================================
 TCollection_AsciiString Storage_IStream::Signature() const
 {
-  return TCollection_AsciiString( (Standard_Integer)myStream );
+  Standard_Character buf[256];
+  sprintf( buf, "%lx", (unsigned long)myStream );
+  return TCollection_AsciiString( buf );
 }
 
 //=======================================================================

diff --git a/src/Storage/Storage_OStream.cxx b/src/Storage/Storage_OStream.cxx
index 930760fb9d08789c8bcf133a352da3b54583aba8..193ef8f754e6d0097db2e77a0032f511f58f49d2 100644 (file)
--- a/src/Storage/Storage_OStream.cxx
+++ b/src/Storage/Storage_OStream.cxx
@@ -183,7 +183,9 @@ Standard_Size Storage_OStream::Write (const Standard_Address theBuffer, const St
 //=======================================================================
 TCollection_AsciiString Storage_OStream::Signature() const
 {
-  return TCollection_AsciiString( (Standard_Integer)myStream );
+  Standard_Character buf[256];
+  sprintf( buf, "%lx", (unsigned long)myStream );
+  return TCollection_AsciiString( buf );
 }
 
 //=======================================================================