aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2023-11-02 17:46:05 +0100
committerHugo Hörnquist <hugo@lysator.liu.se>2023-11-16 00:51:19 +0100
commit79a22046c93aa770cb2393a288cb0fab13febed6 (patch)
tree0c2f66212f5e96c3a6e063fe8caebee2cdc78b6d
parentTestrunner: Better messages on XPASS. (diff)
downloadcalp-79a22046c93aa770cb2393a288cb0fab13febed6.tar.gz
calp-79a22046c93aa770cb2393a288cb0fab13febed6.tar.xz
Fix rec advance test.
-rw-r--r--tests/unit/README.md12
-rw-r--r--tests/unit/text/text-numbers.scm10
-rw-r--r--tests/unit/vcomponent/recurrence-advanced.scm2
3 files changed, 23 insertions, 1 deletions
diff --git a/tests/unit/README.md b/tests/unit/README.md
new file mode 100644
index 00000000..e0252627
--- /dev/null
+++ b/tests/unit/README.md
@@ -0,0 +1,12 @@
+Unit tests
+==========
+
+Unit tests are grouped into directories according to what I felt like. The
+groups doesn't actually do anything (except allow easier running of only some).
+
+Each test file is written as a module declaration, since that make Guile
+slightly happier, and should end with a quoted list of modules which are
+explicitly tested in that file. Later, the coverage data from that test
+will be limited to the modules specified. This gives *much* better coverage
+data, and ensures that we actually cover all procedures with tests, instead
+of them being covered by some test "higher up" in the chain.
diff --git a/tests/unit/text/text-numbers.scm b/tests/unit/text/text-numbers.scm
new file mode 100644
index 00000000..c2fb3160
--- /dev/null
+++ b/tests/unit/text/text-numbers.scm
@@ -0,0 +1,10 @@
+;;; for each selected language
+;;; Run all the following tests
+
+;;; number->string-cardinal
+;;; number->string-ordinal
+;;; resolve-language ; TOOD this is a re-export. Is it used anywhere?
+;;; each-string
+
+
+'((text numbers))
diff --git a/tests/unit/vcomponent/recurrence-advanced.scm b/tests/unit/vcomponent/recurrence-advanced.scm
index 41e4770e..75d1a8fb 100644
--- a/tests/unit/vcomponent/recurrence-advanced.scm
+++ b/tests/unit/vcomponent/recurrence-advanced.scm
@@ -1400,7 +1400,7 @@
bymonthday: (list 15 30)
count: 5)
x-summary:
- "den femtonde & tretionde varje månad, totalt 5 gånger"
+ "den femtonde & trettionde varje månad, totalt 5 gånger"
x-set:
(list (datetime year: 2007 month: 01 day: 15 hour: 09 minute: 00 second: 00)
(datetime year: 2007 month: 01 day: 30 hour: 09 minute: 00 second: 00)