fix(shared) better inner parameter selection

The logic of including a point in a range needs `-1` end_col offset
only if the point is from the cursor position
but not from the end of another range.

Fixes nvim-treesitter#700

lua/nvim-treesitter-textobjects/shared.lua

@@ -225,20 +225,19 @@ end
 ---@param row integer
 ---@param col integer
 ---@return boolean
-local function is_in_range(range, row, col)
+local function is_in_range(range, row, col, end_col_offset)
   local start_row, start_col, end_row, end_col = unpack(range) ---@type integer, integer, integer, integer
-  end_col = end_col - 1
+  end_col_offset = end_col_offset or 0
 
-  local is_in_rows = start_row <= row and end_row >= row
-  local is_after_start_col_if_needed = true
-  if start_row == row then
-    is_after_start_col_if_needed = col >= start_col
+  if start_row > row or end_row < row then
+    return false
   end
-  local is_before_end_col_if_needed = true
-  if end_row == row then
-    is_before_end_col_if_needed = col <= end_col
+
+  if start_row ~= row or col < start_col then
+    return false
   end
-  return is_in_rows and is_after_start_col_if_needed and is_before_end_col_if_needed
+
+  return end_row == row and col <= end_col + end_col_offset
 end
 
 ---@param range1 Range4
@@ -276,7 +275,7 @@ local function best_range_at_point(ranges, row, col, opts)
   local lookbehind_earliest_start ---@type integer
 
   for _, range in pairs(ranges) do
-    if range and is_in_range(M.torange4(range), row, col) then
+    if range and is_in_range(M.torange4(range), row, col, -1) then
       local length = range[6] - range[3]
       if not range_length or length < range_length then
         smallest_range = range