Re: [PATCH] Add srfi-171 to guile

["Linus Björnstam" <linus.bjornstam@veryfast.biz>]

[-- Attachment #1: Type: text/plain, Size: 899 bytes --]

I forgot the copyright!

All the papers are in order with the FSF for the copyright assignment.

-- 
  Linus Björnstam

On Sun, 22 Dec 2019, at 15:55, Linus Björnstam wrote:
> Hi there!
> 
> This is a patch to add srfi-171 (transducers) to guile. 
> 
> It adds the srfi implementation, a guile-specific extension (tfold and 
> tbatch which can be used to generalize things like tsegment), 
> documentation (the whole srfi document plus additions into 
> srfi-modules.texi) and tests. 
> 
> I have built it successfully on the latest master. This would be my 
> first ever commit to a project I did not start myself, with the added 
> bonus that I have no idea of how git works. Be kind :)
> 
> Happy holidays! 
>   Linus Björnstam
> Attachments:
> * 0001-Added-srfi-171-to-guile-under-the-module-name-srfi-s.patch
> * 0002-Added-documentation-and-tests-for-srfi-171.patch

[-- Attachment #2: 0001-Added-proper-copyright-to-srfi-171.patch --]
[-- Type: application/octet-stream, Size: 6230 bytes --]

From 12038917c239874baae4baee710419ea2888a86c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Linus=20Bj=C3=B6rnstam?= <linus.bjornstam@fastmail.se>
Date: Sun, 22 Dec 2019 21:42:01 +0100
Subject: [PATCH] Added proper copyright to srfi-171

---
 module/srfi/srfi-171.scm       | 25 +++++++++++++++----------
 module/srfi/srfi-171/gnu.scm   | 16 ++++++++++++++++
 module/srfi/srfi-171/meta.scm  | 24 ++++++++++++++----------
 test-suite/tests/srfi-171.test | 17 +++++++++++++++--
 4 files changed, 60 insertions(+), 22 deletions(-)

diff --git a/module/srfi/srfi-171.scm b/module/srfi/srfi-171.scm
index 7e8dc603f..a2914d7a9 100644
--- a/module/srfi/srfi-171.scm
+++ b/module/srfi/srfi-171.scm
@@ -1,14 +1,19 @@
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Copyright 2019 Linus Björnstam
+;; 	Copyright (C) 2019 Free Software Foundation, Inc.
 ;;
-;; You may use this code under either the license in the SRFI document or the
-;; license below.
-;;
-;; Permission to use, copy, modify, and/or distribute this software for any
-;; purpose with or without fee is hereby granted, provided that the above
-;; copyright notice and this permission notice appear in all source copies.
-;; The software is provided "as is", without any express or implied warranties.
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; This library is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU Lesser General Public
+;; License as published by the Free Software Foundation; either
+;; version 3 of the License, or (at your option) any later version.
+;; 
+;; This library is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; Lesser General Public License for more details.
+;; 
+;; You should have received a copy of the GNU Lesser General Public
+;; License along with this library; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+
 
 
 ;; This module name is guile-specific. The correct module name is of course
diff --git a/module/srfi/srfi-171/gnu.scm b/module/srfi/srfi-171/gnu.scm
index 9aa8ab28e..db4ce76a0 100644
--- a/module/srfi/srfi-171/gnu.scm
+++ b/module/srfi/srfi-171/gnu.scm
@@ -1,3 +1,19 @@
+;; 	Copyright (C) 2019 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
+;; License as published by the Free Software Foundation; either
+;; version 3 of the License, or (at your option) any later version.
+;; 
+;; This library is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; Lesser General Public License for more details.
+;; 
+;; You should have received a copy of the GNU Lesser General Public
+;; License along with this library; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+
 (define-module (srfi srfi-171 gnu)
   #:use-module (srfi srfi-171)
   #:use-module (srfi srfi-171 meta)
diff --git a/module/srfi/srfi-171/meta.scm b/module/srfi/srfi-171/meta.scm
index dd1fd06c4..8f369ef99 100644
--- a/module/srfi/srfi-171/meta.scm
+++ b/module/srfi/srfi-171/meta.scm
@@ -1,14 +1,18 @@
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Copyright 2019 Linus Björnstam
+;; 	Copyright (C) 2019 Free Software Foundation, Inc.
 ;;
-;; You may use this code under either the license in the SRFI document or the
-;; license below.
-;;
-;; Permission to use, copy, modify, and/or distribute this software for any
-;; purpose with or without fee is hereby granted, provided that the above
-;; copyright notice and this permission notice appear in all source copies.
-;; The software is provided "as is", without any express or implied warranties.
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; This library is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU Lesser General Public
+;; License as published by the Free Software Foundation; either
+;; version 3 of the License, or (at your option) any later version.
+;; 
+;; This library is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; Lesser General Public License for more details.
+;; 
+;; You should have received a copy of the GNU Lesser General Public
+;; License along with this library; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 
 
 ;; This module name is guile-specific. The correct name is of course
diff --git a/test-suite/tests/srfi-171.test b/test-suite/tests/srfi-171.test
index c6d574af2..f07941f20 100644
--- a/test-suite/tests/srfi-171.test
+++ b/test-suite/tests/srfi-171.test
@@ -1,5 +1,18 @@
-;; TODO: test all transducers that take an equality predicate
-;; TODO: test treplace with all kinds of hash tables
+;; 	Copyright (C) 2019 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
+;; License as published by the Free Software Foundation; either
+;; version 3 of the License, or (at your option) any later version.
+;; 
+;; This library is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; Lesser General Public License for more details.
+;; 
+;; You should have received a copy of the GNU Lesser General Public
+;; License along with this library; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 
 (define-module (test-srfi-171)
   #:use-module (test-suite lib)
-- 
2.24.1