git.iko.soy/elk
on 7afe464 help sign in
elk/libraries/Native/Error.js
22 lines 615 B history raw
2Elm.Native.Error = function(elm) {
3 'use strict';
4 elm.Native = elm.Native || {};
5 if (elm.Native.Error) return elm.Native.Error;
7 var fromString = Elm.Native.JavaScript(elm).fromString;
9 function Case(span) {
10 var msg = 'Non-exhaustive pattern match in case expression'
11 throw new Error(msg + " (" + span + ")")
12 }
14 function If(span) {
15 var msg = 'Non-exhaustive pattern match in multi-way-if expression'
16 throw new Error(msg + " (" + span + ")")
17 }
19 function raise(str) { throw new Error(fromString(str)); }
21 return elm.Native.Error = { Case: Case, If: If, raise: raise };
22};