chickadee » posix-extras » stat-directory?

stat-directory? sprocedure

Like directory? but for stat vectors.

(stat-directory? (file-stat "~/.emacs.d"))
; => #t