use prism-tomorrow.css
This commit is contained in:
@ -0,0 +1,17 @@
|
||||
(t)
|
||||
(nil)
|
||||
(foo t)
|
||||
[t ]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("], ["boolean", "t"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["boolean", "nil"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["car", "foo"], ["boolean", "t"], ["punctuation", ")"],
|
||||
["punctuation", "["], ["boolean", "t"], ["punctuation", "]"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for booleans.
|
@ -0,0 +1,13 @@
|
||||
(foo)
|
||||
(foo bar)
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation","("], ["car", "foo"], ["punctuation",")"],
|
||||
["punctuation","("], ["car", "foo"], " bar", ["punctuation",")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for car.
|
@ -0,0 +1,11 @@
|
||||
;; h1
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["comment", ";; h1"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for comments.
|
@ -0,0 +1,16 @@
|
||||
(declare)
|
||||
(declare a)
|
||||
(declare
|
||||
a)
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("], ["declare", "declare"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["declare", "declare"], " a", ["punctuation", ")"],
|
||||
["punctuation", "("], ["declare", "declare"], "\r\na", ["punctuation", ")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for declare.
|
@ -0,0 +1,27 @@
|
||||
(defun foo ())
|
||||
(defun foo (bar))
|
||||
(defun foo (bar &body arg1) )
|
||||
(defun foo (bar &rest arg1) )
|
||||
(defun foo (bar &body arg1 arg2) )
|
||||
(defun foo (bar &key arg1) )
|
||||
(defun foo (bar &key arg1 &allow-other-keys) )
|
||||
(defun foo (&optional arg1) )
|
||||
(defun defabc ())
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("], ["defun", [ ["keyword", "defun" ], ["function", "foo"], ["punctuation", "("], ["arguments", []], ["punctuation", ")"]]], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defun", [ ["keyword", "defun" ], ["function", "foo"], ["punctuation", "("], ["arguments", [[ "argument", "bar" ]]], ["punctuation", ")"]]], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defun", [ ["keyword", "defun" ], ["function", "foo"], ["punctuation", "("], ["arguments", [[ "argument", "bar" ], ["rest-vars", [["lisp-marker", "&body" ], ["argument", "arg1"]]]]], ["punctuation", ")"]] ], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defun", [ ["keyword", "defun" ], ["function", "foo"], ["punctuation", "("], ["arguments", [[ "argument", "bar" ], ["rest-vars", [["lisp-marker", "&rest" ], ["argument", "arg1"]]]]], ["punctuation", ")"]] ], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defun", [ ["keyword", "defun" ], ["function", "foo"], ["punctuation", "("], ["arguments", [[ "argument", "bar" ], ["rest-vars", [["lisp-marker", "&body" ], ["argument", "arg1"], ["argument", "arg2"]]]]], ["punctuation", ")"]] ], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defun", [ ["keyword", "defun" ], ["function", "foo"], ["punctuation", "("], ["arguments", [[ "argument", "bar" ], ["keys", [["lisp-marker", "&key" ], ["argument", "arg1"]]]]], ["punctuation", ")"]] ], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defun", [ ["keyword", "defun" ], ["function", "foo"], ["punctuation", "("], ["arguments", [[ "argument", "bar" ], ["keys", [["lisp-marker", "&key" ], ["argument", "arg1"], ["lisp-marker", "&allow-other-keys"]]]]], ["punctuation", ")"]] ], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defun", [ ["keyword", "defun" ], ["function", "foo"], ["punctuation", "("], ["arguments", [["other-marker-vars", [["lisp-marker", "&optional" ], ["argument", "arg1"]]]]], ["punctuation", ")"]] ], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defun", [ ["keyword", "defun" ], ["function", "defabc"], ["punctuation", "("], ["arguments", []], ["punctuation", ")"]]], ["punctuation", ")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for defun.
|
@ -0,0 +1,25 @@
|
||||
(defvar foo)
|
||||
(defvar foo bar)
|
||||
(defvar foo)
|
||||
(defvar)
|
||||
(defconst foo)
|
||||
(defcustom foo)
|
||||
(defgroup foo)
|
||||
(defvar defabc)
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("], ["defvar", [ ["keyword", "defvar" ], ["variable", "foo"] ]], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defvar", [ ["keyword", "defvar" ], ["variable", "foo"] ]], " bar", ["punctuation", ")"],
|
||||
["punctuation", "("], ["defvar", [ ["keyword", "defvar" ], ["variable", "foo"] ]], ["punctuation", ")"],
|
||||
["punctuation", "("], ["car", "defvar"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defvar", [ ["keyword", "defconst" ], ["variable", "foo"] ]], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defvar", [ ["keyword", "defcustom" ], ["variable", "foo"] ]], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defvar", [ ["keyword", "defgroup" ], ["variable", "foo"] ]], ["punctuation", ")"],
|
||||
["punctuation", "("], ["defvar", [ ["keyword", "defvar" ], ["variable", "defabc"] ]], ["punctuation", ")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for defvar.
|
@ -0,0 +1,11 @@
|
||||
;;; h1
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["heading", ";;; h1"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for headings.
|
@ -0,0 +1,16 @@
|
||||
(interactive)
|
||||
(interactive a)
|
||||
(interactive
|
||||
a)
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("], ["interactive", "interactive"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["interactive", "interactive"], " a", ["punctuation", ")"],
|
||||
["punctuation", "("], ["interactive", "interactive"], "\r\na", ["punctuation", ")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for declare.
|
@ -0,0 +1,73 @@
|
||||
(let )
|
||||
let
|
||||
(lexical-let )
|
||||
(let* )
|
||||
(letf )
|
||||
(cl-letf )
|
||||
(if )
|
||||
(when )
|
||||
(while )
|
||||
(unless )
|
||||
(cons )
|
||||
(cl-loop )
|
||||
(and )
|
||||
(or )
|
||||
(not )
|
||||
(cond )
|
||||
(setq )
|
||||
(error )
|
||||
(message )
|
||||
(null )
|
||||
(require )
|
||||
(provide )
|
||||
(use-package )
|
||||
(for )
|
||||
(do )
|
||||
(collect )
|
||||
(return )
|
||||
(finally )
|
||||
(append )
|
||||
(concat )
|
||||
(in )
|
||||
(by )
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("], ["keyword", "let"], ["punctuation", ")"],
|
||||
"\r\nlet\r\n",
|
||||
["punctuation", "("], ["keyword", "lexical-let"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "let*"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "letf"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "cl-letf"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "if"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "when"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "while"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "unless"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "cons"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "cl-loop"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "and"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "or"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "not"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "cond"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "setq"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "error"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "message"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "null"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "require"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "provide"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "use-package"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "for"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "do"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "collect"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "return"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "finally"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "append"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "concat"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "in"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["keyword", "by"], ["punctuation", ")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for all keyword variations.
|
@ -0,0 +1,13 @@
|
||||
(lambda () ())
|
||||
(lambda () (foo bar))
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation","("],["lambda",[["keyword","lambda"],["punctuation","("],["arguments",[]],["punctuation",")"]]],["punctuation","("],["punctuation",")"],["punctuation",")"],
|
||||
["punctuation","("],["lambda",[["keyword","lambda"],["punctuation","("],["arguments",[]],["punctuation",")"]]],["punctuation","("],["car","foo"]," bar",["punctuation",")"],["punctuation",")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for lambda.
|
@ -0,0 +1,15 @@
|
||||
(
|
||||
:foo
|
||||
)
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("],
|
||||
["lisp-property", ":foo"],
|
||||
["punctuation", ")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for lisp properties.
|
@ -0,0 +1,27 @@
|
||||
(1)
|
||||
(12)
|
||||
(1.2)
|
||||
(1.23)
|
||||
(1.)
|
||||
(foo 1)
|
||||
[1 ]
|
||||
(-1)
|
||||
(+1)
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("], ["number", "1"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["number", "12"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["number", "1.2"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["number", "1.23"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["number", "1."], ["punctuation", ")"],
|
||||
["punctuation", "("], ["car", "foo"], ["number", "1"], ["punctuation", ")"],
|
||||
["punctuation", "["], ["number", "1"], ["punctuation", "]"],
|
||||
["punctuation", "("], ["number", "-1"], ["punctuation", ")"],
|
||||
["punctuation", "("], ["number", "+1"], ["punctuation", ")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for numbers.
|
@ -0,0 +1,16 @@
|
||||
()
|
||||
( )
|
||||
[]
|
||||
(
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("], ["punctuation", ")"],
|
||||
["punctuation", "("], ["punctuation", ")"],
|
||||
["punctuation", "["], ["punctuation", "]"],
|
||||
["punctuation", "("]
|
||||
]
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for punctuation.
|
@ -0,0 +1,17 @@
|
||||
(
|
||||
#'foo
|
||||
'foo
|
||||
)
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("],
|
||||
["quoted-symbol", "#'foo"],
|
||||
["quoted-symbol", "'foo"],
|
||||
["punctuation", ")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for quoted symbols.
|
@ -0,0 +1,17 @@
|
||||
(
|
||||
,foo
|
||||
,@foo
|
||||
)
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("],
|
||||
["splice", ",foo"],
|
||||
["splice", ",@foo"],
|
||||
["punctuation", ")"]
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for splices
|
@ -0,0 +1,27 @@
|
||||
(
|
||||
""
|
||||
"foo
|
||||
bar"
|
||||
"\"foo\""
|
||||
"foo\tbar"
|
||||
"`foo'"
|
||||
"FOO."
|
||||
)
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
[
|
||||
["punctuation", "("],
|
||||
["string", [ "\"\"" ]],
|
||||
["string", [ "\"foo\r\nbar\"" ]],
|
||||
["string", [ "\"\\\"foo\\\"\"" ]],
|
||||
["string", [ "\"foo\\tbar\"" ]],
|
||||
["string", [ "\"", ["symbol", "`foo'"], "\"" ]],
|
||||
["string", [ "\"", ["argument", "FOO"], ".\"" ]],
|
||||
["punctuation", ")"]
|
||||
|
||||
]
|
||||
|
||||
----------------------------------------------------
|
||||
|
||||
Checks for all string variations.
|
Reference in New Issue
Block a user