diff options
| author | Mattias Andrée <maandree@operamail.com> | 2014-12-11 04:29:54 +0100 |
|---|---|---|
| committer | Mattias Andrée <maandree@operamail.com> | 2014-12-11 04:29:54 +0100 |
| commit | df29e69e8cb89146b145a317cc15f535e52f82d8 (patch) | |
| tree | 03cd9ebc6dc68d5aad597cf9b2f12a1ec603ff1e /test-files/mds-kbdc/validate-tree/valid/assumption-function | |
| parent | m (diff) | |
| download | mds-df29e69e8cb89146b145a317cc15f535e52f82d8.tar.gz mds-df29e69e8cb89146b145a317cc15f535e52f82d8.tar.bz2 mds-df29e69e8cb89146b145a317cc15f535e52f82d8.tar.xz | |
mds-kbdc: validate-tree: you can define functions and macros inside assumption-clauses
Signed-off-by: Mattias Andrée <maandree@operamail.com>
Diffstat (limited to 'test-files/mds-kbdc/validate-tree/valid/assumption-function')
| -rw-r--r-- | test-files/mds-kbdc/validate-tree/valid/assumption-function | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/test-files/mds-kbdc/validate-tree/valid/assumption-function b/test-files/mds-kbdc/validate-tree/valid/assumption-function new file mode 100644 index 0000000..8cdc5d5 --- /dev/null +++ b/test-files/mds-kbdc/validate-tree/valid/assumption-function @@ -0,0 +1,21 @@ +assumption + function digit/1 + "\add(\1 "0")" + end function +end assumption + +# (assumption (@ 1 0-10) +# (.inner +# (function (@ 2 2-10) ‘digit/1’ +# (.inner +# (map (@ 3 4-18) +# (.sequence +# (string (@ 3 4-18) ‘"\add(\1 "0")"’) +# ) +# (.result nil) +# ) +# ) +# ) +# ) +# ) + |