mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-07-04 16:50:25 +02:00
Code Activity

remove a re-definition of when/unless

Browse source 
They are now in core library.

* module/scripts/snarf-check-and-output-texi.scm (when, unless): removed
This commit is contained in:
Michael Gran 2018-04-16 19:19:24 -07:00
parent 7b6c483595
commit 851c05a584
1 changed files with 1 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

10
module/scripts/snarf-check-and-output-texi.scm
View file

@ -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)