Ignore:
Timestamp:
Aug 27, 2007, 12:10:17 AM (17 years ago)
Author:
イグトランス (egtra)
Message:

Equalsの一部を実装

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Include/Classes/System/String.ab

    r285 r308  
    244244    '       End If
    245245            Return CompareTo(y As String)
     246        End Function
     247
     248        Function Equals(s As String) As Boolean
     249            Return This = s
     250        End Function
     251
     252        Override Function Equals(s As Object) As Boolean
     253            If This.GetType = s.GetType Then
     254                Return This.Equals(s As String)
     255            End If
     256            Return False
    246257        End Function
    247258
Note: See TracChangeset for help on using the changeset viewer.