anchor.diff:                :cache-size 10
                 :threading? nil
                 :quicklisp-verbose? t)"
  +
     (let ((result nil))
       (if (not (or max-cols-supplied?  max-repos-supplied?
                    cache-size-supplied? clear-cache-supplied?
  
positive.code: ;;--------------------------------------------------------------------
  
  (defun ? (search-word &rest options)
    "? is abbreviation wrapper for function QUICKSEARCH.
  SEARCH-WORD must be a string, number or symbol.
  OPTIONS must be a non-negative integer (as Cut-Off) and/or some keywords which consists of some Option-Chars.
  
  Options:
   * Cut-Off:
  
negative.code: (defparameter *cut-off* 50)
  (defparameter *print-search-results?* nil)
  
  (defun quicksearch (search-word &key (?web         t)
                                       (?description nil)
                                       (?url         nil)
                                       (?cut-off     50)
                                       (?quicklisp   t)
                                       (?cliki       t)
                                       (?github      t)
                                       (?bitbucket   t))
  
    "Search for CL projects with `search-word' in Quicklisp, Cliki, GitHub
  and BitBucket. `search-word' must be a string, number or symbol (symbol
  will be automatically converted into downcase-string).
  
  Keywords:
   * If `?web' is NIL, it does not search in Cliki, GitHub and BitBucket.
   * If `?quicklisp' is NIL, it does not search in Quicklisp (also
     `?cliki', `?github', `?bitbucket').
   * At least one search-space must be specified.
   * If `?description' is T, it displays project's descriptions (except
     for Quicklisp-search).
   * If `?url' is T, it display project's url.
   * `?cut-off' is the max number of printing repositories each space.
  
  Note:
   * keyword `?cut-off' controls only printing results, nothing to do with
     the maximum number of fetching repositories (c.f. function CONFIG
     documentation).
  
   * About #\\Space in `search-word':
     In case `search-word' contains #\\Space, Quicklisp-search is
     OR-search, whereas Cliki-search, GitHub-, BitBucket- is AND-search.
     e.g. (quicksearch \"foo bar\")
          Quicklisp-search for \"foo\" OR \"bar\",
          Cliki-search, GitHub-, BitBucket- for \"foo\" AND \"bar\"."
  