code.delx.au - gnu-emacs-elpa/blob - chess-maint.el

   1 (add-to-list 'load-path ".")
   2
   3 (require 'pp)
   4 (require 'chess)
   5 (require 'chess-pgn)
   6
   7 (defmacro assert (form)
   8   (unless (byte-compiling-files-p)
   9     `(unless ,form
  10        (error "Assertion failed: %s" (pp-to-string ,form)))))
  11
  12 (defun chess-generate-texinfo-file ()
  13   (require 'lispdoc)
  14   (require 'texinfo)
  15   (with-temp-buffer
  16     (insert-file-contents-literally "chess.texi")
  17     (texinfo-mode)
  18     (require 'chess-algebraic)
  19     (require 'chess-display)
  20     (require 'chess-engine)
  21     (require 'chess-fen)
  22     (require 'chess-game)
  23     (require 'chess-pgn)
  24     (require 'chess-ply)
  25     (require 'chess-pos)
  26     (require 'chess-random)
  27     (require 'chess-var)
  28     (require 'chess)
  29     (texinfo-insert-node-lines (point-min) (point-max) t)
  30     (texinfo-every-node-update)
  31     (texinfo-all-menus-update t)
  32     (texinfo-every-node-update)
  33     (texinfo-all-menus-update t)
  34     (update-lispdoc-tags)
  35     (write-file "chess-final.texi")))