0

Update to 8.0

This commit is contained in:
Rogaboru Kujimoshi
2014-06-08 21:04:39 +04:00
parent 81d0115677
commit a52831ccdb
134 changed files with 10392 additions and 4999 deletions

View File

@@ -0,0 +1,49 @@
/*
Language: OCaml
Author: Mehdi Dogguy <mehdi@dogguy.org>
Contributors: Nicolas Braud-Santoni <nicolas.braud-santoni@ens-cachan.fr>
Description: OCaml language definition.
*/
function(hljs) {
return {
aliases: ['ml'],
keywords: {
keyword:
'and as assert asr begin class constraint do done downto else end ' +
'exception external false for fun function functor if in include ' +
'inherit initializer land lazy let lor lsl lsr lxor match method ' +
'mod module mutable new object of open or private rec ref sig struct ' +
'then to true try type val virtual when while with parser value',
built_in:
'bool char float int list unit array exn option int32 int64 nativeint ' +
'format4 format6 lazy_t in_channel out_channel string'
},
illegal: /\/\//,
contains: [
{
className: 'string',
begin: '"""', end: '"""'
},
{
className: 'comment',
begin: '\\(\\*', end: '\\*\\)',
contains: ['self']
},
{
className: 'class',
beginKeywords: 'type', end: '\\(|=|$', excludeEnd: true,
contains: [
hljs.UNDERSCORE_TITLE_MODE
]
},
{
className: 'annotation',
begin: '\\[<', end: '>\\]'
},
hljs.C_BLOCK_COMMENT_MODE,
hljs.inherit(hljs.APOS_STRING_MODE, {illegal: null}),
hljs.inherit(hljs.QUOTE_STRING_MODE, {illegal: null}),
hljs.C_NUMBER_MODE
]
}
}