From 4c7302c4a3f48678055528b037427e58eec44457 Mon Sep 17 00:00:00 2001
From: Michael Sippel <micha@fragmental.art>
Date: Wed, 19 Mar 2025 17:28:54 +0100
Subject: [PATCH] digit morphisms: print message to stderr when digit is out of
range
---
morphisms/digit.morphism-base | 8 ++++++--
1 file changed, 6 insertions(+), 2 deletions(-)
diff --git a/morphisms/digit.morphism-base b/morphisms/digit.morphism-base
index 97d3bd9..8cc1597 100644
--- a/morphisms/digit.morphism-base
+++ b/morphisms/digit.morphism-base
@@ -12,8 +12,10 @@ morph_digit_as_char_to_uint8 (Radix:ℤ)
*dst = 0xa + *src - 'a';
else if( *src >= 'A' && *src <= 'F')
*dst = 0xa + *src - 'A';
- else
+ else {
+ fprintf(stderr, "invalid digit 0x%x\n", *src);
return -1;
+ }
if( *dst < Radix ) {
return 0;
@@ -33,8 +35,10 @@ morph_digit_as_char_to_uint64 (Radix:ℤ)
*dst = 0xa + *src - 'a';
else if( *src >= 'A' && *src <= 'F')
*dst = 0xa + *src - 'A';
- else
+ else {
+ fprintf(stderr, "invalid digit 0x%x\n", *src);
return -1;
+ }
if( *dst < Radix ) {
return 0;