mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-14 15:40:19 +02:00
Code Activity

Merge remote-tracking branch 'origin/stable-2.0'

Browse source 
Conflicts:
	module/srfi/srfi-9.scm
	module/web/server.scm
This commit is contained in:
Mark H Weaver 2013-09-13 00:24:04 -04:00
commit c04bf4337b
9 changed files with 68 additions and 52 deletions
Download patch file Download diff file Expand all files Collapse all files

5
module/srfi/srfi-9.scm
View file

@ -1,6 +1,7 @@
;;; srfi-9.scm --- define-record-type
;; Copyright (C) 2001, 2002, 2006, 2009, 2010, 2011, 2012, 2013 Free Software Foundation, Inc.
;; Copyright (C) 2001, 2002, 2006, 2009, 2010, 2011, 2012,
;; 2013 Free Software Foundation, Inc.
;;
;; This library is free software; you can redistribute it and/or
;; modify it under the terms of the GNU Lesser General Public
@ -122,6 +123,8 @@
#'((lambda (formals ...)
body ...)
args ...))
((_ a (... ...))
(syntax-violation 'name "Wrong number of arguments" x))
(_
(identifier? x)
#'proc-name))))))))))