js_null_undefined_test.js

// Generated by ReScript, PLEASE EDIT WITH CARE
'use strict';

var Mt = require("./mt.js");
var Caml_option = require("../../lib/js/caml_option.js");
var Js_null_undefined = require("../../lib/js/js_null_undefined.js");

var suites_0 = [
  "toOption - null",
  (function (param) {
      return {
              TAG: "Eq",
              _0: undefined,
              _1: undefined
            };
    })
];

var suites_1 = {
  hd: [
    "toOption - undefined",
    (function (param) {
        return {
                TAG: "Eq",
                _0: undefined,
                _1: undefined
              };
      })
  ],
  tl: {
    hd: [
      "toOption - empty",
      (function (param) {
          return {
                  TAG: "Eq",
                  _0: undefined,
                  _1: undefined
                };
        })
    ],
    tl: {
      hd: [
        "File \"js_null_undefined_test.res\", line 9, characters 5-12",
        (function (param) {
            return {
                    TAG: "Eq",
                    _0: "foo",
                    _1: Caml_option.nullable_to_opt("foo")
                  };
          })
      ],
      tl: {
        hd: [
          "return",
          (function (param) {
              return {
                      TAG: "Eq",
                      _0: "something",
                      _1: Caml_option.nullable_to_opt("something")
                    };
            })
        ],
        tl: {
          hd: [
            "test - null",
            (function (param) {
                return {
                        TAG: "Eq",
                        _0: true,
                        _1: true
                      };
              })
          ],
          tl: {
            hd: [
              "test - undefined",
              (function (param) {
                  return {
                          TAG: "Eq",
                          _0: true,
                          _1: true
                        };
                })
            ],
            tl: {
              hd: [
                "test - empty",
                (function (param) {
                    return {
                            TAG: "Eq",
                            _0: true,
                            _1: true
                          };
                  })
              ],
              tl: {
                hd: [
                  "File \"js_null_undefined_test.res\", line 14, characters 5-12",
                  (function (param) {
                      return {
                              TAG: "Eq",
                              _0: true,
                              _1: true
                            };
                    })
                ],
                tl: {
                  hd: [
                    "bind - null",
                    (function (param) {
                        return {
                                TAG: "StrictEq",
                                _0: null,
                                _1: Js_null_undefined.bind(null, (function (v) {
                                        return v;
                                      }))
                              };
                      })
                  ],
                  tl: {
                    hd: [
                      "bind - undefined",
                      (function (param) {
                          return {
                                  TAG: "StrictEq",
                                  _0: undefined,
                                  _1: Js_null_undefined.bind(undefined, (function (v) {
                                          return v;
                                        }))
                                };
                        })
                    ],
                    tl: {
                      hd: [
                        "bind - empty",
                        (function (param) {
                            return {
                                    TAG: "StrictEq",
                                    _0: undefined,
                                    _1: Js_null_undefined.bind(undefined, (function (v) {
                                            return v;
                                          }))
                                  };
                          })
                      ],
                      tl: {
                        hd: [
                          "bind - 'a",
                          (function (param) {
                              return {
                                      TAG: "Eq",
                                      _0: 4,
                                      _1: Js_null_undefined.bind(2, (function (n) {
                                              return (n << 1);
                                            }))
                                    };
                            })
                        ],
                        tl: {
                          hd: [
                            "iter - null",
                            (function (param) {
                                var hit = {
                                  contents: false
                                };
                                Js_null_undefined.iter(null, (function (param) {
                                        hit.contents = true;
                                      }));
                                return {
                                        TAG: "Eq",
                                        _0: false,
                                        _1: hit.contents
                                      };
                              })
                          ],
                          tl: {
                            hd: [
                              "iter - undefined",
                              (function (param) {
                                  var hit = {
                                    contents: false
                                  };
                                  Js_null_undefined.iter(undefined, (function (param) {
                                          hit.contents = true;
                                        }));
                                  return {
                                          TAG: "Eq",
                                          _0: false,
                                          _1: hit.contents
                                        };
                                })
                            ],
                            tl: {
                              hd: [
                                "iter - empty",
                                (function (param) {
                                    var hit = {
                                      contents: false
                                    };
                                    Js_null_undefined.iter(undefined, (function (param) {
                                            hit.contents = true;
                                          }));
                                    return {
                                            TAG: "Eq",
                                            _0: false,
                                            _1: hit.contents
                                          };
                                  })
                              ],
                              tl: {
                                hd: [
                                  "iter - 'a",
                                  (function (param) {
                                      var hit = {
                                        contents: 0
                                      };
                                      Js_null_undefined.iter(2, (function (v) {
                                              hit.contents = v;
                                            }));
                                      return {
                                              TAG: "Eq",
                                              _0: 2,
                                              _1: hit.contents
                                            };
                                    })
                                ],
                                tl: {
                                  hd: [
                                    "fromOption - None",
                                    (function (param) {
                                        return {
                                                TAG: "Eq",
                                                _0: undefined,
                                                _1: Js_null_undefined.fromOption(undefined)
                                              };
                                      })
                                  ],
                                  tl: {
                                    hd: [
                                      "fromOption - Some",
                                      (function (param) {
                                          return {
                                                  TAG: "Eq",
                                                  _0: 2,
                                                  _1: Js_null_undefined.fromOption(2)
                                                };
                                        })
                                    ],
                                    tl: {
                                      hd: [
                                        "null <> undefined",
                                        (function (param) {
                                            return {
                                                    TAG: "Ok",
                                                    _0: true
                                                  };
                                          })
                                      ],
                                      tl: {
                                        hd: [
                                          "null <> empty",
                                          (function (param) {
                                              return {
                                                      TAG: "Ok",
                                                      _0: true
                                                    };
                                            })
                                        ],
                                        tl: {
                                          hd: [
                                            "undefined = empty",
                                            (function (param) {
                                                return {
                                                        TAG: "Ok",
                                                        _0: true
                                                      };
                                              })
                                          ],
                                          tl: {
                                            hd: [
                                              "File \"js_null_undefined_test.res\", line 57, characters 6-13",
                                              (function (param) {
                                                  return {
                                                          TAG: "Ok",
                                                          _0: true
                                                        };
                                                })
                                            ],
                                            tl: /* [] */0
                                          }
                                        }
                                      }
                                    }
                                  }
                                }
                              }
                            }
                          }
                        }
                      }
                    }
                  }
                }
              }
            }
          }
        }
      }
    }
  }
};

var suites = {
  hd: suites_0,
  tl: suites_1
};

Mt.from_pair_suites("Js_null_undefined_test", suites);

exports.suites = suites;
/*  Not a pure module */