From 53be15015a316848fd92e79bc95361ebfa775b9d Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Fri, 5 Feb 2016 22:55:16 -0500
Subject: [PATCH] Relocated

---
 begin-tests.scm             | 10 ----------
 examples/begin-splicing.scm | 15 +++++++++++++++
 2 files changed, 15 insertions(+), 10 deletions(-)
 delete mode 100644 begin-tests.scm
 create mode 100644 examples/begin-splicing.scm

diff --git a/begin-tests.scm b/begin-tests.scm
deleted file mode 100644
index e8a6ab56..00000000
--- a/begin-tests.scm
+++ /dev/null
@@ -1,10 +0,0 @@
-;; An example of using begin to splice in definitions
-(import (scheme base ) 
-        (scheme write))
-
-(begin
-  (define tmp1 1)
-  (define tmp2 2))
-
-(write `(,tmp1 ,tmp2))
-
diff --git a/examples/begin-splicing.scm b/examples/begin-splicing.scm
new file mode 100644
index 00000000..ecdd25b3
--- /dev/null
+++ b/examples/begin-splicing.scm
@@ -0,0 +1,15 @@
+;; An example of using begin to splice in definitions. As the 
+;; spec states:
+;;
+;; "It causes the contained expressions and definitions to be
+;;  evaluated exactly as if the enclosing begin construct were
+;;  not present."
+(import (scheme base ) 
+        (scheme write))
+
+(begin
+  (define tmp1 1)
+  (define tmp2 2))
+
+(write `(,tmp1 ,tmp2))
+