diff --git a/src/TCollection/TCollection_ExtendedString.cdl b/src/TCollection/TCollection_ExtendedString.cdl
index 9158a88704..104b770d84 100644
--- a/src/TCollection/TCollection_ExtendedString.cdl
+++ b/src/TCollection/TCollection_ExtendedString.cdl
@@ -148,6 +148,12 @@ is
    raises OutOfRange from Standard
    is static;
 
+   IsEmpty(me) returns Boolean from Standard
+   is static;
+   ---Level: Public
+   ---C++: inline
+   ---Purpose: Returns True if this string contains no characters.
+
    IsEqual (me ; other : ExtString ) 
    returns Boolean from Standard
    is static;
diff --git a/src/TCollection/TCollection_ExtendedString.lxx b/src/TCollection/TCollection_ExtendedString.lxx
index 82ef217245..3688a66c1f 100644
--- a/src/TCollection/TCollection_ExtendedString.lxx
+++ b/src/TCollection/TCollection_ExtendedString.lxx
@@ -39,3 +39,11 @@ inline Standard_Boolean
 {
   return theString1.IsEqual(theString2);
 }
+
+//------------------------------------------------------------------------
+//  IsEmpty
+//------------------------------------------------------------------------
+inline Standard_Boolean TCollection_ExtendedString::IsEmpty() const
+{
+  return mylength == 0;
+}