Remove old unit-test style seraliazation tests.

1 files changed, 0 insertions, 59 deletions

diff --git a/tests/test/xcal.scm b/tests/test/xcal.scm
deleted file mode 100644
index 87468370..00000000
--- a/tests/test/xcal.scm
+++ /dev/null
@@ -1,59 +0,0 @@
-;;; Commentary:
-;; Basic tests of xcal convertion.
-;; Currently only checks that events survive a round trip.
-;;; Code:
-
-(define-module (test xcal)
-  :use-module (srfi srfi-64)
-  :use-module (srfi srfi-88)
-  :use-module (datetime)
-  :use-module ((vcomponent create)
-               :select (vcalendar vevent with-parameters))
-  :use-module ((vcomponent formats xcal parse)
-               :select (sxcal->vcomponent))
-  :use-module ((vcomponent formats xcal output)
-               :select (vcomponent->sxcal))
-  :use-module ((hnh util) :select (->))
-  :use-module ((vcomponent base)
-               :select (parameters prop* children)))
-
-;;; Some different types, same parameters
-
-(define ev
-  (vcalendar
-   version: "2.0"
-   prodid: "-//calparse-test"
-   (list (vevent
-          summary: "Test event"
-          dtstart: (with-parameters
-                    tzid: "Europe/Stockholm"
-                    #2020-06-25T13:30:00)
-          dtend: #2020-06-25T14:30:00Z
-          dtstamp: #2020-06-09T13:14:18Z
-          uid: "1"
-          sequence: 0
-          created: #2020-06-09T08:17:25Z
-          description: "Short description"
-          last-modified: #2020-06-09T08:17:25Z
-          status: (with-parameters
-                   x-test-param: 10
-                   'CONFIRMED)
-          transp: 'OPAQUE))))
-
-(define twice-converted
-  (-> ev vcomponent->sxcal sxcal->vcomponent))
-
-;;; NOTE both these tests may fail since neither properties nor parameters are ordered sorted.
-
-(test-equal
-  "c->x & c->x->c->x"
-  (vcomponent->sxcal ev)
-  (vcomponent->sxcal twice-converted))
-
-(test-equal
-  "xcal parameters"
-  '((X-TEST-PARAM "10"))
-  (parameters
-    (prop* (car (children twice-converted)) 'STATUS)))
-
-