git » hoplite.git » commit 4ee02a0

diff --git a/record.mjs b/record.mjs
new file mode 100644
index 0000000..6443b40
--- /dev/null
+++ b/record.mjs
@@ -0,0 +1,27 @@
+import { input, transaction } from './reactives.mjs';
+
+class Record {
+  constructor(fields) {
+    this.fieldNames = fields;
+    this.fields = Object.fromEntries(fields.map(f => [f, input()]))
+    this.get = new Proxy({}, {
+      get: (obj, name) => this.fields[name]
+    });
+  }
+  clear() {
+    transaction(() => {
+      Object.values(this.fields).forEach(c => c.set());
+    });
+  }
+  asTuples(eid) {
+    return Object.entries(this.fields)
+      .filter(([f, c]) => c.value)
+      .map(([f, c]) => [eid, f, c.value]);
+  }
+}
+
+function record(...fields) {
+  return new Record(fields);
+} 
+
+export { record };