doc/list-exports.lisp: Collect symbols from frontend.lisp.

diff --git a/doc/list-exports.lisp b/doc/list-exports.lisp
index bcbf79fbd5e1c1c5163f2e41b3e1bc273e19168f..93ee8beabcf0b7936c4b2b57f0b55b6d036340eb 100644 (file)
--- a/doc/list-exports.lisp
+++ b/doc/list-exports.lisp
@@ -346,8 +346,10 @@ (defun report-project-symbols ()
         (utilities (by-name sod "utilities"))
         (sod-frontend (asdf:find-system "sod-frontend"))
         (optparse (by-name sod-frontend "optparse"))
         (utilities (by-name sod "utilities"))
         (sod-frontend (asdf:find-system "sod-frontend"))
         (optparse (by-name sod-frontend "optparse"))

+        (frontend (by-name sod-frontend "frontend"))

         (sod-files (set-difference (files sod) (list utilities))))
     (report-symbols (mapcar #'file-name sod-files) "SOD")
         (sod-files (set-difference (files sod) (list utilities))))
     (report-symbols (mapcar #'file-name sod-files) "SOD")

+    (report-symbols (mapcar #'file-name (list frontend)) "SOD-FRONTEND")

     (report-symbols (mapcar #'file-name parser-files) "SOD-PARSER")
     (report-symbols (mapcar #'file-name (list optparse)) "OPTPARSE")
     (report-symbols (mapcar #'file-name (list utilities)) "SOD-UTILITIES"))))
     (report-symbols (mapcar #'file-name parser-files) "SOD-PARSER")
     (report-symbols (mapcar #'file-name (list optparse)) "OPTPARSE")
     (report-symbols (mapcar #'file-name (list utilities)) "SOD-UTILITIES"))))