Page Menu
Home
Software Heritage
Search
Configure Global Search
Log In
Files
F9124780
ocaml.js
No One
Temporary
Actions
View File
Edit File
Delete File
View Transforms
Subscribe
Mute Notifications
Award Token
Flag For Later
Size
2 KB
Subscribers
None
ocaml.js
View Options
/*
Language: OCaml
Author: Mehdi Dogguy <mehdi@dogguy.org>
Contributors: Nicolas Braud-Santoni <nicolas.braud-santoni@ens-cachan.fr>, Mickael Delahaye <mickael.delahaye@gmail.com>
Description: OCaml language definition.
Category: functional
*/
function
(
hljs
)
{
/* missing support for heredoc-like string (OCaml 4.0.2+) */
return
{
aliases
:
[
'ml'
],
keywords
:
{
keyword
:
'and as assert asr begin class constraint do done downto else end '
+
'exception external for fun function functor if in include '
+
'inherit! inherit initializer land lazy let lor lsl lsr lxor match method!|10 method '
+
'mod module mutable new object of open! open or private rec sig struct '
+
'then to try type val! val virtual when while with '
+
/* camlp4 */
'parser value'
,
built_in
:
/* built-in types */
'array bool bytes char exn|5 float int int32 int64 list lazy_t|5 nativeint|5 string unit '
+
/* (some) types in Pervasives */
'in_channel out_channel ref'
,
literal
:
'true false'
},
illegal
:
/\/\/|>>/
,
lexemes
:
'[a-z_]\\w*!?'
,
contains
:
[
{
className
:
'literal'
,
begin
:
'\\[(\\|\\|)?\\]|\\(\\)'
,
relevance
:
0
},
hljs
.
COMMENT
(
'\\(\\*'
,
'\\*\\)'
,
{
contains
:
[
'self'
]
}
),
{
/* type variable */
className
:
'symbol'
,
begin
:
'\'[A-Za-z_](?!\')[\\w\']*'
/* the grammar is ambiguous on how 'a'b should be interpreted but not the compiler */
},
{
/* polymorphic variant */
className
:
'type'
,
begin
:
'`[A-Z][\\w\']*'
},
{
/* module or constructor */
className
:
'type'
,
begin
:
'\\b[A-Z][\\w\']*'
,
relevance
:
0
},
{
/* don't color identifiers, but safely catch all identifiers with '*/
begin
:
'[a-z_]\\w*\'[\\w\']*'
,
relevance
:
0
},
hljs
.
inherit
(
hljs
.
APOS_STRING_MODE
,
{
className
:
'string'
,
relevance
:
0
}),
hljs
.
inherit
(
hljs
.
QUOTE_STRING_MODE
,
{
illegal
:
null
}),
{
className
:
'number'
,
begin
:
'\\b(0[xX][a-fA-F0-9_]+[Lln]?|'
+
'0[oO][0-7_]+[Lln]?|'
+
'0[bB][01_]+[Lln]?|'
+
'[0-9][0-9_]*([Lln]|(\\.[0-9_]*)?([eE][-+]?[0-9_]+)?)?)'
,
relevance
:
0
},
{
begin
:
/[-=]>/
// relevance booster
}
]
}
}
File Metadata
Details
Attached
Mime Type
text/plain
Expires
Sat, Jun 21, 7:33 PM (2 w, 4 d ago)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
3350986
Attached To
R65 Staging repository
Event Timeline
Log In to Comment