Changeset 173 for Include/Classes

Timestamp:

Mar 17, 2007, 5:56:56 PM (18 years ago)

Author:

dai

Message:

EnumBaseの=演算子オーバーロードのコードを排除。
その他タイプミスを修正。

Location:

Include/Classes/System

Files:

• Environment.ab (modified) (1 diff)
• OperatingSystem.ab (modified) (2 diffs)

Include/Classes/System/Environment.ab

@@ -38 +38 @@
     End Sub
 
-    Static Sub HasShutdownStarted() As Boolean
+    Static Function HasShutdownStarted() As Boolean
         Return False
-    End Sub
+    End Function
 
     ' MachineName

Include/Classes/System/OperatingSystem.ab

@@ -13 +13 @@
     End Sub
 
-    Sub OperatingSystem(vi As OSVERSIONINFOA) As OperatingSystem
+    Sub OperatingSystem(vi As OSVERSIONINFOA)
         pf = vi.dwPlatformId As PlatformID,
         ver = New Version(vi.dwMajorVersion, vi.MinorVersion, vi.BuildNumber)
@@ -19 +19 @@
     End Sub
 
-    Sub OperatingSystem(vi As OSVERSIONINFOW) As OperatingSystem
+    Sub OperatingSystem(vi As OSVERSIONINFOW)
         pf = vi.dwPlatformId As PlatformID,
         ver = New Version(vi.dwMajorVersion, vi.MinorVersion, vi.BuildNumber)