From 2d0181e9e07236ea28fb638c4a9eafb5896635b6 Mon Sep 17 00:00:00 2001 From: Mattias Andrée Date: Mon, 1 Dec 2014 13:27:13 +0100 Subject: mds-kbdc: add some test cases + fix issued with inclusion MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Mattias Andrée --- .../validate-tree/invalid/information-function | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100644 test-files/mds-kbdc/validate-tree/invalid/information-function (limited to 'test-files/mds-kbdc/validate-tree/invalid/information-function') diff --git a/test-files/mds-kbdc/validate-tree/invalid/information-function b/test-files/mds-kbdc/validate-tree/invalid/information-function new file mode 100644 index 0000000..06613f6 --- /dev/null +++ b/test-files/mds-kbdc/validate-tree/invalid/information-function @@ -0,0 +1,19 @@ +information + function f/0 + end function +end information + +# (information (@ 1 0-11) +# (.inner +# (function (@ 2 2-10) ‘f/0’ +# (.inner nil) +# ) +# ) +# ) +# :2:2–10: error: function definition inside information clause +# function f/0 +# ^^^^^^^^ +# :1:0–11: note: outer information clause defined here +# information +# ^^^^^^^^^^^ + -- cgit v1.2.3-70-g09d2