anchor.diff:  
       (unless expand-pathname
         (return-from expansion-for-words
  -        (fset:image #'concat-fragments result)))
  +        (values (fset:image #'concat-fragments result)
  +                exit-infos)))
   
       (let ((pathname-expansion-results (fset:empty-seq)))
         (fset:do-seq (fragments result)
           (fset:appendf pathname-expansion-results (expand-pathname fragments)))
  -      pathname-expansion-results)))
  +      (values pathname-expansion-results
  +              exit-infos))))
   
   (defstruct wild-path
     "This struct represents a path which may have components which
  
positive.code:     (fset:seq (make-string-fragment \"foo\") (make-string-fragment \"bar\" :literal t))
  
  Use word boundaries responsibly.  Check with `*split-fields*' before
  you insert them into your return value."))
  
  (defmethod expand ((thing string))
    (fset:seq (make-string-fragment thing :literal t)))
  
negative.code:                (setf less-first (expand-aliases less-first)))
               (setf remaining (fset:concat (alias-words alias) less-first))))))))
  
  (defun ensure-exit-info-seq (value)
    (etypecase value
      (null
       (fset:empty-seq))
      (exit-info
       (fset:seq value))
      (fset:seq
       value)))
  
  (defun expansion-for-words (things &key expand-aliases expand-pathname (split-fields t))
    "Perform expansion on a sequence of tokens.
  
  This always performs the expansion done by the `expand' generic
  function.  Alias expansion and pathname (glob-style) expansion are
  optional and enabled by keyword arguments.
  
  The first return value is an `fset:seq' of strings representing the
  expanded content.  The second return value is an `fset:seq' of
  `exit-info' objects that were generated while expanding the tokens.
  The `exit-info' objects are in the order that they were encountered.
  
  For example, expanding \"$(true) stuff* goes{a,b} $(false) here\"
  could produce the following return values.
      (fset:seq \"stuffAndThings\" \"goesa\" \"goesb\" \"here\")
      (fset:seq (truthy-exit-info) (falsey-exit-info))
  
  The value of the `split-fields' keyword argument is bound to the
  `*split-fields*' special variable.  See that variable's documentation
  