diff options
Diffstat (limited to '')
-rw-r--r-- | test-files/mds-kbdc/make-tree/valid/if | 18 | ||||
-rw-r--r-- | test-files/mds-kbdc/make-tree/valid/if-else | 29 | ||||
-rw-r--r-- | test-files/mds-kbdc/make-tree/valid/if-else-if | 36 | ||||
-rw-r--r-- | test-files/mds-kbdc/make-tree/valid/if-elseif | 34 | ||||
-rw-r--r-- | test-files/mds-kbdc/make-tree/valid/if-elseif-else | 45 | ||||
-rw-r--r-- | test-files/mds-kbdc/make-tree/valid/if-if | 25 |
6 files changed, 187 insertions, 0 deletions
diff --git a/test-files/mds-kbdc/make-tree/valid/if b/test-files/mds-kbdc/make-tree/valid/if new file mode 100644 index 0000000..44ca203 --- /dev/null +++ b/test-files/mds-kbdc/make-tree/valid/if @@ -0,0 +1,18 @@ +if \1 + <letter \1> : "\1" +end if + +# (if (@ 1 0-2) ‘\1’ +# (.inner +# (map (@ 2 2-2) +# (.sequence +# (keys (@ 2 2-13) ‘<letter \1>’) +# ) +# (.result +# (string (@ 2 16-20) ‘"\1"’) +# ) +# ) +# ) +# (.otherwise nil) +# ) + diff --git a/test-files/mds-kbdc/make-tree/valid/if-else b/test-files/mds-kbdc/make-tree/valid/if-else new file mode 100644 index 0000000..217f478 --- /dev/null +++ b/test-files/mds-kbdc/make-tree/valid/if-else @@ -0,0 +1,29 @@ +if \1 + <letter \1> : "\1" +else + <letter \2> : "\2" +end if + +# (if (@ 1 0-2) ‘\1’ +# (.inner +# (map (@ 2 2-2) +# (.sequence +# (keys (@ 2 2-13) ‘<letter \1>’) +# ) +# (.result +# (string (@ 2 16-20) ‘"\1"’) +# ) +# ) +# ) +# (.otherwise nil +# (map (@ 4 2-2) +# (.sequence +# (keys (@ 4 2-13) ‘<letter \2>’) +# ) +# (.result +# (string (@ 4 16-20) ‘"\2"’) +# ) +# ) +# ) +# ) + diff --git a/test-files/mds-kbdc/make-tree/valid/if-else-if b/test-files/mds-kbdc/make-tree/valid/if-else-if new file mode 100644 index 0000000..fe88c43 --- /dev/null +++ b/test-files/mds-kbdc/make-tree/valid/if-else-if @@ -0,0 +1,36 @@ +if \1 + <letter \1> : "\1" +else + if \2 + <letter \2> : "\2" + end if +end if + +# (if (@ 1 0-2) ‘\1’ +# (.inner +# (map (@ 2 2-2) +# (.sequence +# (keys (@ 2 2-13) ‘<letter \1>’) +# ) +# (.result +# (string (@ 2 16-20) ‘"\1"’) +# ) +# ) +# ) +# (.otherwise +# (if (@ 4 2-4) ‘\2’ +# (.inner +# (map (@ 5 4-4) +# (.sequence +# (keys (@ 5 4-15) ‘<letter \2>’) +# ) +# (.result +# (string (@ 5 18-22) ‘"\2"’) +# ) +# ) +# ) +# (.otherwise nil) +# ) +# ) +# ) + diff --git a/test-files/mds-kbdc/make-tree/valid/if-elseif b/test-files/mds-kbdc/make-tree/valid/if-elseif new file mode 100644 index 0000000..44d8d1f --- /dev/null +++ b/test-files/mds-kbdc/make-tree/valid/if-elseif @@ -0,0 +1,34 @@ +if \1 + <letter \1> : "\1" +else if \2 + <letter \2> : "\2" +end if + +# (if (@ 1 0-2) ‘\1’ +# (.inner +# (map (@ 2 2-2) +# (.sequence +# (keys (@ 2 2-13) ‘<letter \1>’) +# ) +# (.result +# (string (@ 2 16-20) ‘"\1"’) +# ) +# ) +# ) +# (.otherwise +# (if (@ 3 3-7) ‘\2’ +# (.inner +# (map (@ 4 4-4) +# (.sequence +# (keys (@ 4 4-15) ‘<letter \2>’) +# ) +# (.result +# (string (@ 4 18-22) ‘"\2"’) +# ) +# ) +# ) +# (.otherwise nil) +# ) +# ) +# ) + diff --git a/test-files/mds-kbdc/make-tree/valid/if-elseif-else b/test-files/mds-kbdc/make-tree/valid/if-elseif-else new file mode 100644 index 0000000..461ebc7 --- /dev/null +++ b/test-files/mds-kbdc/make-tree/valid/if-elseif-else @@ -0,0 +1,45 @@ +if \1 + <letter \1> : "\1" +else if \2 + <letter \2> : "\2" +else + <letter \3> : "\3" +end if + +# (if (@ 1 0-2) ‘\1’ +# (.inner +# (map (@ 2 2-2) +# (.sequence +# (keys (@ 2 2-13) ‘<letter \1>’) +# ) +# (.result +# (string (@ 2 16-20) ‘"\1"’) +# ) +# ) +# ) +# (.otherwise +# (if (@ 3 3-7) ‘\2’ +# (.inner +# (map (@ 4 4-4) +# (.sequence +# (keys (@ 4 4-15) ‘<letter \2>’) +# ) +# (.result +# (string (@ 4 18-22) ‘"\2"’) +# ) +# ) +# ) +# (.otherwise +# (map (@ 6 4-4) +# (.sequence +# (keys (@ 6 4-15) ‘<letter \3>’) +# ) +# (.result +# (string (@ 6 18-22) ‘"\3"’) +# ) +# ) +# ) +# ) +# ) +# ) + diff --git a/test-files/mds-kbdc/make-tree/valid/if-if b/test-files/mds-kbdc/make-tree/valid/if-if new file mode 100644 index 0000000..3a63615 --- /dev/null +++ b/test-files/mds-kbdc/make-tree/valid/if-if @@ -0,0 +1,25 @@ +if \1 + if \2 + <letter \1> : "\2" + end if +end if + +# (if (@ 1 0-2) ‘\1’ +# (.inner +# (if (@ 2 2-4) ‘\1’ +# (.inner +# (map (@ 3 4-4) +# (.sequence +# (keys (@ 3 4-15) ‘<letter \1>’) +# ) +# (.result +# (string (@ 3 18-22) ‘"\2"’) +# ) +# ) +# ) +# (.otherwise nil) +# ) +# ) +# (.otherwise nil) +# ) + |