From 6c74020a10541d97ae2186bab3d3a71a641d54dc Mon Sep 17 00:00:00 2001
From: Mario Lang <mlang@blind.guru>
Date: Sun, 15 Dec 2019 08:02:03 +0100
Subject: [PATCH] Allow serialisation of SCDocNode trees to Emacs Lisp

---
 sc/storeLispOn.sc | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/sc/storeLispOn.sc b/sc/storeLispOn.sc
index f316813..749aa3b 100644
--- a/sc/storeLispOn.sc
+++ b/sc/storeLispOn.sc
@@ -116,4 +116,18 @@
 	}
 }
 
-// EOF
\ No newline at end of file
++ SCDocNode {
+	storeLispOn { arg stream;
+		stream.put($();
+		id.storeLispOn(stream);
+		stream.space;
+		text.storeLispOn(stream);
+		children.do {|child|
+			stream.space;
+			child.storeLispOn(stream);
+		};
+		stream.put($));
+	}
+}
+
+// EOF