From 0db40ed289388d049ec9ecfd9661cc1d74a9ef3e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Mon, 19 Jan 2015 22:54:27 +0100
Subject: [PATCH] make-syntactic-constructor kwarg default

---
 guix/records.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/records.scm b/guix/records.scm
index bef8ff861b..8a4d6a7bb6 100644
--- a/guix/records.scm
+++ b/guix/records.scm
@@ -43,7 +43,7 @@
                        form))))
 
 (define* (make-syntactic-constructor type name ctor fields
-                                     #:key thunked defaults)
+                                     #:key (thunked '()) (defaults '()))
   "Make the syntactic constructor NAME for TYPE, that calls CTOR, and expects
 all of FIELDS to be initialized.  DEFAULTS is the list of FIELD/DEFAULT-VALUE
 tuples, and THUNKED is the list of identifiers of thunked fields."