[armedbear] #451: DIRECTORY errors with wildcard directory

[armedbear]

#451: DIRECTORY errors with wildcard directory
-------------------------+------------------------
 Reporter:  mevenson     |           Owner:
     Type:  defect       |          Status:  new
 Priority:  minor        |       Milestone:  1.6.0
Component:  interpreter  |         Version:
 Keywords:  pathname     |  Parent Tickets:
-------------------------+------------------------
 In <https://mailman.common-lisp.net/pipermail/armedbear-
 devel/2017-July/003870.html>, Mark Cox notes that

 {{{
 (directory (merge-pathnames (make-pathname :directory
                                            '(:relative :wild))
                             (user-homedir-pathname)))
 }}}

 errors with

 {{{
 The value NIL is not of type (OR PATHNAME
                                  STRING
                                  FILE-STREAM
                                  SYSTEM:JAR-STREAM
                                  SYSTEM:URL-STREAM).
    [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 {7EA9D89E}>)
   1: org.armedbear.lisp.Lisp.error(Lisp.java:382)
   2: org.armedbear.lisp.Lisp.type_error(Lisp.java:435)
   3: (PATHNAME NIL)
   4: (PATHNAME-MATCH-P "adbkey" NIL)
   5: (DIRECTORY #P"/Users/evenson/*/")
 }}}

--
Ticket URL: <http://abcl.org/trac/ticket/451>
armedbear <http://abcl.org>
armedbear