From 7dd9f1c93711bc8e099d932058357474956e2ee8 Mon Sep 17 00:00:00 2001 From: "W. Kosior" Date: Sat, 27 Jul 2024 22:18:34 +0200 Subject: Revert "Test syntactic sugar for initializing fields with list-values." This reverts commit c16ddd31b95bfbae290c01aac06c4992b01829fb. --- tests/guile/de-paul-records-test.scm | 17 ++--------------- 1 file changed, 2 insertions(+), 15 deletions(-) diff --git a/tests/guile/de-paul-records-test.scm b/tests/guile/de-paul-records-test.scm index fff1606..7bcc60d 100644 --- a/tests/guile/de-paul-records-test.scm +++ b/tests/guile/de-paul-records-test.scm @@ -26,7 +26,6 @@ is-scheme? #:export? yes,ofcourse (is-syntactically-scoped? #:default #f) - (authors #:default '()) #:finalize (lambda (the-lisp) (set-field the-lisp (lisp-is-syntactically-scoped?) @@ -50,7 +49,7 @@ '*lisp)) (test-group "lisp paren-3001" - (tu:test-equal '(#f () "paren-3001" #f) + (tu:test-equal '(#f "paren-3001" #f) (eval '(begin (define %paren-3001 (lisp (is-scheme? #f) @@ -58,12 +57,10 @@ (match %paren-3001 (($* lisp - authors is-syntactically-scoped? name is-scheme?) (list is-syntactically-scoped? - authors name is-scheme?)))) (test-env 'lisp))) @@ -86,7 +83,6 @@ (name #:-> ((const 'test-noop)) (string-append name ".1")) - (authors #:list "Jane Doe") (is-syntactically-scoped? #t))) (match `(a . ,%paren-3001.1) @@ -99,11 +95,7 @@ '(match (vector %paren-3001.1) (#(($* lisp is-scheme? name)) (list is-scheme? name))) - (test-env 'lisp))) - - (tu:test-equal '("Jane Doe") - (eval '(lisp-authors %paren-3001.1) - (test-env 'lisp)))) + (test-env 'lisp)))) (test-group "lisp paren-3003" (tu:test-equal '(#t #t) @@ -113,7 +105,6 @@ (let ((name "paren-3003")) (lisp #:<- (lisp) name - (authors #:list "Jane Doe" "John Smith") (is-scheme? (string-suffix? "-3003" name))))) (match %paren-3003 @@ -123,10 +114,6 @@ (tu:test-equal "paren-3003" (eval '(lisp-name %paren-3003) - (test-env 'lisp))) - - (tu:test-equal '("Jane Doe" "John Smith") - (eval '(lisp-authors %paren-3003) (test-env 'lisp)))) (test-group "lisp paren-3004" -- cgit v1.2.3 title='2023-05-01 12:39:11 -0400'>2023-05-01Makefile.am: Auto-configure Git on 'make'.Maxim Cournoyer This means we do not need to worry anymore about manually syncing the pre-push git hook or the Guix-provided git configuration. * etc/git/gitconfig: Augment configuration template with useful options to allow for auto-configuration. * Makefile.am (.git/hooks/pre-push, .git/config): New targets. (nodist_noinst_DATA): New primary variable holding the above targets. 2021-10-14Add git configuration templates to improve diff hunk header detection.Sarah Morgensen This is a follow-up to commit 9fc8ae4171e5da4939a64fc6d684c8b9d85bbe84, which missed two hunks from <https://issues.guix.gnu.org/50363>. Reported by hackeryarn on #guix. * .gitattributes, etc/git/gitconfig: New files. Signed-off-by: Marius Bakke <marius@gnu.org>