ajet/conjure-expand
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Split response lines for output logging

Browse Source
This commit is contained in:
Walter Leibbrandt 2022-10-25 16:09:28 +02:00
parent d8f9ac379c
commit ebeff7b1e4
2 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
fnl/conjure-macroexpand/main.fnl
View File

@ -1,6 +1,7 @@
(module conjure-macroexpand.main (module conjure-macroexpand.main
{require {a aniseed.core {require {a aniseed.core
nvim aniseed.nvim nvim aniseed.nvim
str aniseed.string
bridge conjure.bridge bridge conjure.bridge
client conjure.client client conjure.client
eval conjure.eval eval conjure.eval
@ -20,7 +21,7 @@
(defn- output-expanded [orig] (defn- output-expanded [orig]
(fn [r] (fn [r]
(log.append [(.. "; " orig) r] {:break? true}))) (log.append (a.concat [(.. "; " orig)] (str.split r "\n")) {:break? true})))
(defn clj-macroexpand [expand-cmd] (defn clj-macroexpand [expand-cmd]
(let [form (current-form) (let [form (current-form)

5
lua/conjure-macroexpand/main.lua
View File

@ -10,7 +10,7 @@ do
_2amodule_2a["aniseed/locals"] = {} _2amodule_2a["aniseed/locals"] = {}
_2amodule_locals_2a = (_2amodule_2a)["aniseed/locals"] _2amodule_locals_2a = (_2amodule_2a)["aniseed/locals"]
end end
local a, bridge, client, eval, extract, log, mapping, nvim = require("conjure-macroexpand.aniseed.core"), require("conjure.bridge"), require("conjure.client"), require("conjure.eval"), require("conjure.extract"), require("conjure.log"), require("conjure.mapping"), require("conjure-macroexpand.aniseed.nvim") local a, bridge, client, eval, extract, log, mapping, nvim, str = require("conjure-macroexpand.aniseed.core"), require("conjure.bridge"), require("conjure.client"), require("conjure.eval"), require("conjure.extract"), require("conjure.log"), require("conjure.mapping"), require("conjure-macroexpand.aniseed.nvim"), require("conjure-macroexpand.aniseed.string")
do end (_2amodule_locals_2a)["a"] = a do end (_2amodule_locals_2a)["a"] = a
_2amodule_locals_2a["bridge"] = bridge _2amodule_locals_2a["bridge"] = bridge
_2amodule_locals_2a["client"] = client _2amodule_locals_2a["client"] = client
@ -19,6 +19,7 @@ _2amodule_locals_2a["extract"] = extract
_2amodule_locals_2a["log"] = log _2amodule_locals_2a["log"] = log
_2amodule_locals_2a["mapping"] = mapping _2amodule_locals_2a["mapping"] = mapping
_2amodule_locals_2a["nvim"] = nvim _2amodule_locals_2a["nvim"] = nvim
_2amodule_locals_2a["str"] = str
local function current_form() local function current_form()
local form = extract.form({}) local form = extract.form({})
if form then if form then
@ -36,7 +37,7 @@ end
_2amodule_locals_2a["clj-client"] = clj_client _2amodule_locals_2a["clj-client"] = clj_client
local function output_expanded(orig) local function output_expanded(orig)
local function _3_(r) local function _3_(r)
return log.append({("; " .. orig), r}, {["break?"] = true}) return log.append(a.concat({("; " .. orig)}, str.split(r, "\n")), {["break?"] = true})
end end
return _3_ return _3_
end end