[Guile-commits] 02/02: remove a re-definition of when/unless

[Mike Gran]

mike121 pushed a commit to branch wip-mingw-guile-2.2
in repository guile.

commit 851c05a58498431720a98d3219e9a392ab9364a5
Author: Michael Gran <address@hidden>
Date:   Mon Apr 16 19:19:24 2018 -0700

    remove a re-definition of when/unless
    
    They are now in core library.
    
    * 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 82d71f4..b3101d7 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)