Check that we handle generative functors properly:

  $ $MERLIN single locate -look-for mli -position 13:12 -filename generative.ml < generative.ml
  {
    "class": "return",
    "value": {
      "file": "$TESTCASE_ROOT/generative.ml",
      "pos": {
        "line": 3,
        "col": 2
      }
    },
    "notifications": []
  }

  $ $MERLIN single locate -look-for ml -position 13:12 -filename generative.ml < generative.ml
  {
    "class": "return",
    "value": {
      "file": "$TESTCASE_ROOT/generative.ml",
      "pos": {
        "line": 8,
        "col": 6
      }
    },
    "notifications": []
  }
