From 155e323f1312bc9c3c290d5184f7678677e573af Mon Sep 17 00:00:00 2001
From: Mattias Andrée <maandree@operamail.com>
Date: Mon, 1 Dec 2014 20:36:12 +0100
Subject: mds-kbdc: more test cases
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Mattias Andrée <maandree@operamail.com>
---
 .../validate-tree/invalid/function-macro_call      | 15 +++++++++++++++
 .../mds-kbdc/validate-tree/invalid/function-map    | 22 ++++++++++++++++++++++
 2 files changed, 37 insertions(+)
 create mode 100644 test-files/mds-kbdc/validate-tree/invalid/function-macro_call
 create mode 100644 test-files/mds-kbdc/validate-tree/invalid/function-map

(limited to 'test-files/mds-kbdc/validate-tree/invalid')

diff --git a/test-files/mds-kbdc/validate-tree/invalid/function-macro_call b/test-files/mds-kbdc/validate-tree/invalid/function-macro_call
new file mode 100644
index 0000000..c1ade46
--- /dev/null
+++ b/test-files/mds-kbdc/validate-tree/invalid/function-macro_call
@@ -0,0 +1,15 @@
+function f/0
+  m()
+end function
+
+# (function (@ 1 0-8) ‘f/0’
+#   (.inner
+#     (macro_call (@ 2 2-3) ‘m’
+#       (.arguments nil)
+#     )
+#   )
+# )
+# :2:2–3: error: macro call inside function definition
+#    m()
+#    ^
+
diff --git a/test-files/mds-kbdc/validate-tree/invalid/function-map b/test-files/mds-kbdc/validate-tree/invalid/function-map
new file mode 100644
index 0000000..1768d63
--- /dev/null
+++ b/test-files/mds-kbdc/validate-tree/invalid/function-map
@@ -0,0 +1,22 @@
+function f/0
+  <dead compose> "a" "e" : "æ"
+end function
+
+# (function (@ 1 0-8) ‘f/0’
+#   (.inner
+#     (map (@ 2 2-2)
+#       (.sequence
+#         (keys (@ 2 2-16) ‘<dead compose>’)
+#         (string (@ 2 17-20) ‘"a"’)
+#         (string (@ 2 21-24) ‘"e"’)
+#       )
+#       (.result
+#         (string (@ 2 27-31) ‘"æ"’)
+#       )
+#     )
+#   )
+# )
+# :2:2–2: error: mapping-statement inside function definition
+#    <dead compose> "a" "e" : "æ"
+#    
+
-- 
cgit v1.2.3-70-g09d2