* [PATCH] Remove a redundant declaration of when/unless
@ 2018-04-17 14:12 Mike Gran
0 siblings, 0 replies; only message in thread
From: Mike Gran @ 2018-04-17 14:12 UTC (permalink / raw)
To: guile-devel
* module/scripts/snarf-check-and-output-texi.scm (when, unless): removed
---
module/scripts/snarf-check-and-output-texi.scm | 10 +---------
1 file changed, 1 insertion(+), 9 deletions(-)
diff --git a/module/scripts/snarf-check-and-output-texi.scm b/module/scripts/snarf-check-and-output-texi.scm
index 82d71f4a9..b3101d767 100644
--- a/module/scripts/snarf-check-and-output-texi.scm
+++ b/module/scripts/snarf-check-and-output-texi.scm
@@ -1,6 +1,6 @@
;;; snarf-check-and-output-texi --- called by the doc snarfer.
-;; Copyright (C) 2001, 2002, 2006, 2011, 2014 Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2002, 2006, 2011, 2014, 2018 Free Software Foundation, Inc.
;;
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the GNU Lesser General Public License
@@ -29,14 +29,6 @@
(define %include-in-guild-list #f)
(define %summary "Transform snarfed .doc files into texinfo documentation.")
-;;; why aren't these in some module?
-
-(define-macro (when cond . body)
- `(if ,cond (begin ,@body)))
-
-(define-macro (unless cond . body)
- `(if (not ,cond) (begin ,@body)))
-
(define *manual-flag* #f)
(define (snarf-check-and-output-texi . flags)
--
2.14.3
^ permalink raw reply related [flat|nested] only message in thread
only message in thread, other threads:[~2018-04-17 14:12 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2018-04-17 14:12 [PATCH] Remove a redundant declaration of when/unless Mike Gran
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).