This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
win32/vdir.h: Use inRANGE macro
authorKarl Williamson <khw@cpan.org>
Thu, 3 Oct 2019 03:02:44 +0000 (21:02 -0600)
committerKarl Williamson <khw@cpan.org>
Thu, 26 Dec 2019 21:02:25 +0000 (14:02 -0700)
which is more efficient.

win32/vdir.h

index 9ff225e..60f409d 100644 (file)
@@ -334,7 +334,7 @@ inline bool IsSpecialFileName(const char* pName)
                    break;
                case 'O': /* COMx,  CON, CONIN$ CONOUT$ */
                    if ((pName[2] & ~0x20) == 'M') {
-                       if ((pName[3] >= '1') && (pName[3] <= '9')
+                       if (    inRANGE(pName[3], '1', '9')
                            && !pName[4])
                            return true;
                    }
@@ -361,7 +361,8 @@ inline bool IsSpecialFileName(const char* pName)
        case 'L': /* LPTx */
            if (((pName[1] & ~0x20) == 'U')
                && ((pName[2] & ~0x20) == 'X')
-               && (pName[3] >= '1') && (pName[3] <= '9')
+                       if ((inRANGE(pName[3], '1', '9'))
+               &&  inRANGE(pName[3], '1', '9')
                && !pName[4])
                    return true;
            break;
@@ -566,7 +567,7 @@ inline bool IsSpecialFileName(const WCHAR* pName)
                    break;
                case 'O': /* COMx,  CON, CONIN$ CONOUT$ */
                    if ((pName[2] & ~0x20) == 'M') {
-                       if ((pName[3] >= '1') && (pName[3] <= '9')
+                       if (    inRANGE(pName[3], '1', '9')
                            && !pName[4])
                            return true;
                    }
@@ -593,7 +594,7 @@ inline bool IsSpecialFileName(const WCHAR* pName)
        case 'L': /* LPTx */
            if (((pName[1] & ~0x20) == 'U')
                && ((pName[2] & ~0x20) == 'X')
-               && (pName[3] >= '1') && (pName[3] <= '9')
+               &&  inRANGE(pName[3], '1', '9')
                && !pName[4])
                    return true;
            break;