update doctor

Author: sumneko

script/doctor.lua

@@ -161,6 +161,9 @@ local function private(o)
 end
 
 local m = private {}
+
+m._ignoreMainThread = true
+
 --- 获取内存快照，生成一个内部数据结构。
 --- 一般不用这个API，改用 report 或 catch。
 ---@return table
@@ -191,7 +194,6 @@ m.snapshot = private(function ()
     local find
     local mark = private {}
 
-
     local function findTable(t, result)
         result = result or {}
         local mt = getmetatable(t)
@@ -211,21 +213,45 @@ m.snapshot = private(function ()
             if not wk then
                 local keyInfo = find(k)
                 if keyInfo then
-                    result[#result+1] = private {
-                        type = 'key',
-                        name = formatName(k),
-                        info = keyInfo,
-                    }
+                    if wv then
+                        find(v)
+                        local valueResults = mark[v]
+                        if valueResults then
+                            valueResults[#valueResults+1] = private {
+                                type = 'weakvalue-key',
+                                name = formatName(t) .. '|' .. formatName(v),
+                                info = keyInfo,
+                            }
+                        end
+                    else
+                        result[#result+1] = private {
+                            type = 'key',
+                            name = formatName(k),
+                            info = keyInfo,
+                        }
+                    end
                 end
             end
             if not wv then
                 local valueInfo = find(v)
                 if valueInfo then
-                    result[#result+1] = private {
-                        type = 'field',
-                        name = formatName(k) .. '|' .. formatName(v),
-                        info = valueInfo,
-                    }
+                    if wk then
+                        find(k)
+                        local keyResults = mark[k]
+                        if keyResults then
+                            keyResults[#keyResults+1] = private {
+                                type = 'weakkey-field',
+                                name = formatName(t) .. '|' .. formatName(k),
+                                info = valueInfo,
+                            }
+                        end
+                    else
+                        result[#result+1] = private {
+                            type = 'field',
+                            name = formatName(k) .. '|' .. formatName(v),
+                            info = valueInfo,
+                        }
+                    end
                 end
             end
         end