/usr/share/highlight/langDefs/pro.lang is in highlight-common 3.9-1+deb7u1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 | -- Language definition generated by lang2to3
Description="Prolog"
Keywords={
{ Id=1,
List={"true", "fail", "at_end_of_stream", "nl", "repeat", "halt", "is", "rem", "mod"},
},
{ Id=2,
List={"call", "catch", "throw", "unify_with_occurs_check", "var", "atom", "integer", "float", "atomic", "compound", "nonvar", "number", "functor", "arg", "copy_term", "clause", "current_predicate", "asserta", "assertz", "retract", "abolish", "findall", "bagof", "setof", "current_input", "current_output", "set_input", "set_output", "open", "close", "stream_property", "at_end_of_stream", "set_stream_position", "get_char", "get_code", "peek_char", "peek_code", "put_char", "put_code", "nl", "get_byte", "peek_byte", "put_byte", "read_term", "read", "write_term", "write", "writeq", "write_canonical", "op", "current_op", "char_conversion", "current_char_conversion", "once", "atom_length", "atom_concat", "sub_atom", "atom_chars", "atom_codes", "char_code", "number_chars", "number_codes", "set_prolog_flag", "current_prolog_flag", "halt", "sin", "cos", "atan", "exp", "log", "sqrt"},
},
{ Id=3,
Regex=[[0(')\w+]],
},
{ Id=4,
Regex=[[(\w+)\s*\(]],
},
}
Strings={
Delimiter=[["|']],
}
IgnoreCase=false
Comments={
{ Block=false,
Delimiter= { [[%]] },
},
{ Block=true,
Nested=false,
Delimiter= { [[\/\*]],[[\*\/]],}
}
}
PreProcessor={
Prefix=[[#]],
}
Operators=[[\(|\)|\[|\]|\{|\}|\,|\;|\:|\&|\<|\>|\!|\=|\/|\*|\+|\-|\.]]
--FIXME no default escchar param: regex(\\\d{3}|\\x\p{XDigit}{2}|\\[ntvbrfa\\\?'"])
|