From 10078d83ce910ddfee311964766c5042c38d3763 Mon Sep 17 00:00:00 2001
From: Paul Oliver <contact@pauloliver.dev>
Date: Sat, 13 Dec 2025 22:20:41 +0100
Subject: Adds battery monitoring service via INA226/I2C

---
 hsm-core/Hsm/Core/Show.hs | 9 +++++++++
 hsm-core/hsm-core.cabal   | 1 +
 2 files changed, 10 insertions(+)
 create mode 100644 hsm-core/Hsm/Core/Show.hs

(limited to 'hsm-core')

diff --git a/hsm-core/Hsm/Core/Show.hs b/hsm-core/Hsm/Core/Show.hs
new file mode 100644
index 0000000..601ea03
--- /dev/null
+++ b/hsm-core/Hsm/Core/Show.hs
@@ -0,0 +1,9 @@
+-- Defines some convenience printing functions
+module Hsm.Core.Show
+  ( showHex
+  ) where
+
+import Numeric qualified as N (showHex)
+
+showHex :: Integral a => a -> String
+showHex v = "0x" <> N.showHex v ""
diff --git a/hsm-core/hsm-core.cabal b/hsm-core/hsm-core.cabal
index 6a0efff..f9f5657 100644
--- a/hsm-core/hsm-core.cabal
+++ b/hsm-core/hsm-core.cabal
@@ -18,5 +18,6 @@ library
     Hsm.Core.App
     Hsm.Core.Bracket
     Hsm.Core.Serial
+    Hsm.Core.Show
 
   ghc-options:      -O2 -Wall -Werror -Wno-star-is-type -Wunused-packages
-- 
cgit v1.2.1