Introduce the Models module in order to make others internal

2026-01-03 19:24:37 +01:00 · 2026-01-03 19:24:37 +01:00 · c377ec25dc
commit c377ec25dc
parent 915d01e086
6 changed files with 31 additions and 26 deletions
--- a/NightLight.Core/Models.fs
+++ b/NightLight.Core/Models.fs
@ -0,0 +1,22 @@
+module NightLight.Models
+
+open System
+
+type State = { Time: DateTime }
+
+type Event =
+    | ReceivedZigbeeEvent of payload: string
+    | TimeChanged of DateTime
+
+type ZigbeeCommand = ZigbeeCommand of Topic: string * Payload: string
+
+type ParseZigbeeEventError =
+    | InvalidJson
+    | MissingTypeField
+    | MissingDataField
+    | MissingFriendlyNameField
+    | InvalidTypeField
+    | InvalidFriendlyNameField
+    | UnknownType
+
+type ParseEventError = ParseZigbeeEventError of ParseZigbeeEventError