From a31e8759c0fffb8c4f2e87624eb9e520f04f273c Mon Sep 17 00:00:00 2001
From: stuebinm
Date: Wed, 9 Nov 2022 01:08:05 +0100
Subject: some more hacking

includes a message queue, more correct implementation of how the routs
work (why do they work like THAT though???), and other fun stuff.

uh also turns out you can't do schema validation with xml-types easily.
ah well. "be liberal in what you accept" and all that …
---
 vdv-protocol.cabal | 19 +++++++++++++++++--
 1 file changed, 17 insertions(+), 2 deletions(-)

(limited to 'vdv-protocol.cabal')

diff --git a/vdv-protocol.cabal b/vdv-protocol.cabal
index 869745d..822eb94 100644
--- a/vdv-protocol.cabal
+++ b/vdv-protocol.cabal
@@ -36,12 +36,14 @@ library
                  , time
                  , text
                  , containers
+                 , stm
+                 , async
     hs-source-dirs: vdv-server
     default-language: Haskell2010
     exposed-modules: VDV453.Kommunikationsschicht
 
 
-executable vdv-protocol
+executable vdv-testclient
     main-is:          Main.hs
 
     -- Modules included in this executable, other than Main.
@@ -51,5 +53,18 @@ executable vdv-protocol
     -- other-extensions:
     build-depends:    base ^>=4.14.3.0
                     , vdv-protocol
-    hs-source-dirs:   vdv-test
+    hs-source-dirs:   vdv-testclient
+    default-language: Haskell2010
+
+executable vdv-testserver
+    main-is:          Main.hs
+
+    -- Modules included in this executable, other than Main.
+    -- other-modules:
+
+    -- LANGUAGE extensions used by modules in this package.
+    -- other-extensions:
+    build-depends:    base ^>=4.14.3.0
+                    , vdv-protocol
+    hs-source-dirs:   vdv-testserver
     default-language: Haskell2010
-- 
cgit v1.2.3