List.insertAt not working

[pbiggar]

This inserted the value at the end instead of in the middle as intended.

      test("from darklang", () => {
        expect(insertAt(~index=5, ~value=1, [0, 2, 3, 4, 5, 6, 7, 8, 9]))
        |> toEqual(Eq.(list(int)), [0, 2, 3, 4, 5, 1, 6, 7, 8, 9])
      });

 FAIL  bucklescript/test/ListTest.bs.js
  ● List › insertAt › from darklang

    expect(received).toEqual(expected) // deep equality

    - Expected  - 2
    + Received  + 2

    @@ -7,19 +7,19 @@
            "tl": Object {
              "hd": 4,
              "tl": Object {
                "hd": 5,
                "tl": Object {
    -             "hd": 1,
    -             "tl": Object {
                  "hd": 6,
                  "tl": Object {
                    "hd": 7,
                    "tl": Object {
                      "hd": 8,
                      "tl": Object {
                        "hd": 9,
    +                   "tl": Object {
    +                     "hd": 1,
                          "tl": 0,
                        },
                      },
                    },
                  },

[pbiggar]

Fixed in #226