[armedbear] #472: CL:DIRECTORY with wild-inferiors failure

[armedbear]

#472: CL:DIRECTORY with wild-inferiors failure
-------------------------------+---------------------------
      Reporter:  Mark Evenson  |       Type:  defect
        Status:  new           |   Priority:  major
     Milestone:  1.7.2         |  Component:  other
       Version:  1.7.2-dev     |   Keywords:  pathname ansi
Parent Tickets:                |
-------------------------------+---------------------------
 {{{
 (directory "/tmp/**")
 }}}

 {{{
 The value NIL is not of type FIXNUM.
    [Condition of type TYPE-ERROR]

 Restarts:
  0: [RETRY] Retry SLIME REPL evaluation request.
  1: [*ABORT] Return to SLIME's top level.
  2: [ABORT] Abort thread.

 Backtrace:
   0: (INVOKE-DEBUGGER #<TYPE-ERROR {7ED158A9}>)
   1: org.armedbear.lisp.Lisp.error(Lisp.java:382)
   2: (POSITION-IF #<LOCAL-FUNCTION IN COMPONENT-MATCH-WILD-P {7BF6BC72}>
 "**" :START NIL)
   3: (SYSTEM::COMPONENT-MATCH-WILD-P "com.apple.launchd" "**" NIL)
   4: (SYSTEM::COMPONENT-MATCH-P "com.apple.launchd" "**" NIL)
   5: (PATHNAME-MATCH-P "com.apple.launchd.cyc79CMFEO" "**")
   6: (DIRECTORY "/tmp/**")
   7: (SYSTEM::%EVAL (DIRECTORY "/tmp/**"))
 }}}

-- 
Ticket URL: <https://abcl.org/trac/ticket/472>
armedbear <https://abcl.org>
armedbear