git.iko.soy/elk
on 63243ca help sign in
elk/libraries/Native/Char.js
29 lines 1.3 kB history raw
1Elm.Native.Char = {};
2Elm.Native.Char.make = function(elm) {
3 elm.Native = elm.Native || {};
4 elm.Native.Char = elm.Native.Char || {};
5 if (elm.Native.Char.values) return elm.Native.Char.values;
7 function isBetween(lo,hi) { return function(chr) {
8 var c = chr.charCodeAt(0);
9 return lo <= c && c <= hi;
10 };
11 }
12 var isDigit = isBetween('0'.charCodeAt(0),'9'.charCodeAt(0));
13 var chk1 = isBetween('a'.charCodeAt(0),'f'.charCodeAt(0));
14 var chk2 = isBetween('A'.charCodeAt(0),'F'.charCodeAt(0));
16 return elm.Native.Char.values = {
17 fromCode : function(c) { return String.fromCharCode(c); },
18 toCode : function(c) { return c.toUpperCase().charCodeAt(0); },
19 toUpper : function(c) { return c.toUpperCase(); },
20 toLower : function(c) { return c.toLowerCase(); },
21 toLocaleUpper : function(c) { return c.toLocaleUpperCase(); },
22 toLocaleLower : function(c) { return c.toLocaleLowerCase(); },
23 isLower : isBetween('a'.charCodeAt(0),'z'.charCodeAt(0)),
24 isUpper : isBetween('A'.charCodeAt(0),'Z'.charCodeAt(0)),
25 isDigit : isDigit,
26 isOctDigit : isBetween('0'.charCodeAt(0),'7'.charCodeAt(0)),
27 isHexDigit : function(c) { return isDigit(c) || chk1(c) || chk2(c); }
28 };
29};