From 68d2cc3bb635e117603eb41fc892c9c92a625fb9 Mon Sep 17 00:00:00 2001 From: "Basil L. Contovounesios" Date: Wed, 11 Jul 2018 20:11:55 +0300 Subject: [PATCH] ; Add commentary on location of zerop * lisp/subr.el (zerop): Add commentary explaining why moving the function's location within the file broke bootstrap in 2018-07-10T23:08:58-07:00!eggert@cs.ucla.edu [babe0d4508]. [babe0d4508]: 2018-07-10 23:08:58 -0700 ; Rearrange definition of zerop in subr.el https://git.savannah.gnu.org/cgit/emacs.git/\ commit/?id=babe0d4508273c5fe0a3228b3d2b4d3dcb72cd58 --- lisp/subr.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/subr.el b/lisp/subr.el index c1d90e3fb1..a5108eb655 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -548,6 +548,9 @@ nbutlast (if (> n 0) (setcdr (nthcdr (- (1- m) n) list) nil)) list)))) +;; This function appears here instead of under the 'Basic Lisp +;; functions' heading because during bootstrap its compiler-macro +;; requires functions defined under the 'List functions' heading. (defun zerop (number) "Return t if NUMBER is zero." ;; Used to be in C, but it's pointless since (= 0 n) is faster anyway because -- 2.18.0