[问题记录] cl-api 在 CCL 中生成的文档无内容

安装了 cl-api ,中间还出现了 standard-method 和 standard-class 的名字冲突

CL-USER> (ql:quickload "cl-api")
To load "cl-api":
  Load 1 ASDF system:
    cl-ppcre
  Install 3 Quicklisp releases:
    alexandria cl-api closer-mop
; Fetching #<URL "http://beta.quicklisp.org/archive/closer-mop/2013-07-20/closer-mop-20130720-darcs.tgz">
; 24.22KB
==================================================
24,804 bytes in 4.25 seconds (5.71KB/sec)
; Fetching #<URL "http://beta.quicklisp.org/archive/alexandria/2013-01-28/alexandria-20130128-git.tgz">
; 48.22KB
==================================================
49,374 bytes in 8.16 seconds (5.91KB/sec)
; Fetching #<URL "http://beta.quicklisp.org/archive/cl-api/2011-06-19/cl-api-20110619-http.tgz">
; 5.31KB
==================================================
5,439 bytes in 0.00 seconds (6446.02KB/sec)
; Loading "cl-api"
[package alexandria.0.dev]........................
..................................................
..................................................
[package closer-mop]..............................
[package closer-common-lisp]......................
[package closer-common-lisp-user].................
..................................................
[package cl-api]
Invoking restart: SHADOWING-IMPORT one of each pair of conflicting symbols.
Shadowing-import one of the following in #<Package "CL-API">:
  0: CLOSER-MOP:STANDARD-METHOD
  1: STANDARD-METHOD
Selection [number,q,r,?]: 1
Shadowing-import one of the following in #<Package "CL-API">:
  0: CLOSER-MOP:STANDARD-CLASS
  1: STANDARD-CLASS
Selection [number,q,r,?]: 1
...
("cl-api")
CL-USER>

然后按照说明执行如下代码:

CL-USER> (cl-api:api-gen :clonsigna #P "~/ecode/"
         :exclude-func (lambda (s) (or (starts-with "imap" 
                                                     (format nil "~a" s))
                                        (starts-with "bodystructure" 
                                                     (format nil "~a" s))
                                        (starts-with "structure"
                                                     (format nil "~a" s))))

;Compiler warnings :
;   In an anonymous lambda form: Undefined function STARTS-WITH
;   In an anonymous lambda form: Undefined function STARTS-WITH
;   In an anonymous lambda form: Undefined function STARTS-WITH
Generation complete: "/Users/admin/ecode/format.html"
NIL
CL-USER> 

结果出来了, html文件也生成了,但是却没有具体内容, 只有 :

:undocumented