Lines Matching defs:nil
68 (defgroup lm nil
84 (defvar lm-board-width nil
86 (defvar lm-board-height nil
89 (defvar lm-board nil
92 (defvar lm-vector-length nil
95 (defvar lm-draw-limit nil
159 (defcustom lm-mode-hook nil
160 "If non-nil, its value is called on entry to Lm mode."
164 (defvar lm-mode-map nil
167 (if lm-mode-map nil
252 is non-nil. One interesting value is `turn-on-font-lock'."
272 (defvar lm-score-table nil
308 (defconst nil-score 7 "Score of an empty qtuple.")
343 (vector nil-score Xscore XXscore XXXscore XXXXscore 0
367 "Compute index of free square with highest score, or nil if none."
401 ;; nil-score. Therefore, the score of any square is nil-score times the number
404 ;; consuming, we initialize every square with 20*nil-score and then only
410 (defvar lm-saved-score-table nil
413 (defvar lm-saved-board-width nil
416 (defvar lm-saved-board-height nil
428 (make-vector lm-vector-length (* 20 nil-score)))
564 (defvar lm-game-in-progress nil
565 "Non-nil if a game is in progress.")
567 (defvar lm-game-history nil
570 (defvar lm-number-of-moves nil
573 (defvar lm-number-of-human-moves nil
576 (defvar lm-emacs-played-first nil
577 "Non-nil if Emacs played first.")
579 (defvar lm-human-took-back nil
580 "Non-nil if Human took back a move during the game.")
582 (defvar lm-human-refused-draw nil
583 "Non-nil if Human refused Emacs offer of a draw.")
585 (defvar lm-emacs-is-computing nil
587 "Non-nil if Emacs is in the middle of a computation.")
598 (setq lm-emacs-won nil
599 lm-game-history nil
602 lm-emacs-played-first nil
603 lm-human-took-back nil
604 lm-human-refused-draw nil)
608 (setq lm-emacs-is-computing nil))
623 (if dont-update-score nil
626 (setq lm-emacs-is-computing nil))
642 (setq lm-emacs-is-computing nil))
672 (setq lm-game-in-progress nil))
676 (setq lm-emacs-is-computing nil)
1125 ;;;(setq lm-debug nil)
1126 (defvar lm-debug nil
1127 "If non-nil, debugging is printed.")
1128 (defcustom lm-one-moment-please nil
1129 "If non-nil, print \"One moment please\" when a new board is generated.
1135 "If non-nil, output number of moves so far on a move-by-move basis."
1509 (lm-terminate-game nil))
1663 (setf lm-n nil lm-m nil)
1682 ;; Use EQ because SAVED-BOARD-HEIGHT may be nil
1690 ((= parg 1) '(t nil))
1692 ((= parg 3) '(nil t))
1693 ((= parg 4) '(nil nil))
1694 (t '(nil t))))))))