Changeset 478 for trunk/Include/Classes/System

Timestamp:

Mar 13, 2008, 9:06:43 PM (17 years ago)

Author:

イグトランス (egtra)

Message:

現在向けに修正（参照型のポインタの排除など）

File:

• trunk/Include/Classes/System/String.ab (modified) (1 diff)

trunk/Include/Classes/System/String.ab

@@ -256 +256 @@
 
         Override Function Equals(s As Object) As Boolean
-            If Object.Equals( This.GetType(), s.GetType() ) Then
-                Return This.Equals(s As String)
+            If Not ActiveBasic.IsNothing(s) Then
+                If Object.Equals(This.GetType(), s.GetType()) Then
+                    Return This.Equals(s As String)
+                End If
             End If
             Return False