-
Notifications
You must be signed in to change notification settings - Fork 465
/
Copy pathcaml_sys.js
77 lines (59 loc) · 1.64 KB
/
caml_sys.js
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
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
// GENERATED CODE BY BUCKLESCRIPT VERSION 0.6.2 , PLEASE EDIT WITH CARE
'use strict';
var Caml_builtin_exceptions = require("./caml_builtin_exceptions");
function caml_raise_not_found() {
throw Caml_builtin_exceptions.not_found;
}
function $$caml_sys_getenv(n) {
//nodejs env
if (typeof process !== 'undefined'
&& process.env
&& process.env[n] != undefined){
return process.env[n]
}
else{
caml_raise_not_found()
};
}
;
function $$date(){
return (+new Date())
};
;
var caml_initial_time = $$date() * 0.001;
function caml_sys_time() {
return ($$date() - caml_initial_time) * 0.001;
}
function caml_sys_random_seed() {
return /* array */[(($$date() | 0) ^ 4294967295) * Math.random() | 0];
}
function caml_sys_system_command() {
return 127;
}
function caml_sys_getcwd() {
return "/";
}
function caml_sys_is_directory() {
throw [
Caml_builtin_exceptions.failure,
"caml_sys_is_directory not implemented"
];
}
function caml_sys_file_exists() {
throw [
Caml_builtin_exceptions.failure,
"caml_sys_file_exists not implemented"
];
}
function caml_sys_getenv(prim) {
return $$caml_sys_getenv(prim);
}
exports.caml_raise_not_found = caml_raise_not_found;
exports.caml_sys_getenv = caml_sys_getenv;
exports.caml_sys_time = caml_sys_time;
exports.caml_sys_random_seed = caml_sys_random_seed;
exports.caml_sys_system_command = caml_sys_system_command;
exports.caml_sys_getcwd = caml_sys_getcwd;
exports.caml_sys_is_directory = caml_sys_is_directory;
exports.caml_sys_file_exists = caml_sys_file_exists;
/* Not a pure module */