| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285 | // Generated by LiveScript 1.2.0(function(){  var parsedTypeCheck, types, toString$ = {}.toString;  parsedTypeCheck = require('type-check').parsedTypeCheck;  types = {    '*': function(it){      switch (toString$.call(it).slice(8, -1)) {      case 'Array':        return coerceType(it, {          type: 'Array'        });      case 'Object':        return coerceType(it, {          type: 'Object'        });      default:        return {          type: 'Just',          value: coerceTypes(it, [            {              type: 'Undefined'            }, {              type: 'Null'            }, {              type: 'NaN'            }, {              type: 'Boolean'            }, {              type: 'Number'            }, {              type: 'Date'            }, {              type: 'RegExp'            }, {              type: 'Array'            }, {              type: 'Object'            }, {              type: 'String'            }          ], {            explicit: true          })        };      }    },    Undefined: function(it){      if (it === 'undefined' || it === void 8) {        return {          type: 'Just',          value: void 8        };      } else {        return {          type: 'Nothing'        };      }    },    Null: function(it){      if (it === 'null') {        return {          type: 'Just',          value: null        };      } else {        return {          type: 'Nothing'        };      }    },    NaN: function(it){      if (it === 'NaN') {        return {          type: 'Just',          value: NaN        };      } else {        return {          type: 'Nothing'        };      }    },    Boolean: function(it){      if (it === 'true') {        return {          type: 'Just',          value: true        };      } else if (it === 'false') {        return {          type: 'Just',          value: false        };      } else {        return {          type: 'Nothing'        };      }    },    Number: function(it){      return {        type: 'Just',        value: +it      };    },    Int: function(it){      return {        type: 'Just',        value: parseInt(it)      };    },    Float: function(it){      return {        type: 'Just',        value: parseFloat(it)      };    },    Date: function(value, options){      var that;      if (that = /^\#(.*)\#$/.exec(value)) {        return {          type: 'Just',          value: new Date(+that[1] || that[1])        };      } else if (options.explicit) {        return {          type: 'Nothing'        };      } else {        return {          type: 'Just',          value: new Date(+value || value)        };      }    },    RegExp: function(value, options){      var that;      if (that = /^\/(.*)\/([gimy]*)$/.exec(value)) {        return {          type: 'Just',          value: new RegExp(that[1], that[2])        };      } else if (options.explicit) {        return {          type: 'Nothing'        };      } else {        return {          type: 'Just',          value: new RegExp(value)        };      }    },    Array: function(it){      return coerceArray(it, {        of: [{          type: '*'        }]      });    },    Object: function(it){      return coerceFields(it, {        of: {}      });    },    String: function(it){      var that;      if (toString$.call(it).slice(8, -1) !== 'String') {        return {          type: 'Nothing'        };      }      if (that = it.match(/^'(.*)'$/)) {        return {          type: 'Just',          value: that[1]        };      } else if (that = it.match(/^"(.*)"$/)) {        return {          type: 'Just',          value: that[1]        };      } else {        return {          type: 'Just',          value: it        };      }    }  };  function coerceArray(node, type){    var typeOf, element;    if (toString$.call(node).slice(8, -1) !== 'Array') {      return {        type: 'Nothing'      };    }    typeOf = type.of;    return {      type: 'Just',      value: (function(){        var i$, ref$, len$, results$ = [];        for (i$ = 0, len$ = (ref$ = node).length; i$ < len$; ++i$) {          element = ref$[i$];          results$.push(coerceTypes(element, typeOf));        }        return results$;      }())    };  }  function coerceTuple(node, type){    var result, i$, ref$, len$, i, types, that;    if (toString$.call(node).slice(8, -1) !== 'Array') {      return {        type: 'Nothing'      };    }    result = [];    for (i$ = 0, len$ = (ref$ = type.of).length; i$ < len$; ++i$) {      i = i$;      types = ref$[i$];      if (that = coerceTypes(node[i], types)) {        result.push(that);      }    }    return {      type: 'Just',      value: result    };  }  function coerceFields(node, type){    var typeOf, key, value;    if (toString$.call(node).slice(8, -1) !== 'Object') {      return {        type: 'Nothing'      };    }    typeOf = type.of;    return {      type: 'Just',      value: (function(){        var ref$, results$ = {};        for (key in ref$ = node) {          value = ref$[key];          results$[key] = coerceTypes(value, typeOf[key] || [{            type: '*'          }]);        }        return results$;      }())    };  }  function coerceType(node, typeObj, options){    var type, structure, coerceFunc;    type = typeObj.type, structure = typeObj.structure;    if (type) {      coerceFunc = types[type];      return coerceFunc(node, options);    } else {      switch (structure) {      case 'array':        return coerceArray(node, typeObj);      case 'tuple':        return coerceTuple(node, typeObj);      case 'fields':        return coerceFields(node, typeObj);      }    }  }  function coerceTypes(node, types, options){    var i$, len$, type, ref$, valueType, value;    for (i$ = 0, len$ = types.length; i$ < len$; ++i$) {      type = types[i$];      ref$ = coerceType(node, type, options), valueType = ref$.type, value = ref$.value;      if (valueType === 'Nothing') {        continue;      }      if (parsedTypeCheck([type], value)) {        return value;      }    }    throw new Error("Value " + JSON.stringify(node) + " does not type check against " + JSON.stringify(types) + ".");  }  module.exports = coerceTypes;}).call(this);
 |