[dchapyshev] 37162: - Implement HeapWalk (based on Wine)

Author: dchapyshev
Date: Mon Nov  3 02:37:50 2008
New Revision: 37162

URL: http://svn.reactos.org/svn/reactos?rev=37162&view=rev
Log:
- Implement HeapWalk (based on Wine)

Modified:
    trunk/reactos/dll/win32/kernel32/mem/heap.c

Modified: trunk/reactos/dll/win32/kernel32/mem/heap.c
URL:
http://svn.reactos.org/svn/reactos/trunk/reactos/dll/win32/kernel32/mem/hea…
==============================================================================
--- trunk/reactos/dll/win32/kernel32/mem/heap.c [iso-8859-1] (original)
+++ trunk/reactos/dll/win32/kernel32/mem/heap.c [iso-8859-1] Mon Nov  3 02:37:50 2008
@@ -251,16 +251,21 @@
 }
 
 /*
- * @unimplemented
+ * @implemented
  */
 BOOL
 STDCALL
-HeapWalk(HANDLE	 hHeap,
+HeapWalk(HANDLE	hHeap,
          LPPROCESS_HEAP_ENTRY lpEntry)
 {
-    /* Not implemented */
-    SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
-    return FALSE;
+    NTSTATUS Status;
+
+    Status = RtlWalkHeap(hHeap, lpEntry);
+
+    if (Status)
+        SetLastError(RtlNtStatusToDosError(Status));
+
+    return !Status;
 }
 
 /* EOF */