Win32OperatingSystem.st
changeset 10696 c9d6ce00235b
parent 10695 f3063dc5bcbd
child 10699 8fd653b16649
--- a/Win32OperatingSystem.st	Fri Sep 07 11:49:45 2007 +0200
+++ b/Win32OperatingSystem.st	Fri Sep 07 12:55:22 2007 +0200
@@ -10362,7 +10362,7 @@
         self global data.                  
         self processor data.        
         self processor processorTimeFraction.  
-        self byIndexNumber indexNumber:238; data
+        self byIndexNumber indexNumber:230; data
     "
 ! !
 
@@ -10576,6 +10576,7 @@
                 __AT_PUT_(st_instanceArray, __mkSmallInteger(instanceIterator+1), st_perInstance);
 
                 //get the instance data
+                __AT_PUT_(st_perInstance, @symbol(Name), __MKBYTEARRAY((wchar_t *)((BYTE *)perfInstancePtr + perfInstancePtr->NameOffset),perfInstancePtr->NameLength));
                 __AT_PUT_(st_perInstance, @symbol(ParentObjectTitleIndex), __mkSmallInteger(perfInstancePtr->ParentObjectTitleIndex));
                 __AT_PUT_(st_perInstance, @symbol(ParentObjectInstance), __mkSmallInteger(perfInstancePtr->ParentObjectInstance));
                 __AT_PUT_(st_perInstance, @symbol(NameOffset), __mkSmallInteger(perfInstancePtr->NameOffset));
@@ -10599,7 +10600,6 @@
         perfObjectPtr = (PERF_OBJECT_TYPE *)((char *)perfObjectPtr + perfObjectPtr->TotalByteLength);
     }
 %}.
-
     objectArray := st_objectArray.
     perfTime := st_perfTime.
     perfFreq := st_perfFreq.
@@ -10654,6 +10654,8 @@
 
                 rawData := anInstance at:#RawData.
 
+                anInstance at:#Name put:((Unicode16String fromBytes:(anInstance at:#Name) copy swapBytes) copyWithoutLast:1).
+
                 (anObject at:#Counters) do:[:aCounter|
                     (aCounter at:#CounterValueArray) add:(getCounterValueBlock value:aCounter value:rawData).
                 ].
@@ -10758,7 +10760,7 @@
 interruptsPerSecond
 
     "
-        self interruptsPerSecond  
+        self interruptsPerSecond   
     "
 
     |p1 p2 index counter1 counter2 resultArray deltaTInNs deltaTInS cValueArray1 cValueArray2|
@@ -13682,7 +13684,7 @@
 !Win32OperatingSystem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Win32OperatingSystem.st,v 1.295 2007-09-07 09:49:45 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Win32OperatingSystem.st,v 1.296 2007-09-07 10:55:22 sr Exp $'
 ! !
 
 Win32OperatingSystem initialize!