summaryrefslogtreecommitdiff
path: root/module/rnrs
diff options
context:
space:
mode:
authorJulian Graham <julian.graham@aya.yale.edu>2010-03-27 15:28:24 -0400
committerJulian Graham <julian.graham@aya.yale.edu>2010-05-20 21:18:03 -0400
commita725e27bdaeef13c14006f46200130467a5571d5 (patch)
tree62c60ea33905f485315c06b8842ebd5cd7026356 /module/rnrs
parent3d5bc1ad6f2eed56acddf9c2fe2d4ddf548be4f0 (diff)
downloadguile-a725e27bdaeef13c14006f46200130467a5571d5.tar.gz
Implementation for the (rnrs mutable-pairs) and (rnrs mutable-strings)
libraries. * module/Makefile.am: Add rnrs/6/mutable-pairs.scm and rnrs/6/mutable-strings.scm to RNRS_SOURCES. * module/rnrs/6/mutable-pairs.scm: New file. * module/rnrs/6/mutable-strings.scm: New file.
Diffstat (limited to 'module/rnrs')
-rw-r--r--module/rnrs/6/mutable-pairs.scm22
-rw-r--r--module/rnrs/6/mutable-strings.scm22
2 files changed, 44 insertions, 0 deletions
diff --git a/module/rnrs/6/mutable-pairs.scm b/module/rnrs/6/mutable-pairs.scm
new file mode 100644
index 000000000..3e5da142f
--- /dev/null
+++ b/module/rnrs/6/mutable-pairs.scm
@@ -0,0 +1,22 @@
+;;; mutable-pairs.scm --- The R6RS mutable pair library
+
+;; Copyright (C) 2010 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
+^L
+
+(library (rnrs mutable-pairs (6))
+ (export set-car! set-cdr!)
+ (import (only (guile) set-car! set-cdr!)))
diff --git a/module/rnrs/6/mutable-strings.scm b/module/rnrs/6/mutable-strings.scm
new file mode 100644
index 000000000..1eeb8f35c
--- /dev/null
+++ b/module/rnrs/6/mutable-strings.scm
@@ -0,0 +1,22 @@
+;;; mutable-strings.scm --- The R6RS mutable string library
+
+;; Copyright (C) 2010 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
+^L
+
+(library (rnrs mutable-strings (6))
+ (export string-set! string-fill!)
+ (import (only (guile) string-set! string-fill!)))