forked from Unisay/purescript-lua-strings
-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathCodeUnits.js
More file actions
116 lines (102 loc) · 2.31 KB
/
CodeUnits.js
File metadata and controls
116 lines (102 loc) · 2.31 KB
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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
export const fromCharArray = function (a) {
return a.join("");
};
export const toCharArray = function (s) {
return s.split("");
};
export const singleton = function (c) {
return c;
};
export const _charAt = function (just) {
return function (nothing) {
return function (i) {
return function (s) {
return i >= 0 && i < s.length ? just(s.charAt(i)) : nothing;
};
};
};
};
export const _toChar = function (just) {
return function (nothing) {
return function (s) {
return s.length === 1 ? just(s) : nothing;
};
};
};
export const length = function (s) {
return s.length;
};
export const countPrefix = function (p) {
return function (s) {
var i = 0;
while (i < s.length && p(s.charAt(i))) i++;
return i;
};
};
export const _indexOf = function (just) {
return function (nothing) {
return function (x) {
return function (s) {
var i = s.indexOf(x);
return i === -1 ? nothing : just(i);
};
};
};
};
export const _indexOfStartingAt = function (just) {
return function (nothing) {
return function (x) {
return function (startAt) {
return function (s) {
if (startAt < 0 || startAt > s.length) return nothing;
var i = s.indexOf(x, startAt);
return i === -1 ? nothing : just(i);
};
};
};
};
};
export const _lastIndexOf = function (just) {
return function (nothing) {
return function (x) {
return function (s) {
var i = s.lastIndexOf(x);
return i === -1 ? nothing : just(i);
};
};
};
};
export const _lastIndexOfStartingAt = function (just) {
return function (nothing) {
return function (x) {
return function (startAt) {
return function (s) {
var i = s.lastIndexOf(x, startAt);
return i === -1 ? nothing : just(i);
};
};
};
};
};
export const take = function (n) {
return function (s) {
return s.substr(0, n);
};
};
export const drop = function (n) {
return function (s) {
return s.substring(n);
};
};
export const slice = function (b) {
return function (e) {
return function (s) {
return s.slice(b,e);
};
};
};
export const splitAt = function (i) {
return function (s) {
return { before: s.substring(0, i), after: s.substring(i) };
};
};