;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*-
(declaim (optimize (speed 0) (safety 3) (debug 3)))

(in-package #:music-dispensary)

;; ========================================================================== ;;

(defgeneric absolute-path (file-browser)
  (:documentation "Returns the absolute path of `file-browser'."))

(defgeneric update-relative-path (file-browser node)
  (:documentation "Updates `relative-path' of `file-browser' by adding
a `node' to it. If `node' is '..', `relative-path' is reduced a
level."))

(defgeneric directory-list (file-browser)
  (:documentation ""))