Module: RuVim::Lang::Ocaml

Defined in:
lib/ruvim/lang/ocaml.rb

Constant Summary collapse

KEYWORDS = 
%w[
  and as assert begin class constraint do done downto else end
  exception external false for fun function functor if in include
  inherit initializer lazy let match method mod module mutable
  new nonrec object of open or private rec sig struct then to
  true try type val virtual when while with
].freeze
KEYWORD_RE = 
/\b(?:#{KEYWORDS.join("|")})\b/
STRING_DOUBLE_RE = 
/"(?:\\.|[^"\\])*"/
CHAR_RE = 
/'(?:\\.|[^'\\])'/
NUMBER_RE = 
/\b(?:0[xXoObB][\da-fA-F_]+|\d[\d_]*(?:\.[\d_]+)?(?:[eE][+-]?\d+)?)\b/
BLOCK_COMMENT_RE = 
/\(\*.*?\*\)/
MODULE_RE = 
/\b[A-Z]\w*(?:\.[A-Z]\w*)*/
VARIANT_RE = 
/\b[A-Z]\w*\b/
TYPE_VAR_RE = 
/'\w+/
OPERATOR_RE = 
/->|::|;;|<-|\|>/
INDENT_OPEN_RE = 
/\b(?:struct|sig|begin|do|then|else)\s*$/
INDENT_CLOSE_RE = 
/\A\s*(?:end|done)\b/
DEDENT_TRIGGERS = 
{
  "d" => /\A(\s*)end\z/,
  "e" => /\A(\s*)(?:done|else)\z/
}.freeze

Class Method Summary collapse

Class Method Details

.calculate_indent(lines, target_row, shiftwidth) ⇒ Object 



34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
 
# File 'lib/ruvim/lang/ocaml.rb', line 34

def calculate_indent(lines, target_row, shiftwidth)
  depth = 0
  (0...target_row).each do |row|
    line = lines[row].to_s.strip
    next if line.empty?

    depth += 1 if line.match?(/\b(?:struct|sig|begin|do)\b/)
    depth -= 1 if line.match?(/\A(?:end|done)\b/)
  end

  target_line = lines[target_row].to_s.strip
  depth -= 1 if target_line.match?(INDENT_CLOSE_RE)
  depth = 0 if depth < 0
  depth * shiftwidth
end

.color_columns(text) ⇒ Object 



58
59
60
61
62
63
64
65
66
67
68
69
 
# File 'lib/ruvim/lang/ocaml.rb', line 58

def color_columns(text)
  cols = {}
  Highlighter.apply_regex(cols, text, CHAR_RE, Highlighter::STRING_COLOR)
  Highlighter.apply_regex(cols, text, STRING_DOUBLE_RE, Highlighter::STRING_COLOR)
  Highlighter.apply_regex(cols, text, KEYWORD_RE, Highlighter::KEYWORD_COLOR)
  Highlighter.apply_regex(cols, text, TYPE_VAR_RE, Highlighter::VARIABLE_COLOR)
  Highlighter.apply_regex(cols, text, MODULE_RE, Highlighter::CONSTANT_COLOR)
  Highlighter.apply_regex(cols, text, NUMBER_RE, Highlighter::NUMBER_COLOR)
  Highlighter.apply_regex(cols, text, OPERATOR_RE, Highlighter::KEYWORD_COLOR)
  Highlighter.apply_regex(cols, text, BLOCK_COMMENT_RE, Highlighter::COMMENT_COLOR, override: true)
  cols
end

.dedent_trigger(char) ⇒ Object 



54
55
56
 
# File 'lib/ruvim/lang/ocaml.rb', line 54

def dedent_trigger(char)
  DEDENT_TRIGGERS[char]
end

.indent_trigger?(line) ⇒ Boolean

Returns:

  • (Boolean) 


50
51
52
 
# File 'lib/ruvim/lang/ocaml.rb', line 50

def indent_trigger?(line)
  line.to_s.rstrip.match?(INDENT_OPEN_RE)
end