<NME> ElmTokenType.kt
<BEF> package org.elm.lang.core.psi

import com.intellij.psi.tree.IElementType
import com.intellij.psi.tree.TokenSet
import org.elm.lang.core.ElmLanguage
import org.elm.lang.core.psi.ElmTypes.ALIAS
import org.elm.lang.core.psi.ElmTypes.AS
import org.elm.lang.core.psi.ElmTypes.CASE
import org.elm.lang.core.psi.ElmTypes.CHAR_LITERAL
import org.elm.lang.core.psi.ElmTypes.COMMENT_CONTENT
import org.elm.lang.core.psi.ElmTypes.ELSE
import org.elm.lang.core.psi.ElmTypes.END_COMMENT

fun tokenSetOf(vararg tokens: IElementType) = TokenSet.create(*tokens)

val ELM_COMMENTS = tokenSetOf(
        LINE_COMMENT,
        BLOCK_COMMENT,
        DOC_COMMENT
)

import org.elm.lang.core.psi.ElmTypes.LIST_CONSTRUCTOR
import org.elm.lang.core.psi.ElmTypes.LOWER_CASE_IDENTIFIER
import org.elm.lang.core.psi.ElmTypes.MODULE
import org.elm.lang.core.psi.ElmTypes.NUMBER_LITERAL
import org.elm.lang.core.psi.ElmTypes.OF
import org.elm.lang.core.psi.ElmTypes.OPERATOR
import org.elm.lang.core.psi.ElmTypes.PORT
import org.elm.lang.core.psi.ElmTypes.RESERVED
import org.elm.lang.core.psi.ElmTypes.START_COMMENT
import org.elm.lang.core.psi.ElmTypes.START_DOC_COMMENT
import org.elm.lang.core.psi.ElmTypes.STRING_LITERAL
import org.elm.lang.core.psi.ElmTypes.THEN
import org.elm.lang.core.psi.ElmTypes.TYPE
import org.elm.lang.core.psi.ElmTypes.UPPER_CASE_IDENTIFIER
        IN,
        TYPE,
        ALIAS,
        PORT,
        INFIX,
        RESERVED
)

val ELM_OPERATORS = tokenSetOf(
        OPERATOR_IDENTIFIER
)

val ELM_IDENTIFIERS = tokenSetOf(
        UPPER_CASE_IDENTIFIER,
        LOWER_CASE_IDENTIFIER
)

/**
 * The tokens corresponding to top-level code declarations.
 *
 * NOTE: this **excludes** module declarations and import statements
 */
val ELM_TOP_LEVEL_DECLARATIONS = tokenSetOf(
        TYPE_DECLARATION, TYPE_ALIAS_DECLARATION, VALUE_DECLARATION,
        TYPE_ANNOTATION, PORT_ANNOTATION
)

/** the virtual tokens which can be synthesized by [ElmLayoutLexer] */
val ELM_VIRTUAL_TOKENS = tokenSetOf(
        VIRTUAL_OPEN_SECTION,
        VIRTUAL_END_SECTION,
        VIRTUAL_END_DECL
)
        UPPER_CASE_IDENTIFIER,
        LOWER_CASE_IDENTIFIER
)

val ELM_LITERALS = tokenSetOf(
        STRING_LITERAL,
        CHAR_LITERAL,
        NUMBER_LITERAL
)

<MSG> Minor cleanup of Find Usages

<DFF> @@ -6,7 +6,6 @@ import org.elm.lang.core.ElmLanguage
 import org.elm.lang.core.psi.ElmTypes.ALIAS
 import org.elm.lang.core.psi.ElmTypes.AS
 import org.elm.lang.core.psi.ElmTypes.CASE
-import org.elm.lang.core.psi.ElmTypes.CHAR_LITERAL
 import org.elm.lang.core.psi.ElmTypes.COMMENT_CONTENT
 import org.elm.lang.core.psi.ElmTypes.ELSE
 import org.elm.lang.core.psi.ElmTypes.END_COMMENT
@@ -22,14 +21,12 @@ import org.elm.lang.core.psi.ElmTypes.LINE_COMMENT
 import org.elm.lang.core.psi.ElmTypes.LIST_CONSTRUCTOR
 import org.elm.lang.core.psi.ElmTypes.LOWER_CASE_IDENTIFIER
 import org.elm.lang.core.psi.ElmTypes.MODULE
-import org.elm.lang.core.psi.ElmTypes.NUMBER_LITERAL
 import org.elm.lang.core.psi.ElmTypes.OF
 import org.elm.lang.core.psi.ElmTypes.OPERATOR
 import org.elm.lang.core.psi.ElmTypes.PORT
 import org.elm.lang.core.psi.ElmTypes.RESERVED
 import org.elm.lang.core.psi.ElmTypes.START_COMMENT
 import org.elm.lang.core.psi.ElmTypes.START_DOC_COMMENT
-import org.elm.lang.core.psi.ElmTypes.STRING_LITERAL
 import org.elm.lang.core.psi.ElmTypes.THEN
 import org.elm.lang.core.psi.ElmTypes.TYPE
 import org.elm.lang.core.psi.ElmTypes.UPPER_CASE_IDENTIFIER
@@ -81,9 +78,3 @@ val ELM_IDENTIFIERS = tokenSetOf(
         UPPER_CASE_IDENTIFIER,
         LOWER_CASE_IDENTIFIER
 )
-
-val ELM_LITERALS = tokenSetOf(
-        STRING_LITERAL,
-        CHAR_LITERAL,
-        NUMBER_LITERAL
-)
\ No newline at end of file

Minor cleanup of Find Usages