Changeset 634 for trunk/ab5.0/ablib/src/Classes/System/Object.ab

Timestamp:

Sep 26, 2008, 8:47:44 PM (16 years ago)

Author:

イグトランス (egtra)

Message:

#202 Compare/CompareOrdinal完了

File:

• trunk/ab5.0/ablib/src/Classes/System/Object.ab (modified) (1 diff)

trunk/ab5.0/ablib/src/Classes/System/Object.ab

@@ -13 +13 @@
         ' 2つのオブジェクトが等しいかどうかを判断する
         Virtual Function Equals( object As Object ) As Boolean
-            If ObjPtr(This) = ObjPtr(object) Then
-    '       If This.GetHashCode() = object.GetHashCode() Then
-                Return True
-            Else
-                Return False
-            End If
+            Return ObjPtr(This) = ObjPtr(object)
         End Function
         
         Static Function Equals( objectA As Object, objectB As Object ) As Boolean
-            If ObjPtr(objectA) = NULL /*objectA = Nothing*/ Then
-                Return ObjPtr(objectB) = NULL 'objectB = Nothing
+            If ActiveBasic.IsNothing(objectA) Then
+                Return ActiveBasic.IsNothing(objectB)
             Else
                 Return objectA.Equals(objectB)