aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/formats/sxcal.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/vcomponent/formats/sxcal.scm')
-rw-r--r--module/vcomponent/formats/sxcal.scm16
1 files changed, 16 insertions, 0 deletions
diff --git a/module/vcomponent/formats/sxcal.scm b/module/vcomponent/formats/sxcal.scm
new file mode 100644
index 00000000..c02dbada
--- /dev/null
+++ b/module/vcomponent/formats/sxcal.scm
@@ -0,0 +1,16 @@
+(define-module (vcomponent formats sxcal)
+ :use-module ((vcomponent formats xcal parse)
+ :select (sxcal->vcomponent))
+ :export (serialize deserialize)
+ )
+
+
+(define (serialize component port)
+ (write (serialize/object component) port))
+
+(define (serialize/object component)
+ ;; TODO where is this defined?
+ (vcomponent->sxcal component))
+
+(define (deserialize port)
+ (sxcal->vcomponent port))