# File lib/rouge/lexers/tcl.rb, line 81 def self.gen_delimiter_states(name, close, opts={}) gen_command_state("_in_#{name}") state "params_in_#{name}""params_in_#{name}" do rule close do token Punctuation pop! 2 end # mismatched delimiters. Braced strings with mismatched # closing delimiters should be okay, since this is standard # practice, like {]]]]} if opts[:strict] rule CHARS[CLOSE - [close]], Error else rule CHARS[CLOSE - [close]], Text end mixin :params end state name do rule close, Punctuation, :pop! mixin "command_in_#{name}""command_in_#{name}" end end