mds-kbdc: process includes

Signed-off-by: Mattias Andrée <maandree@operamail.com>

8 files changed, 91 insertions, 0 deletions

diff --git a/test-files/mds-kbdc/process-includes/invalid/_error b/test-files/mds-kbdc/process-includes/invalid/_error
new file mode 100644
index 0000000..aa42b42
--- /dev/null
+++ b/test-files/mds-kbdc/process-includes/invalid/_error
@@ -0,0 +1,2 @@
+[.]
+
diff --git a/test-files/mds-kbdc/process-includes/invalid/include_error b/test-files/mds-kbdc/process-includes/invalid/include_error
new file mode 100644
index 0000000..cec9385
--- /dev/null
+++ b/test-files/mds-kbdc/process-includes/invalid/include_error
@@ -0,0 +1,31 @@
+include "_error"
+
+# (include (@ 1 0-7) ‘/home/mattias/git/mds/test-files/mds-kbdc/process-includes/invalid/_error’
+#   (.inner
+#     (map (@ 1 0-0)
+#       (.sequence
+#         (nothing (@ 1 1-2))
+#       )
+#       (.result nil)
+#     )
+#   )
+# )
+# .../test-files/mds-kbdc/process-includes/invalid/_error:1:0–1: warning: alternated value statement is undefined unless the alternatives are identical
+#  [.]
+#  ^
+# .../test-files/mds-kbdc/process-includes/invalid/include_error:1:0–7: note: included from here
+#  include "_error"
+#  ^^^^^^^
+# .../test-files/mds-kbdc/process-includes/invalid/_error:1:0–1: warning: singleton alternation
+#  [.]
+#  ^
+# .../test-files/mds-kbdc/process-includes/invalid/include_error:1:0–7: note: included from here
+#  include "_error"
+#  ^^^^^^^
+# .../test-files/mds-kbdc/process-includes/invalid/_error:1:1–2: error: nothing in value statement
+#  [.]
+#   ^
+# .../test-files/mds-kbdc/process-includes/invalid/include_error:1:0–7: note: included from here
+#  include "_error"
+#  ^^^^^^^
+
diff --git a/test-files/mds-kbdc/process-includes/invalid/include_nonexisting b/test-files/mds-kbdc/process-includes/invalid/include_nonexisting
new file mode 100644
index 0000000..9ff0f5c
--- /dev/null
+++ b/test-files/mds-kbdc/process-includes/invalid/include_nonexisting
@@ -0,0 +1,11 @@
+include "this file does not exist"
+
+# (include (@ 1 0-7) ‘this file does not exist’
+#   (.inner nil)
+# )
+# this file does not exist: error: no such file or directory in ‘.../test-files/mds-kbdc/process-includes/invalid’
+# 
+# .../test-files/mds-kbdc/process-includes/invalid/include_nonexisting:1:0–7: note: included from here
+#  include "this file does not exist"
+#  ^^^^^^^
+
diff --git a/test-files/mds-kbdc/process-includes/valid/_empty b/test-files/mds-kbdc/process-includes/valid/_empty
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/test-files/mds-kbdc/process-includes/valid/_empty
diff --git a/test-files/mds-kbdc/process-includes/valid/_mapping b/test-files/mds-kbdc/process-includes/valid/_mapping
new file mode 100644
index 0000000..6026f43
--- /dev/null
+++ b/test-files/mds-kbdc/process-includes/valid/_mapping
@@ -0,0 +1,2 @@
+<dead letter ´> "e" : "é"
+
diff --git a/test-files/mds-kbdc/process-includes/valid/include_empty_file b/test-files/mds-kbdc/process-includes/valid/include_empty_file
new file mode 100644
index 0000000..c784768
--- /dev/null
+++ b/test-files/mds-kbdc/process-includes/valid/include_empty_file
@@ -0,0 +1,11 @@
+include "_empty"
+
+# (include (@ 1 0-7) ‘.../test-files/mds-kbdc/process-includes/valid/_empty’
+#   (.inner nil)
+# )
+# .../test-files/mds-kbdc/process-includes/valid/_empty: warning: file is empty
+# 
+# .../test-files/mds-kbdc/process-includes/valid/include_empty_file:1:0–7: note: included from here
+#  include "_empty"
+#  ^^^^^^^
+
diff --git a/test-files/mds-kbdc/process-includes/valid/include_include_empty_file b/test-files/mds-kbdc/process-includes/valid/include_include_empty_file
new file mode 100644
index 0000000..9b8e1c1
--- /dev/null
+++ b/test-files/mds-kbdc/process-includes/valid/include_include_empty_file
@@ -0,0 +1,18 @@
+include "include_empty_file"
+
+# (include (@ 1 0-7) ‘.../test-files/mds-kbdc/process-includes/valid/include_empty_file’
+#   (.inner
+#     (include (@ 1 0-7) ‘.../test-files/mds-kbdc/process-includes/valid/_empty’
+#       (.inner nil)
+#     )
+#   )
+# )
+# .../test-files/mds-kbdc/process-includes/valid/_empty: warning: file is empty
+# 
+# .../test-files/mds-kbdc/process-includes/valid/include_include_empty_file:1:0–7: note: included from here
+#  include "include_empty_file"
+#  ^^^^^^^
+# .../test-files/mds-kbdc/process-includes/valid/include_empty_file:1:0–7: note: included from here
+#  include "_empty"
+#  ^^^^^^^
+
diff --git a/test-files/mds-kbdc/process-includes/valid/include_mapping b/test-files/mds-kbdc/process-includes/valid/include_mapping
new file mode 100644
index 0000000..e9d531f
--- /dev/null
+++ b/test-files/mds-kbdc/process-includes/valid/include_mapping
@@ -0,0 +1,16 @@
+include "_mapping"
+
+# (include (@ 1 0-7) ‘/home/mattias/git/mds/test-files/mds-kbdc/process-includes/valid/_mapping’
+#   (.inner
+#     (map (@ 1 0-0)
+#       (.sequence
+#         (keys (@ 1 0-16) ‘<dead letter ´>’)
+#         (string (@ 1 17-20) ‘"e"’)
+#       )
+#       (.result
+#         (string (@ 1 23-27) ‘"é"’)
+#       )
+#     )
+#   )
+# )
+