Changeset 39 for Include/Classes/System

Timestamp:

Dec 27, 2006, 9:13:33 PM (18 years ago)

Author:

OverTaker

Message:

ケアレスミス修正

File:

• Include/Classes/System/DateTime.ab (modified) (2 diffs)

Include/Classes/System/DateTime.ab

@@ -8 +8 @@
     m_Date As Int64
 Public
-    Static MaxValue = 3162240000000000000000 As Int64 'Const
-    Static MinValue = 316224000000000000 As Int64 'Const
+    Static MaxValue = 3162240000000000000 As Int64 'Const
+    Static MinValue = 316224000000000 As Int64 'Const
 
     Sub DateTime(ticks As Int64)
@@ -270 +270 @@
         AddTicks(intValue * 315360000000000 + 864000000000 * ((year Mod 4 + intValue) \ 4 - (year Mod 100 + intValue) \ 100 + (year Mod 400 + intValue) \ 400))
         If value < 0 Then
-            If year Mod 4 + intValue <= 0 And year Mod 100 > 4 Then
+            If (year Mod 4 + intValue <= 0 And year Mod 100 > 4) Or (year Mod 400 <= 4) Then
                 AddTicks(-864000000000)
             End If