wild-inferior is 0-n, not 1-n!

[Pascal Bourguignon]

In CLHS:
19.2.2.4.3 Restrictions on Examining a Pathname Directory Component
:wild-inferiors  Wildcard match of any number of directory levels    
                                   ^^^

However, cmucl-19c doesn't matches a pathname that has 0 directory for
a wild-inferiors token:

0] (setf (logical-pathname-translations "PACKAGES") 
         (list (first (logical-pathname-translations "PACKAGES"))))

((#P"PACKAGES:COM;INFORMATIMAGO;COMMON-LISP;**;*.*.*" #P"**/*.*.~*~"))
0] (translate-logical-pathname 
"PACKAGES:COM;INFORMATIMAGO;COMMON-LISP;UTILITY.LISP")

#P"/utility.lisp"
0] (translate-logical-pathname 
#P"PACKAGES:COM;INFORMATIMAGO;COMMON-LISP;UTILITY.LISP")

#P"/utility.lisp"
0] (print-pathname #P"PACKAGES:COM;INFORMATIMAGO;COMMON-LISP;UTILITY.LISP")

Host      : "PACKAGES"
Device    : :UNSPECIFIC
Directory : (:ABSOLUTE "COM" "INFORMATIMAGO" "COMMON-LISP")
Name      : "UTILITY"
Type      : "LISP"
Version   : NIL
#P"PACKAGES:COM;INFORMATIMAGO;COMMON-LISP;UTILITY.LISP"
0] (print-pathname (caar (logical-pathname-translations "PACKAGES")))

Host      : "PACKAGES"
Device    : :UNSPECIFIC
Directory : (:ABSOLUTE "COM" "INFORMATIMAGO" "COMMON-LISP" :WILD-INFERIORS)
Name      : :WILD
Type      : :WILD
Version   : :WILD
#P"PACKAGES:COM;INFORMATIMAGO;COMMON-LISP;**;*.*.*"
0] (print-pathname #P"PACKAGES:COM;INFORMATIMAGO;COMMON-LISP;A;UTILITY.LISP")

Host      : "PACKAGES"
Device    : :UNSPECIFIC
Directory : (:ABSOLUTE "COM" "INFORMATIMAGO" "COMMON-LISP" "A")
Name      : "UTILITY"
Type      : "LISP"
Version   : NIL
#P"PACKAGES:COM;INFORMATIMAGO;COMMON-LISP;A;UTILITY.LISP"

0] (print-bug-report-info)


LISP-IMPLEMENTATION-TYPE     "CMU Common Lisp"
LISP-IMPLEMENTATION-VERSION  "19c (19C)"
SOFTWARE-TYPE                "Linux"
SOFTWARE-VERSION             "Linux version 2.6.15-c3 ([EMAIL PROTECTED]) (gcc 
version 3.3 20030226 (prerelease) (SuSE Linux)) #3 Mon Apr 10 20:56:51 CEST 
2006"
MACHINE-INSTANCE             "thalassa"
MACHINE-TYPE                 "X86"
MACHINE-VERSION              "X86"
*FEATURES*                   (:GERDS-PCL :PCL-STRUCTURES :PORTABLE-COMMONLOOPS
                              :PCL :CMU19 :CMU19C :PYTHON
                              :CONSERVATIVE-FLOAT-TYPE :MODULAR-ARITH :MP :X86
                              :LINKAGE-TABLE :RELATIVE-PACKAGE-NAMES :LINUX
                              :GLIBC2 :UNIX :RANDOM-MT19937 :GENCGC :PENTIUM
                              :I486 :HASH-NEW :HEAP-OVERFLOW-CHECK
                              :STACK-CHECKING :COMMON :COMMON-LISP :ANSI-CL
                              :IEEE-FLOATING-POINT :CMU)



0] 
-- 
__Pascal Bourguignon__                     http://www.informatimago.com/
I need a new toy.
Tail of black dog keeps good time.
Pounce! Good dog! Good dog!