Ignore:
Timestamp:
Mar 28, 2008, 5:43:34 PM (16 years ago)
Author:
イグトランス (egtra)
Message:

インクルードガードとその他不要な前処理定義などの削除

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Include/Classes/System/Version.ab

    r257 r497  
    1 ' System/Version.ab
    2 
    3 #ifndef __SYSTEM_VERSION_AB__
    4 #define __SYSTEM_VERSION_AB__
    5 
    6 #require <api_winsock2.sbp>
     1' Classes/System/Version.ab
    72
    83Namespace System
    … …  
    121116    Function ToString(fieldCount As Long) As String
    122117        If fieldCount < 0 Or fieldCount > 4 Then
    123             ' Throw ArgumentException
    124             Debug
     118            Throw New ArgumentOutOfRangeException("fieldCount")
    125119        End If
    126120        ToString = ""
    … …  
    132126
    133127        If build < 0 Then
    134             ' Throw ArgumentException
    135             Debug
     128            Throw New ArgumentException
    136129        End If
    137130        ToString = ToString + "." + Str$(build)
    … …  
    139132
    140133        If revision < 0 Then
    141             ' Throw ArgumentException
    142             Debug
     134            Throw New ArgumentException
    143135        End If
    144136        ToString = ToString + "." + Str$(revision)
    … …  
    152144
    153145End Namespace 'System
    154 
    155 #endif '__SYSTEM_VERSION_AB__
Note: See TracChangeset for help on using the changeset viewer.