如何迭代.NET托管堆中存在的对象？

using System.Runtime.InteropServices;
using System.Collections.Generic;

[StructLayout(LayoutKind.Sequential)]
public struct GCHandleInfo
{
    public IntPtr Handle;
    public IntPtr Target;
    public GCHandleType Type;
}

[DllImport("msvcrt.dll", CallingConvention = CallingConvention.Cdecl)]
public static extern int _enumerate_handles(uint flags, IntPtr callback, IntPtr param);

public delegate bool EnumerateHandlesCallback(IntPtr handle, GCHandleType type, IntPtr target, IntPtr param);

public static bool EnumerateHandlesCallback(IntPtr handle, GCHandleType type, IntPtr target, IntPtr param)
{
    // 处理每个对象
    return true;
}

EnumerateHandlesCallback callback = EnumerateHandlesCallback;
_enumerate_handles(0, Marshal.GetFunctionPointerForDelegate(callback), IntPtr.Zero);