From 8e1e4cceab516afab46ccced63ca9edab663ca11 Mon Sep 17 00:00:00 2001
From: Munyoki Kilyungi
Date: Mon, 21 Aug 2023 15:03:20 +0300
Subject: Rename dump -> transform

Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
---
 transform/table.scm | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 transform/table.scm

(limited to 'transform/table.scm')

diff --git a/transform/table.scm b/transform/table.scm
new file mode 100644
index 0000000..e6254d0
--- /dev/null
+++ b/transform/table.scm
@@ -0,0 +1,28 @@
+(define-module (transform table)
+  #:use-module (srfi srfi-9 gnu)
+  #:export (make-table
+            table-name
+            table-size
+            table-columns
+            set-table-columns
+            make-column
+            column-name
+            column-type
+            column-transformed?))
+
+(define-immutable-record-type <table>
+  (make-table name size columns)
+  table?
+  (name table-name)
+  (size table-size)
+  (columns table-columns set-table-columns))
+
+(define-immutable-record-type <column>
+  (column-constructor name type transformed?)
+  column?
+  (name column-name)
+  (type column-type)
+  (transformed? column-transformed?))
+
+(define* (make-column name type #:optional transformed?)
+  (column-constructor name type transformed?))
-- 
cgit v1.2.3