Initial import.

2026-08-06 17:44:24 +02:00
parent d0a8bf9aca
commit fbff4b9a6e
4 changed files with 389 additions and 0 deletions
@@ -0,0 +1,22 @@
+#lang racket/base
+
+(require rackunit
+         "../main.rkt")
+
+(check-true (procedure? sonos-device?))
+(check-true (procedure? sonos-groups))
+
+(define group
+  (sonos-group
+   "group"
+   "Woonkamer (stereo)"
+   "RINCON_COORDINATOR"
+   '("RINCON_LEFT" "RINCON_RIGHT")
+   #t
+   #t
+   #f
+   'renderer))
+
+(check-true (sonos-group? group))
+(check-true (sonos-group-stereo? group))
+(check-false (sonos-group-grouped? group))