From 88e703084567eb99238a3be6ba4285d87a25eeae Mon Sep 17 00:00:00 2001
From: Mikael Djurfeldt <mikael@djurfeldt.com>
Date: Sun, 4 Apr 2021 20:16:58 +0200
Subject: Fix typos in examples.

Thanks to Eugene Klimov.
---
 examples/box-dynamic-module/box.c | 2 +-
 examples/box-dynamic/box.c        | 2 +-
 examples/box/box.c                | 4 ++--
 examples/modules/README           | 2 +-
 examples/web/debug-sxml.scm       | 2 +-
 5 files changed, 6 insertions(+), 6 deletions(-)

(limited to 'examples')

diff --git a/examples/box-dynamic-module/box.c b/examples/box-dynamic-module/box.c
index 8cf940909..b950e019a 100644
--- a/examples/box-dynamic-module/box.c
+++ b/examples/box-dynamic-module/box.c
@@ -55,7 +55,7 @@ print_box (SCM b, SCM port, scm_print_state *pstate)
 }
 
 
-/* This defines the primitve `make-box', which returns a new smob of
+/* This defines the primitive `make-box', which returns a new smob of
    type `box', initialized to `#f'.  */
 static SCM
 #define FUNC_NAME "make-box"
diff --git a/examples/box-dynamic/box.c b/examples/box-dynamic/box.c
index 7bc791613..4954e88ba 100644
--- a/examples/box-dynamic/box.c
+++ b/examples/box-dynamic/box.c
@@ -55,7 +55,7 @@ print_box (SCM b, SCM port, scm_print_state *pstate)
 }
 
 
-/* This defines the primitve `make-box', which returns a new smob of
+/* This defines the primitive `make-box', which returns a new smob of
    type `box', initialized to `#f'.  */
 static SCM
 #define FUNC_NAME "make-box"
diff --git a/examples/box/box.c b/examples/box/box.c
index 53c022ab1..f9b3a55a7 100644
--- a/examples/box/box.c
+++ b/examples/box/box.c
@@ -55,7 +55,7 @@ print_box (SCM b, SCM port, scm_print_state *pstate)
 }
 
 
-/* This defines the primitve `make-box', which returns a new smob of
+/* This defines the primitive `make-box', which returns a new smob of
    type `box', initialized to `#f'.  */
 static SCM
 #define FUNC_NAME "make-box"
@@ -109,7 +109,7 @@ box_set_x (SCM b, SCM value)
 
 
 /* Create and initialize the new smob type, and register the
-   primitives withe the interpreter library.  */
+   primitives with the interpreter library.  */
 static void
 init_box_type (void)
 {
diff --git a/examples/modules/README b/examples/modules/README
index ddad881cc..80569c98d 100644
--- a/examples/modules/README
+++ b/examples/modules/README
@@ -17,7 +17,7 @@ installed and available with the standard installation prefix
 
   The main program, which uses the modules described below to perform
   some actions.  Module usage and selective importing as well as
-  renaming is demonstrated here.n
+  renaming is demonstrated here.
 
   $ ./main
 
diff --git a/examples/web/debug-sxml.scm b/examples/web/debug-sxml.scm
index 724a9bd6c..5970c47d3 100644
--- a/examples/web/debug-sxml.scm
+++ b/examples/web/debug-sxml.scm
@@ -1,6 +1,6 @@
 ;;; Commentary:
 
-;;; A simple debugging server that responds to all responses with a
+;;; A simple debugging server that responds to all requests with a
 ;;; table containing the headers given in the request.
 ;;;
 ;;; As a novelty, this server uses a little micro-framework to build up
-- 
cgit v1.2.1