Changeset 237 for Include/Classes/System/OperatingSystem.ab

Timestamp:

May 7, 2007, 4:22:52 PM (18 years ago)

Author:

イグトランス (egtra)

Message:

#_fullcompileで検出されたエラーの修正（明らかに判るもののみ）

File:

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

Include/Classes/System/OperatingSystem.ab

@@ -17 +17 @@
 
     Sub OperatingSystem(vi As OSVERSIONINFOA)
-        pf = vi.dwPlatformId As PlatformID,
+        pf = vi.dwPlatformId As PlatformID
         ver = New Version(vi.dwMajorVersion, vi.dwMinorVersion, vi.dwBuildNumber)
-        sp = vi.szCSDVersion
+        sp = New String(vi.szCSDVersion As PCSTR)
     End Sub
 
     Sub OperatingSystem(vi As OSVERSIONINFOW)
-        pf = vi.dwPlatformId As PlatformID,
+        pf = vi.dwPlatformId As PlatformID
         ver = New Version(vi.dwMajorVersion, vi.dwMinorVersion, vi.dwBuildNumber)
-        sp = vi.szCSDVersion
+        sp = New String(vi.szCSDVersion As PCSTR)
     End Sub