aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2022-10-24 21:59:42 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2023-04-10 23:45:29 +0200
commit8daf73adf8914ea318d7c703d17c64d650c2d5cc (patch)
tree9f2337f7b98f766929cb68563e8bd282597f6ea2
parentPut base for new store-load interface. (diff)
downloadcalp-8daf73adf8914ea318d7c703d17c64d650c2d5cc.tar.gz
calp-8daf73adf8914ea318d7c703d17c64d650c2d5cc.tar.xz
Start writing data-store: meta
-rw-r--r--module/vcomponent/data-stores/meta.scm17
1 files changed, 17 insertions, 0 deletions
diff --git a/module/vcomponent/data-stores/meta.scm b/module/vcomponent/data-stores/meta.scm
new file mode 100644
index 00000000..c670d692
--- /dev/null
+++ b/module/vcomponent/data-stores/meta.scm
@@ -0,0 +1,17 @@
+;;; Commentary:
+;;; A virtual data store which uses other data stores for its storage.
+;;; Used to merge stores into larger stores
+;;; Code:
+
+(define-module (vcomponent data-stores meta)
+ :use-module (oop goops)
+ :use-module (vcomponent data-stores common)
+ :use-module ((srfi srfi-88) :select ())
+ :export ()
+ )
+
+(define-class <meta-data-store> (<calendar-data-store>)
+ (stores accessor: stores
+ init-value: '()))
+
+(define-method (get-calendar ))