Added IsODigit

git-svn-id: svn://svn.cc65.org/cc65/trunk@3167 b7a2c559-68d2-44c3-8de9-860c34a00d81

diff --git a/src/common/chartype.c b/src/common/chartype.c
index 73f7a6ee4b7990496cded526d2e4aebeb4741eb8..a16fe03e155f916e158cd0b6c79b0d82370e1207 100644 (file)
--- 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 72ccf7560890bc0ca4e6c4c0560a668e7279f3e1..4c0c9ffd41e40005e6899821130286af9b7ec963 100644 (file)
--- 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 */