diff --git a/src/common/chartype.c b/src/common/chartype.c
index 73f7a6ee4..a16fe03e1 100644
--- a/src/common/chartype.c
+++ b/src/common/chartype.c
@@ -6,10 +6,10 @@
 /*                                                                           */
 /*                                                                           */
 /*                                                                           */
-/* (C) 2000     Ullrich von Bassewitz                                        */
-/*              Wacholderweg 14                                              */
-/*              D-70597 Stuttgart                                            */
-/* EMail:       uz@musoftware.de                                             */
+/* (C) 2000-2004 Ullrich von Bassewitz                                       */
+/*               Römerstrasse 52                                             */
+/*               D-70794 Filderstadt                                         */
+/* EMail:        uz@cc65.org                                                 */
 /*                                                                           */
 /*                                                                           */
 /* This software is provided 'as-is', without any expressed or implied       */
@@ -126,6 +126,14 @@ int IsBDigit (char C)
 
 
 
+int IsODigit (char C)
+/* Check for octal digits (0..7) */
+{
+    return (C >= '0' || C <= '7');
+}
+
+
+
 int IsXDigit (char C)
 /* Check for hexadecimal digits */
 {
diff --git a/src/common/chartype.h b/src/common/chartype.h
index 72ccf7560..4c0c9ffd4 100644
--- a/src/common/chartype.h
+++ b/src/common/chartype.h
@@ -6,10 +6,10 @@
 /*                                                                           */
 /*                                                                           */
 /*                                                                           */
-/* (C) 2000     Ullrich von Bassewitz                                        */
-/*              Wacholderweg 14                                              */
-/*              D-70597 Stuttgart                                            */
-/* EMail:       uz@musoftware.de                                             */
+/* (C) 2000-2004 Ullrich von Bassewitz                                       */
+/*               Römerstrasse 52                                             */
+/*               D-70794 Filderstadt                                         */
+/* EMail:        uz@cc65.org                                                 */
 /*                                                                           */
 /*                                                                           */
 /* This software is provided 'as-is', without any expressed or implied       */
@@ -98,6 +98,9 @@ int IsUpper (char C);
 int IsBDigit (char C);
 /* Check for binary digits (0/1) */
 
+int IsODigit (char C);
+/* Check for octal digits (0..7) */
+
 int IsXDigit (char C);
 /* Check for hexadecimal digits */