| Index: lib/src/prism/tests/languages/scheme/keyword_feature.test
|
| diff --git a/lib/src/prism/tests/languages/scheme/keyword_feature.test b/lib/src/prism/tests/languages/scheme/keyword_feature.test
|
| new file mode 100644
|
| index 0000000000000000000000000000000000000000..534d8a0b0e6ff43572cedeeabc8ba7e6ed5bb8a7
|
| --- /dev/null
|
| +++ b/lib/src/prism/tests/languages/scheme/keyword_feature.test
|
| @@ -0,0 +1,57 @@
|
| +(define
|
| +(define-syntax
|
| +(define-library
|
| +(define-values
|
| +(case-lambda
|
| +(lambda
|
| +(let
|
| +(let*
|
| +(letrec
|
| +(let-values
|
| +(let*-values
|
| +(letrec-values
|
| +(else
|
| +(if
|
| +(cond
|
| +(begin
|
| +(delay
|
| +(delay-force
|
| +(parameterize
|
| +(guard
|
| +(set!
|
| +(quasi-quote
|
| +(quote
|
| +(syntax-rules
|
| +
|
| +----------------------------------------------------
|
| +
|
| +[
|
| + ["punctuation", "("], ["keyword", "define"],
|
| + ["punctuation", "("], ["keyword", "define-syntax"],
|
| + ["punctuation", "("], ["keyword", "define-library"],
|
| + ["punctuation", "("], ["keyword", "define-values"],
|
| + ["punctuation", "("], ["keyword", "case-lambda"],
|
| + ["punctuation", "("], ["keyword", "lambda"],
|
| + ["punctuation", "("], ["keyword", "let"],
|
| + ["punctuation", "("], ["keyword", "let*"],
|
| + ["punctuation", "("], ["keyword", "letrec"],
|
| + ["punctuation", "("], ["keyword", "let-values"],
|
| + ["punctuation", "("], ["keyword", "let*-values"],
|
| + ["punctuation", "("], ["keyword", "letrec-values"],
|
| + ["punctuation", "("], ["keyword", "else"],
|
| + ["punctuation", "("], ["keyword", "if"],
|
| + ["punctuation", "("], ["keyword", "cond"],
|
| + ["punctuation", "("], ["keyword", "begin"],
|
| + ["punctuation", "("], ["keyword", "delay"],
|
| + ["punctuation", "("], ["keyword", "delay-force"],
|
| + ["punctuation", "("], ["keyword", "parameterize"],
|
| + ["punctuation", "("], ["keyword", "guard"],
|
| + ["punctuation", "("], ["keyword", "set!"],
|
| + ["punctuation", "("], ["keyword", "quasi-quote"],
|
| + ["punctuation", "("], ["keyword", "quote"],
|
| + ["punctuation", "("], ["keyword", "syntax-rules"]
|
| +]
|
| +
|
| +----------------------------------------------------
|
| +
|
| +Checks for keywords.
|
|
|