blob: c02dbada8745d86e633f3052410d6d93f824e371 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
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))
|