use a scheme procedures+eval to manage and transform AST

Removes records for a more-managable scheme-syntax approach. Modules+overriding allows for the IR itself to be represented and evaluated as scheme code during each transformation.

1 files changed, 7 insertions, 0 deletions

diff --git a/src/modules/utils/merge-instructions.scm b/src/modules/utils/merge-instructions.scm
new file mode 100644
index 0000000..dea5556
--- /dev/null
+++ b/src/modules/utils/merge-instructions.scm
@@ -0,0 +1,7 @@
+(define-module (modules utils merge-instructions)
+  #:use-module (srfi srfi-1)
+  #:export (merge-instr))
+
+
+(define (merge-instr lst)
+  (append-map (lambda (x) (if (list? (car x)) x (list x))) lst))