branch: externals/queue
commit bbc4df92e5ae1dab5caf0932b63f8afae00c22f3
Author: Toby S. Cubitt <[email protected]>
Commit: Toby S. Cubitt <[email protected]>
Fix buggy queue-empty and queue-first definitions.
Should be defun's instead of macros (or else require backticks).
---
queue.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/queue.el b/queue.el
index 72311fa..4c9c954 100644
--- a/queue.el
+++ b/queue.el
@@ -5,7 +5,7 @@
;; Author: Inge Wallin <[email protected]>
;; Toby Cubitt <[email protected]>
;; Maintainer: Toby Cubitt <[email protected]>
-;; Version: 0.1
+;; Version: 0.1.1
;; Keywords: extensions, data structures, queue
;; URL: http://www.dr-qubit.org/emacs.php
;; Repository: http://www.dr-qubit.org/git/predictive.git
@@ -88,12 +88,12 @@ Returns nil if the queue is empty."
(pop (queue-head queue)))
-(defmacro queue-empty (queue)
+(defun queue-empty (queue)
"Return t if QUEUE is empty, otherwise return nil."
(null (queue-head queue)))
-(defmacro queue-first (queue)
+(defun queue-first (queue)
"Return the first element of QUEUE or nil if it is empty,
without removing it from the QUEUE."
(car (queue-head queue)))
