rouge 3.2.0 → 3.18.0

data/lib/rouge/lexers/cmhg.rb

@@ -0,0 +1,34 @@
+# -*- coding: utf-8 -*- #
+# frozen_string_literal: true
+
+module Rouge
+  module Lexers
+    class CMHG < RegexLexer
+      title "CMHG"
+      desc "RISC OS C module header generator source file"
+      tag 'cmhg'
+      filenames '*.cmhg'
+
+      def self.preproc_keyword
+        @preproc_keyword ||= %w(
+          define elif else endif error if ifdef ifndef include line pragma undef warning
+        )
+      end
+
+      state :root do
+        rule %r/;[^\n]*/, Comment
+        rule %r/^([ \t]*)(#[ \t]*(?:(?:#{CMHG.preproc_keyword.join('|')})(?:[ \t].*)?)?)(?=\n)/ do
+          groups Text, Comment::Preproc
+        end
+        rule %r/[-a-z]+:/, Keyword::Declaration
+        rule %r/[a-z_]\w+/i, Name::Entity
+        rule %r/"[^"]*"/, Literal::String
+        rule %r/(?:&|0x)\h+/, Literal::Number::Hex
+        rule %r/\d+/, Literal::Number
+        rule %r/[,\/()]/, Punctuation
+        rule %r/[ \t]+/, Text
+        rule %r/\n+/, Text
+      end
+    end
+  end
+end

data/lib/rouge/lexers/coffeescript.rb

@@ -1,4 +1,5 @@
 # -*- coding: utf-8 -*- #
+# frozen_string_literal: true
 
 module Rouge
   module Lexers
@@ -17,9 +18,17 @@ module Rouge
 
       def self.keywords
         @keywords ||= Set.new %w(
-          for in of while break return continue switch when then if else
-          throw try catch finally new delete typeof instanceof super
-          extends this class by
+          for by while until loop break continue return
+          switch when then if else do yield throw try catch finally await
+          new delete typeof instanceof super extends this class
+          import export debugger
+        )
+      end
+
+      def self.reserved
+        @reserved ||= Set.new %w(
+          case function var void with const let enum
+          native implements interface package private protected public static
         )
       end
 
@@ -40,33 +49,54 @@ module Rouge
 
       id = /[$a-zA-Z_][a-zA-Z0-9_]*/
 
-      state :comments_and_whitespace do
-        rule /\s+/m, Text
-        rule /###\s*\n.*?###/m, Comment::Multiline
-        rule /#.*$/, Comment::Single
+      state :comments do
+        rule %r/###[^#].*?###/m, Comment::Multiline
+        rule %r/#.*$/, Comment::Single
       end
 
-      state :multiline_regex do
-        # this order is important, so that #{ isn't interpreted
-        # as a comment
-        mixin :has_interpolation
-        mixin :comments_and_whitespace
+      state :whitespace do
+        rule %r/\s+/m, Text
+      end
 
-        rule %r(///([gim]+\b|\B)), Str::Regex, :pop!
-        rule %r(/), Str::Regex
-        rule %r([^/#]+), Str::Regex
+      state :regex_comment do
+        rule %r/^#(?!\{).*$/, Comment::Single
+        rule %r/(\s+)(#(?!\{).*)$/ do
+          groups Text, Comment::Single
+        end
       end
 
-      state :slash_starts_regex do
-        mixin :comments_and_whitespace
+      state :multiline_regex_begin do
         rule %r(///) do
           token Str::Regex
           goto :multiline_regex
         end
+      end
+
+      state :multiline_regex_end do
+        rule %r(///([gimy]+\b|\B)), Str::Regex, :pop!
+      end
+
+      state :multiline_regex do
+        mixin :multiline_regex_end
+        mixin :regex_comment
+        mixin :has_interpolation
+        mixin :comments
+        mixin :whitespace
+        mixin :code_escape
+
+        rule %r/\\\D/, Str::Escape
+        rule %r/\\\d+/, Name::Variable
+        rule %r/./m, Str::Regex
+      end
+
+      state :slash_starts_regex do
+        mixin :comments
+        mixin :whitespace
+        mixin :multiline_regex_begin
 
         rule %r(
           /(\\.|[^\[/\\\n]|\[(\\.|[^\]\\\n])*\])+/ # a regex
-          ([gim]+\b|\B)
+          ([gimy]+\b|\B)
         )x, Str::Regex, :pop!
 
         rule(//) { pop! }
@@ -74,27 +104,29 @@ module Rouge
 
       state :root do
         rule(%r(^(?=\s|/|<!--))) { push :slash_starts_regex }
-        mixin :comments_and_whitespace
+        mixin :comments
+        mixin :whitespace
+
         rule %r(
-          [+][+]|--|~|&&|\band\b|\bor\b|\bis\b|\bisnt\b|\bnot\b|[?]|:|=|
-          [|][|]|\\(?=\n)|(<<|>>>?|==?|!=?|[-<>+*`%&|^/])=?
+          [+][+]|--|~|&&|\band\b|\bor\b|\bis\b|\bisnt\b|\bnot\b|\bin\b|\bof\b|
+          [?]|:|=|[|][|]|\\(?=\n)|(<<|>>>?|==?|!=?|[-<>+*`%&|^/])=?
         )x, Operator, :slash_starts_regex
 
-        rule /[-=]>/, Name::Function
+        rule %r/[-=]>/, Name::Function
 
-        rule /(@)([ \t]*)(#{id})/ do
+        rule %r/(@)([ \t]*)(#{id})/ do
           groups Name::Variable::Instance, Text, Name::Attribute
           push :slash_starts_regex
         end
 
-        rule /([.])([ \t]*)(#{id})/ do
+        rule %r/([.])([ \t]*)(#{id})/ do
           groups Punctuation, Text, Name::Attribute
           push :slash_starts_regex
         end
 
-        rule /#{id}(?=\s*:)/, Name::Attribute, :slash_starts_regex
+        rule %r/#{id}(?=\s*:)/, Name::Attribute, :slash_starts_regex
 
-        rule /#{id}/ do |m|
+        rule %r/#{id}/ do |m|
           if self.class.keywords.include? m[0]
             token Keyword
           elsif self.class.constants.include? m[0]
@@ -108,65 +140,74 @@ module Rouge
           push :slash_starts_regex
         end
 
-        rule /[{(\[;,]/, Punctuation, :slash_starts_regex
-        rule /[})\].]/, Punctuation
+        rule %r/[{(\[;,]/, Punctuation, :slash_starts_regex
+        rule %r/[})\].]/, Punctuation
 
-        rule /\d+[.]\d+([eE]\d+)?[fd]?/, Num::Float
-        rule /0x[0-9a-fA-F]+/, Num::Hex
-        rule /\d+/, Num::Integer
-        rule /"""/, Str, :tdqs
-        rule /'''/, Str, :tsqs
-        rule /"/, Str, :dqs
-        rule /'/, Str, :sqs
+        rule %r/\d+[.]\d+([eE]\d+)?[fd]?/, Num::Float
+        rule %r/0x[0-9a-fA-F]+/, Num::Hex
+        rule %r/\d+/, Num::Integer
+        rule %r/"""/, Str, :tdqs
+        rule %r/'''/, Str, :tsqs
+        rule %r/"/, Str, :dqs
+        rule %r/'/, Str, :sqs
+      end
+
+      state :code_escape do
+        rule %r(\\(
+          c[A-Z]|
+          x[0-9a-fA-F]{2}|
+          u[0-9a-fA-F]{4}|
+          u\{[0-9a-fA-F]{4}\}
+        ))x, Str::Escape
       end
 
       state :strings do
         # all coffeescript strings are multi-line
-        rule /[^#\\'"]+/m, Str
-
-        rule /\\./, Str::Escape
-        rule /#/, Str
+        rule %r/[^#\\'"]+/m, Str
+        mixin :code_escape
+        rule %r/\\./, Str::Escape
+        rule %r/#/, Str
       end
 
       state :double_strings do
-        rule /'/, Str
+        rule %r/'/, Str
         mixin :has_interpolation
         mixin :strings
       end
 
       state :single_strings do
-        rule /"/, Str
+        rule %r/"/, Str
         mixin :strings
       end
 
       state :interpolation do
-        rule /}/, Str::Interpol, :pop!
+        rule %r/}/, Str::Interpol, :pop!
         mixin :root
       end
 
       state :has_interpolation do
-        rule /[#][{]/, Str::Interpol, :interpolation
+        rule %r/[#][{]/, Str::Interpol, :interpolation
       end
 
       state :dqs do
-        rule /"/, Str, :pop!
+        rule %r/"/, Str, :pop!
         mixin :double_strings
       end
 
       state :tdqs do
-        rule /"""/, Str, :pop!
-        rule /"/, Str
+        rule %r/"""/, Str, :pop!
+        rule %r/"/, Str
         mixin :double_strings
       end
 
       state :sqs do
-        rule /'/, Str, :pop!
+        rule %r/'/, Str, :pop!
         mixin :single_strings
       end
 
       state :tsqs do
-        rule /'''/, Str, :pop!
-        rule /'/, Str
+        rule %r/'''/, Str, :pop!
+        rule %r/'/, Str
         mixin :single_strings
       end
     end

data/lib/rouge/lexers/common_lisp.rb

@@ -1,4 +1,5 @@
 # -*- coding: utf-8 -*- #
+# frozen_string_literal: true
 
 module Rouge
   module Lexers
@@ -6,7 +7,7 @@ module Rouge
       title "Common Lisp"
       desc "The Common Lisp variant of Lisp (common-lisp.net)"
       tag 'common_lisp'
-      aliases 'cl', 'common-lisp', 'elisp', 'emacs-lisp'
+      aliases 'cl', 'common-lisp', 'elisp', 'emacs-lisp', 'lisp'
 
       filenames '*.cl', '*.lisp', '*.asd', '*.el' # used for Elisp too
       mimetypes 'text/x-common-lisp'
@@ -214,19 +215,19 @@ module Rouge
       symbol = /(\|[^\|]+\||#{nonmacro}#{constituent}*)/
 
       state :root do
-        rule /\s+/m, Text
-        rule /;.*$/, Comment::Single
-        rule /#\|/, Comment::Multiline, :multiline_comment
+        rule %r/\s+/m, Text
+        rule %r/;.*$/, Comment::Single
+        rule %r/#\|/, Comment::Multiline, :multiline_comment
 
         # encoding comment
-        rule /#\d*Y.*$/, Comment::Special
-        rule /"(\\.|[^"\\])*"/, Str
+        rule %r/#\d*Y.*$/, Comment::Special
+        rule %r/"(\\.|[^"\\])*"/, Str
 
-        rule /[:']#{symbol}/, Str::Symbol
-        rule /['`]/, Operator
+        rule %r/[:']#{symbol}/, Str::Symbol
+        rule %r/['`]/, Operator
 
         # numbers
-        rule /[-+]?\d+\.?#{terminated}/, Num::Integer
+        rule %r/[-+]?\d+\.?#{terminated}/, Num::Integer
         rule %r([-+]?\d+/\d+#{terminated}), Num::Integer
         rule %r(
           [-+]?
@@ -236,65 +237,65 @@ module Rouge
         )x, Num::Float
 
         # sharpsign strings and characters
-        rule /#\\.#{terminated}/, Str::Char
-        rule /#\\#{symbol}/, Str::Char
+        rule %r/#\\.#{terminated}/, Str::Char
+        rule %r/#\\#{symbol}/, Str::Char
 
-        rule /#\(/, Operator, :root
+        rule %r/#\(/, Operator, :root
 
         # bitstring
-        rule /#\d*\*[01]*/, Other
+        rule %r/#\d*\*[01]*/, Other
 
         # uninterned symbol
-        rule /#:#{symbol}/, Str::Symbol
+        rule %r/#:#{symbol}/, Str::Symbol
 
         # read-time and load-time evaluation
-        rule /#[.,]/, Operator
+        rule %r/#[.,]/, Operator
 
         # function shorthand
-        rule /#'/, Name::Function
+        rule %r/#'/, Name::Function
 
         # binary rational
-        rule /#b[+-]?[01]+(\/[01]+)?/i, Num
+        rule %r/#b[+-]?[01]+(\/[01]+)?/i, Num
 
         # octal rational
-        rule /#o[+-]?[0-7]+(\/[0-7]+)?/i, Num::Oct
+        rule %r/#o[+-]?[0-7]+(\/[0-7]+)?/i, Num::Oct
 
         # hex rational
-        rule /#x[+-]?[0-9a-f]+(\/[0-9a-f]+)?/i, Num
+        rule %r/#x[+-]?[0-9a-f]+(\/[0-9a-f]+)?/i, Num
 
         # complex
-        rule /(#c)(\()/i do
+        rule %r/(#c)(\()/i do
           groups Num, Punctuation
           push :root
         end
 
         # arrays and structures
-        rule /(#(?:\d+a|s))(\()/i do
+        rule %r/(#(?:\d+a|s))(\()/i do
           groups Str::Other, Punctuation
           push :root
         end
 
         # path
-        rule /#p?"(\\.|[^"])*"/i, Str::Symbol
+        rule %r/#p?"(\\.|[^"])*"/i, Str::Symbol
 
         # reference
-        rule /#\d+[=#]/, Operator
+        rule %r/#\d+[=#]/, Operator
 
         # read-time comment
-        rule /#+nil#{terminated}\s*\(/, Comment, :commented_form
+        rule %r/#+nil#{terminated}\s*\(/, Comment, :commented_form
 
         # read-time conditional
-        rule /#[+-]/, Operator
+        rule %r/#[+-]/, Operator
 
         # special operators that should have been parsed already
-        rule /(,@|,|\.)/, Operator
+        rule %r/(,@|,|\.)/, Operator
 
         # special constants
-        rule /(t|nil)#{terminated}/, Name::Constant
+        rule %r/(t|nil)#{terminated}/, Name::Constant
 
         # functions and variables
         # note that these get filtered through in stream_tokens
-        rule /\*#{symbol}\*/, Name::Variable::Global
+        rule %r/\*#{symbol}\*/, Name::Variable::Global
         rule symbol do |m|
           sym = m[0]
 
@@ -317,9 +318,9 @@ module Rouge
           end
         end
 
-        rule /\(/, Punctuation, :root
-        rule /\)/, Punctuation do
-          if stack.empty?
+        rule %r/\(/, Punctuation, :root
+        rule %r/\)/, Punctuation do
+          if stack.size == 1
             token Error
           else
             token Punctuation
@@ -329,16 +330,16 @@ module Rouge
       end
 
       state :multiline_comment do
-        rule /#\|/, Comment::Multiline, :multiline_comment
-        rule /\|#/, Comment::Multiline, :pop!
-        rule /[^\|#]+/, Comment::Multiline
-        rule /[\|#]/, Comment::Multiline
+        rule %r/#\|/, Comment::Multiline, :multiline_comment
+        rule %r/\|#/, Comment::Multiline, :pop!
+        rule %r/[^\|#]+/, Comment::Multiline
+        rule %r/[\|#]/, Comment::Multiline
       end
 
       state :commented_form do
-        rule /\(/, Comment, :commented_form
-        rule /\)/, Comment, :pop!
-        rule /[^()]+/, Comment
+        rule %r/\(/, Comment, :commented_form
+        rule %r/\)/, Comment, :pop!
+        rule %r/[^()]+/, Comment
       end
     end
   end

data/lib/rouge/lexers/conf.rb

@@ -1,4 +1,5 @@
 # -*- coding: utf-8 -*- #
+# frozen_string_literal: true
 
 module Rouge
   module Lexers
@@ -12,12 +13,12 @@ module Rouge
 
       # short and sweet
       state :root do
-        rule /#.*?\n/, Comment
-        rule /".*?"/, Str::Double
-        rule /'.*?'/, Str::Single
-        rule /[a-z]\w*/i, Name
-        rule /\d+/, Num
-        rule /[^\d\w#"']+/, Text
+        rule %r/#.*?\n/, Comment
+        rule %r/".*?"/, Str::Double
+        rule %r/'.*?'/, Str::Single
+        rule %r/[a-z]\w*/i, Name
+        rule %r/\d+/, Num
+        rule %r/[^\w#"']+/, Text
       end
     end
   end