From d1cdea2a2b8b2a37c28690adef0a84c7b29e49d5 Mon Sep 17 00:00:00 2001
From: Gustav Eek <gustav.eek@fripost.org>
Date: Thu, 22 Aug 2024 23:38:29 +0200
Subject: [PATCH] [tools] Tests, add tests for a2cho, simple verse and
 environments

---
 tools/tests/environs.cho | 25 +++++++++++++++++++++++++
 tools/tests/environs.txt | 29 +++++++++++++++++++++++++++++
 tools/tests/verse.cho    |  8 ++++++++
 tools/tests/verse.txt    | 15 +++++++++++++++
 4 files changed, 77 insertions(+)
 create mode 100644 tools/tests/environs.cho
 create mode 100644 tools/tests/environs.txt
 create mode 100644 tools/tests/verse.cho
 create mode 100644 tools/tests/verse.txt

diff --git a/tools/tests/environs.cho b/tools/tests/environs.cho
new file mode 100644
index 0000000..04e2966
--- /dev/null
+++ b/tools/tests/environs.cho
@@ -0,0 +1,25 @@
+{comment: Key Em}
+
+{start_of_verse: 1}
+[Em]   She was [F#m/E]more like
+A [Em]beauty queen -- from a [F#m/E]movie scene
+{end_of_verse}
+
+{start_of_chorus}
+[Em] Billie [F#m/E]Jean is [Em]not my [F#m/E]lover
+[Em] She’s just a [F#m/E]girl
+{end_of_chorus}
+
+{start_of_bridge}
+[Em][F#m/E]
+
+{end_of_bridge}
+
+{start_of_verse: 2}
+ For forty days
+And forty nights -- the law was on her side
+{end_of_verse}
+
+{bridge}
+
+{chorus}
diff --git a/tools/tests/environs.txt b/tools/tests/environs.txt
new file mode 100644
index 0000000..d508096
--- /dev/null
+++ b/tools/tests/environs.txt
@@ -0,0 +1,29 @@
+[Key Em]
+
+[Verse 1]
+
+Em         F#m/E
+   She was more like
+  Em                     F#m/E
+A beauty queen -- from a movie scene
+
+[Chorus]
+
+Em      F#m/E   Em     F#m/E
+ Billie Jean is not my lover
+Em            F#m/E
+ She's just a girl
+
+[Bridge]
+
+Em     F#m/E
+ 
+
+[Verse 2]
+
+ For forty days
+And forty nights -- the law was on her side
+
+[Bridge]
+
+[Chorus]
diff --git a/tools/tests/verse.cho b/tools/tests/verse.cho
new file mode 100644
index 0000000..2d2ac6b
--- /dev/null
+++ b/tools/tests/verse.cho
@@ -0,0 +1,8 @@
+[Em]   She was [F#m/E]more like
+A [Em]beauty queen -- from a [F#m/E]movie scene
+[Em]   I said [F#m/E]don’t mind,
+But what [Em]do you mean, [F#m/E]      I am the [Am7]one?
+Who will dance on the floor, in the [Em]round [F#m/E]
+
+[Em]   She said, [F#m/E]      I am the [Am7]one
+Who will dance on the floor     in the [Em]round [F#m/E]
diff --git a/tools/tests/verse.txt b/tools/tests/verse.txt
new file mode 100644
index 0000000..c0302ac
--- /dev/null
+++ b/tools/tests/verse.txt
@@ -0,0 +1,15 @@
+Em         F#m/E
+   She was more like
+  Em                     F#m/E
+A beauty queen -- from a movie scene
+Em        F#m/E
+   I said don't mind,
+         Em           F#m/E          Am7
+But what do you mean,       I am the one?
+                                    Em    F#m/E
+Who will dance on the floor, in the round  
+
+Em           F#m/E          Am7
+   She said,       I am the one
+                                       Em    F#m/E
+Who will dance on the floor     in the round  
-- 
2.39.2