rf-web/vendor/bundle/gems/rouge-3.12.0/lib/rouge/lexers/prolog.rb

68 lines
1.6 KiB
Ruby
Raw Normal View History

2019-10-21 08:18:17 +00:00
# -*- coding: utf-8 -*- #
# frozen_string_literal: true
module Rouge
module Lexers
class Prolog < RegexLexer
title "Prolog"
desc "The Prolog programming language (http://en.wikipedia.org/wiki/Prolog)"
tag 'prolog'
aliases 'prolog'
filenames '*.pro', '*.P', '*.prolog', '*.pl'
mimetypes 'text/x-prolog'
start { push :bol }
state :bol do
rule %r/#.*/, Comment::Single
rule(//) { pop! }
end
state :basic do
rule %r/\s+/, Text
rule %r/%.*/, Comment::Single
rule %r/\/\*/, Comment::Multiline, :nested_comment
rule %r/[\[\](){}|.,;!]/, Punctuation
rule %r/:-|-->/, Punctuation
rule %r/"[^"]*"/, Str::Double
rule %r/\d+\.\d+/, Num::Float
rule %r/\d+/, Num
end
state :atoms do
rule %r/[[:lower:]]([[:word:]])*/, Str::Symbol
rule %r/'[^']*'/, Str::Symbol
end
state :operators do
rule %r/(<|>|=<|>=|==|=:=|=|\/|\/\/|\*|\+|-)(?=\s|[a-zA-Z0-9\[])/,
Operator
rule %r/is/, Operator
rule %r/(mod|div|not)/, Operator
rule %r/[#&*+-.\/:<=>?@^~]+/, Operator
end
state :variables do
rule %r/[A-Z]+\w*/, Name::Variable
rule %r/_[[:word:]]*/, Name::Variable
end
state :root do
mixin :basic
mixin :atoms
mixin :variables
mixin :operators
end
state :nested_comment do
rule %r(/\*), Comment::Multiline, :push
rule %r/\s*\*[^*\/]+/, Comment::Multiline
rule %r(\*/), Comment::Multiline, :pop!
end
end
end
end