Changeset 152

Timestamp:

Mar 12, 2007, 3:34:17 AM (18 years ago)

Author:

dai

Message:

")" 抜けと "String" タイプミスを修正。

File:

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

Include/Classes/System/Environment.ab

@@ -95 +95 @@
         Dim hmodPSAPI = LoadLibrary("PSAPI.DLL")
         If hmodPSAPI = 0 Then Return 0
-        pGetProcessMemoryInfo = GetProcAddress(hmodPSAPI, ToMBStr("GetProcessMemoryInfo")
+        pGetProcessMemoryInfo = GetProcAddress(hmodPSAPI, ToMBStr("GetProcessMemoryInfo"))
         If pGetProcessMemoryInfo <> 0 Then
             Dim mc As PPROCESS_MEMORY_COUNTERS
@@ -137 +137 @@
 
 Private
-    Static cmdLine = Nothing As Stirng
+    Static cmdLine = Nothing As String
     Static exitCode = 0 As Long
     Static osVer = Nothing As OperatingSystem