From e51433556c6bc3f346e4b24e3322aa98cb628587 Mon Sep 17 00:00:00 2001
From: Ivan Polyakov <v1lor@protonmail.com>
Date: Fri, 7 Oct 2022 18:17:57 +0300
Subject: [PATCH] Chicken Scheme SXML loader

---
 src/loader.js | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

diff --git a/src/loader.js b/src/loader.js
index 35dfc48..6dff584 100644
--- a/src/loader.js
+++ b/src/loader.js
@@ -1,3 +1,15 @@
-module.exports = function(content) {
-    return content;
+const { spawn } = require('child_process');
+
+module.exports = function(content, map, meta) {
+    const cb = this.async();
+    const expr = `(import sxml-serializer)(display (serialize-sxml ${content}))`;
+    const scheme = spawn('chicken-csi', ['-e', expr]);
+
+    scheme.stdout.on('data', data => {
+        cb(null, data, map, meta);
+    });
+
+    scheme.stderr.on('data', data => {
+        console.error(data);
+    });
 }