From 0cc9b20c15460213e488bf5e70963b941482f628 Mon Sep 17 00:00:00 2001
From: William Harrington <kb0iic@berzerkula.org>
Date: Tue, 14 Jan 2025 16:06:02 -0600
Subject: Add source.

---
 sdk/other/xval.c | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 sdk/other/xval.c

(limited to 'sdk/other/xval.c')

diff --git a/sdk/other/xval.c b/sdk/other/xval.c
new file mode 100644
index 0000000..c7d1276
--- /dev/null
+++ b/sdk/other/xval.c
@@ -0,0 +1,28 @@
+/*
+ * Hex digit conversions.
+ * $Id$
+ * Copyright (c) 1997 by Tycho Softworks.
+ * For conditions of distribution and reuse see product license.
+ */
+
+#include <other/strcvt.h>
+
+int     xdigit(char c)
+{
+        if(c > '9')
+                return upper(c) - '7';
+
+        return digit(c);
+};
+
+ulong   xtol(const char *s)
+{
+        ulong v = 0l;
+
+        while(isxdigit(*s))
+        {
+                v = v << 4 | xdigit(*s);
+                ++s;
+        }
+        return v;
+};
-- 
cgit v1.2.3-54-g00ecf