commit 0da0ce7d43f8b34a668ee187f2e055e7a0939d3e
parent c80b0ff59df1d4326151a07a1351b67ff0201484
Author: Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
Date: Mon, 24 Aug 2015 10:14:29 +0200
Fix typo: "an SRFI" to "a SRFI".
Diffstat:
2 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/srfi-123.html b/srfi-123.html
@@ -33,7 +33,7 @@ class="antispam">nospam</span>srfi.schemers.org</a></code>. To subscribe to the
<p>To accommodate, we define a pair of generic accessor operators that work through type-based dynamic dispatch: <code>(ref object field)</code>, and <code>(ref* object field1 field2 ...)</code> for chained access.</p>
<pre><code>(ref #(a b c) 1) ;=> b
(ref* #(a (x y #u8(1 2 3)) c) 1 2 0) ;=> 1</code></pre>
-<p>We define <code>~</code> as a synonym to <code>ref*</code>, and define an SRFI-17 setter for it.</p>
+<p>We define <code>~</code> as a synonym to <code>ref*</code>, and define a SRFI-17 setter for it.</p>
<pre><code>(define struct #(a (x y #u8(1 2 3)) c))
(set! (~ struct 1 2 0) 4)
struct ;=> #(a (x y #u8(4 2 3)) c)</code></pre>
diff --git a/srfi-123.md b/srfi-123.md
@@ -59,7 +59,7 @@ work through type-based dynamic dispatch: `(ref object field)`, and
(ref #(a b c) 1) ;=> b
(ref* #(a (x y #u8(1 2 3)) c) 1 2 0) ;=> 1
-We define `~` as a synonym to `ref*`, and define an SRFI-17 setter for
+We define `~` as a synonym to `ref*`, and define a SRFI-17 setter for
it.
(define struct #(a (x y #u8(1 2 3)) c))