Render summary when hovering on parent node

Author: julienvincent

lua/clojure-test/ui/components/exception.lua

@@ -5,64 +5,84 @@ local NuiText = require("nui.text")
 
 local M = {}
 
-function M.render_exceptions_to_buf(buf, exception_chain)
+function M.render_exception_to_buf(buf, exception, start_line)
+  start_line = start_line or 0
+
   vim.api.nvim_set_option_value("filetype", "clojure", {
     buf = buf,
   })
-  vim.api.nvim_buf_set_lines(buf, 0, -1, false, {})
+  vim.api.nvim_buf_set_lines(buf, start_line, -1, false, {})
 
   local lines = {}
 
-  for _, ex in ipairs(utils.reverse_table(exception_chain)) do
-    local exception_title = NuiLine()
-    exception_title:append(ex["class-name"], "Error")
-    exception_title:append(": ", "Comment")
+  local exception_title = NuiLine()
+  exception_title:append(exception["class-name"], "Error")
+  exception_title:append(": ", "Comment")
 
-    local title_lines = vim.split(ex.message, "\n")
-    exception_title:append(title_lines[1], "TSParameter")
+  local title_lines = vim.split(exception.message, "\n")
+  exception_title:append(title_lines[1], "TSParameter")
 
-    table.insert(lines, exception_title)
-    table.remove(title_lines, 1)
+  table.insert(lines, exception_title)
+  table.remove(title_lines, 1)
 
-    for _, content in ipairs(title_lines) do
-      table.insert(lines, NuiLine({ NuiText(content, "TSParameter") }))
-    end
+  for _, content in ipairs(title_lines) do
+    table.insert(lines, NuiLine({ NuiText(content, "TSParameter") }))
+  end
 
-    local stack_trace = ex["stack-trace"]
-    if stack_trace and stack_trace ~= vim.NIL then
-      for _, frame in ipairs(stack_trace) do
-        if frame.name and frame.name ~= "" then
-          local namespace_and_names = vim.split(frame.name, "/")
-          local names = table.concat(namespace_and_names, "/", 2)
-
-          local frame_line = NuiLine()
-          frame_line:append("  ")
-          frame_line:append(namespace_and_names[1], "TSNamespace")
-          frame_line:append("/", "TSMethodCall")
-          frame_line:append(names, "TsMethodCall")
-
-          if frame.line and frame.line ~= vim.NIL then
-            frame_line:append(" @ ", "Comment")
-            frame_line:append(tostring(frame.line), "TSNumber")
-          end
-
-          table.insert(lines, frame_line)
+  local stack_trace = exception["stack-trace"]
+  if stack_trace and stack_trace ~= vim.NIL then
+    for _, frame in ipairs(stack_trace) do
+      if frame.name and frame.name ~= "" then
+        local namespace_and_names = vim.split(frame.name, "/")
+        local names = table.concat(namespace_and_names, "/", 2)
+
+        local frame_line = NuiLine()
+        frame_line:append("  ")
+        frame_line:append(namespace_and_names[1], "TSNamespace")
+        frame_line:append("/", "TSMethodCall")
+        frame_line:append(names, "TsMethodCall")
+
+        if frame.line and frame.line ~= vim.NIL then
+          frame_line:append(" @ ", "Comment")
+          frame_line:append(tostring(frame.line), "TSNumber")
         end
+
+        table.insert(lines, frame_line)
       end
     end
+  end
 
-    if ex.properties and ex.properties ~= vim.NIL then
-      table.insert(lines, NuiLine())
+  if exception.properties and exception.properties ~= vim.NIL then
+    table.insert(lines, NuiLine())
 
-      for _, content in ipairs(vim.split(ex.properties, "\n")) do
-        table.insert(lines, NuiLine({ NuiText(content) }))
-      end
+    for _, content in ipairs(vim.split(exception.properties, "\n")) do
+      table.insert(lines, NuiLine({ NuiText(content) }))
     end
   end
 
   for i, line in ipairs(lines) do
-    line:render(buf, -1, i)
+    line:render(buf, -1, start_line + i)
   end
+
+  return #lines
+end
+
+function M.render_exceptions_to_buf(buf, exception_chain, start_line)
+  start_line = start_line or 0
+
+  vim.api.nvim_set_option_value("filetype", "clojure", {
+    buf = buf,
+  })
+  vim.api.nvim_buf_set_lines(buf, start_line, -1, false, {})
+
+  local total_lines = 0
+
+  for _, ex in ipairs(utils.reverse_table(exception_chain)) do
+    local lines = M.render_exception_to_buf(buf, ex, start_line + total_lines)
+    total_lines = total_lines + lines
+  end
+
+  return total_lines
 end
 
 return M

lua/clojure-test/ui/components/init.lua

@@ -2,4 +2,5 @@ return {
   exception = require("clojure-test.ui.components.exception"),
   tree = require("clojure-test.ui.components.tree"),
   clojure = require("clojure-test.ui.components.clojure"),
+  summary = require("clojure-test.ui.components.summary"),
 }

lua/clojure-test/ui/components/summary.lua

@@ -0,0 +1,46 @@
+local exception = require("clojure-test.ui.components.exception")
+
+local NuiLine = require("nui.line")
+local NuiText = require("nui.text")
+
+local M = {}
+
+function M.render_summary(buf, report)
+  vim.api.nvim_set_option_value("filetype", "clojure", {
+    buf = buf,
+  })
+
+  local offset = 0
+
+  local function render_line(items)
+    NuiLine(items):render(buf, -1, offset + 1)
+    offset = offset + 1
+  end
+
+  local function render_content(content)
+    local lines = vim.split(vim.trim(content), "\n")
+    vim.api.nvim_buf_set_lines(buf, offset, -1, false, lines)
+    offset = offset + #lines
+  end
+
+  for _, assertion in ipairs(report.assertions) do
+    if assertion.expected then
+      render_line({ NuiText(";; Expected") })
+      render_content(assertion.expected)
+    end
+
+    render_line({ NuiText(";; Actual") })
+    if assertion.actual then
+      render_content(assertion.actual)
+    end
+
+    if assertion.exceptions then
+      local lines = exception.render_exception_to_buf(buf, assertion.exceptions[#assertion.exceptions], offset)
+      offset = offset + lines
+    end
+
+    render_line({})
+  end
+end
+
+return M

lua/clojure-test/ui/components/tree.lua

@@ -48,6 +48,7 @@ local function exceptions_to_nodes(exceptions)
     }
 
     local node = NuiTree.Node({
+      type = "exception",
       line = line,
       exception = ex,
     })
@@ -62,6 +63,7 @@ local function assertion_to_node(test, assertion)
   local children = exceptions_to_nodes(assertion.exceptions or {})
 
   local node = NuiTree.Node({
+    type = "assertion",
     line = line,
     assertion = assertion,
     test = test,
@@ -83,6 +85,7 @@ local function report_to_node(report, is_expanded)
   end
 
   local node = NuiTree.Node({
+    type = "report",
     line = report_line,
     test = report.test,
     report = report,

lua/clojure-test/ui/layouts/float/init.lua

@@ -6,6 +6,14 @@ local utils = require("clojure-test.utils")
 local function handle_on_move(layout, event)
   local node = event.node
 
+  if node.type == "report" then
+    vim.schedule(function()
+      layout:render_single()
+      components.summary.render_summary(layout.windows.right.bufnr, node.report)
+    end)
+    return
+  end
+
   if node.assertion then
     if node.assertion.exceptions then
       vim.schedule(function()

tests/backend/mock.lua

@@ -63,6 +63,11 @@ function M.create()
           expected = "(= 1 1)",
           actual = "(= 1 1)",
         },
+        {
+          type = "pass",
+          expected = "(= 2 2)",
+          actual = "(= 2 2)",
+        },
       },
     }
   end