File: purescript.lang

package info (click to toggle)
highlight 4.10-1.1
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 7,556 kB
  • sloc: cpp: 27,579; makefile: 411; sh: 341; ansic: 264; php: 236; python: 217; ruby: 132; perl: 61; tcl: 1
file content (52 lines) | stat: -rw-r--r-- 1,289 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
-- vim: filetype=lua
Description="PureScript"

Categories = {"source"}

Keywords={
  -- Type-level keywords + booleans
  { Id=1,
    List={"class", "data", "instance", "kind", "newtype", "type", "forall", "\xE2\x88\x80", "true", "false"}
  },
  -- Module-level keywords
  { Id=2,
    List={"module", "import", "where", "foreign", "as", "infixl", "infixr", "infix", "derive"}
  },
  -- Expression-level keywords
  { Id=4,
    List={"if", "then", "else", "case", "of", "do", "ado", "let", "in"}
  }
}

Strings={
  Delimiter=[["|']],
}

-- Borrowed from the Haskell language definition
-- Escape sequences only occur inside strings
-- strings ending with ' should not be confused with identifiers
-- TODO: check ' and "
function OnStateChange(oldState, newState, token, kwgroup)
  if newState==HL_ESC_SEQ and oldState~=HL_STRING or string.match(token, "%a+'" ) and oldState==HL_STRING then
    return HL_REJECT
  end

  return newState
end

-- FIXME: :lower: doesn’t work as expected for PureScript
Identifiers=[[ [a-zа-яαβγδεζηθικλμνξοπρςστυφχψω][\wА-Яа-яΑ-Ωα-ω0-9_']* ]]

IgnoreCase=false

Comments={
  { Block=false,
    Delimiter= { [[--]] },
  },
  { Block=true,
    Nested=false,
    Delimiter= { [[\{\-]],[[\-\}]],}
  }
}

Operators=[[ [^\s\w]+ ]]