caml_js_exceptions.js

'use strict';

var Caml_option = require("./caml_option.js");
var Caml_exceptions = require("./caml_exceptions.js");

var $$Error = Caml_exceptions.create("Caml_js_exceptions.Error");

function internalToOCamlException(e) {
  if (Caml_exceptions.caml_is_extension(e)) {
    return e;
  } else {
    return {
            ExceptionID: $$Error.ExceptionID,
            _1: e,
            Debug: $$Error.Debug
          };
  }
}

function caml_as_js_exn(exn) {
  if (exn.ExceptionID === $$Error.ExceptionID) {
    return Caml_option.some(exn._1);
  }
  
}

exports.$$Error = $$Error;
exports.internalToOCamlException = internalToOCamlException;
exports.caml_as_js_exn = caml_as_js_exn;
/* No side effect */