diff options
| author | Paul Oliver <contact@pauloliver.dev> | 2025-08-27 17:47:28 +0000 |
|---|---|---|
| committer | Paul Oliver <contact@pauloliver.dev> | 2025-09-03 21:14:26 +0000 |
| commit | 56bd071335151fccac2ab0846c6063292e891479 (patch) | |
| tree | 36beb23fe50537f977ae31cde075046697689de6 /hsm-web/Main.hs | |
| parent | f4e1e137917c908d7bb95f0dfb320a5a2a89ec9d (diff) | |
Adds `hsm-web`
Diffstat (limited to 'hsm-web/Main.hs')
| -rw-r--r-- | hsm-web/Main.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/hsm-web/Main.hs b/hsm-web/Main.hs new file mode 100644 index 0000000..9eef1e7 --- /dev/null +++ b/hsm-web/Main.hs @@ -0,0 +1,7 @@ +import Effectful (runEff) +import Hsm.Cam (runCam) +import Hsm.Log (Severity(Info), runLogs) +import Hsm.Web (runServer, runWeb) + +main :: IO () +main = runEff . runLogs @'[ "cam", "libcamera", "scotty", "web"] Info . runCam . runWeb $ runServer |