class_docstr: Lexer for the DOS/Windows Batch file format.
  
  .. versionadded:: 0.7
class_docstr_tok: ["Lexer","for","the","DOS\/Windows","Batch","file","format",".","..","versionadded",":",":","0.7"]
code: def _make_redirect_state(
      compound,
      _core_token_compound=_core_token_compound,
      _nl=_nl,
      _punct=_punct,
      _stoken=_stoken,
      _string=_string,
      _space=_space,
      _variable=_variable,
      _ws=_ws,
  ):
      stoken_compound = r"(?:[%s]+|(?:%s|%s|%s)+)" % (
          _punct,
          _string,
          _variable,
          _core_token_compound,
      )
      return [
          (
              r"((?:(?<=[%s%s])\d)?)(>>?&|<&)([%s%s]*)(\d)"
              % (_nl, _ws, _nl, _ws),
              bygroups(
                  Number.Integer, Punctuation, Text, Number.Integer
              ),
          ),
          (
              r"((?:(?<=[%s%s])(?<!\^[%s])\d)?)(>>?|<)(%s?%s)"
              % (
                  _nl,
                  _ws,
                  _nl,
                  _space,
                  stoken_compound if compound else _stoken,
              ),
              bygroups(
                  Number.Integer, Punctuation, using(this, state="text")
              ),
          ),
      ]
  
imports: import re
  from pygments.lexer import Lexer, RegexLexer, do_insertions, bygroups, include, default, this, using, words
  from pygments.token import Punctuation, Text, Comment, Operator, Keyword, Name, String, Number, Generic
  from pygments.util import shebang_matches
label_desc: Use image node_id 6 for calling the BatchLexer obj's underlying member method code with example usage: obj._make_redirect_state(compound, _core_token_compound, _nl, _punct, _stoken, _string, _space, _variable, _ws) and returns: list