Remove array subscript operator object::operator []

Signed-off-by: yamacir-kit <[email protected]>

README.md

@@ -91,7 +91,7 @@ Procedures for each standard are provided by the following R7RS-style libraries:
 cmake -B build -DCMAKE_BUILD_TYPE=Release
 cd build
 make package
-sudo apt install build/meevax_0.5.71_amd64.deb
+sudo apt install build/meevax_0.5.72_amd64.deb
 ```
 
 or
@@ -123,9 +123,9 @@ sudo rm -rf /usr/local/share/meevax
 
 | Target Name | Description
 |-------------|-------------
-| `all`       | Build shared-library `libmeevax.0.5.71.so` and executable `meevax`
+| `all`       | Build shared-library `libmeevax.0.5.72.so` and executable `meevax`
 | `test`      | Test executable `meevax`
-| `package`   | Generate debian package `meevax_0.5.71_amd64.deb`
+| `package`   | Generate debian package `meevax_0.5.72_amd64.deb`
 | `install`   | Copy files into `/usr/local` directly
 
 ## Usage

VERSION

@@ -1 +1 @@
-0.5.71
+0.5.72

include/meevax/kernel/pair.hpp

@@ -139,10 +139,6 @@ inline namespace kernel
 
     virtual auto write(std::ostream &) const -> std::ostream &;
 
-    virtual auto operator [](std::size_t) const -> object const&;
-
-    virtual auto operator [](std::size_t) -> object &;
-
     constexpr auto begin() noexcept
     {
       return iterator(this);

include/meevax/kernel/vector.hpp

@@ -37,10 +37,6 @@ inline namespace kernel
     explicit heterogeneous_vector(Iterator begin, Iterator end)
       : vector { begin, end }
     {}
-
-    auto operator [](std::size_t) const -> object const&;
-
-    auto operator [](std::size_t) -> object &;
   };
 
   auto operator ==(heterogeneous_vector const&, heterogeneous_vector const&) -> bool;

include/meevax/memory/heterogeneous_pointer.hpp

@@ -22,7 +22,6 @@
 #include <meevax/iostream/escape_sequence.hpp>
 #include <meevax/iostream/lexical_cast.hpp>
 #include <meevax/memory/gc_pointer.hpp>
-#include <meevax/type_traits/is_array_subscriptable.hpp>
 #include <meevax/type_traits/is_equality_comparable.hpp>
 #include <meevax/type_traits/is_output_streamable.hpp>
 #include <meevax/utility/combination.hpp>
@@ -84,30 +83,6 @@ inline namespace memory
           return os << magenta("#,(") << green(typeid(Bound).name()) << faint(" #;", static_cast<Bound const*>(this)) << magenta(")");
         }
       }
-
-      auto operator []([[maybe_unused]] std::size_t k) const -> heterogeneous_pointer const& override
-      {
-        if constexpr (is_array_subscriptable_v<Bound const&>)
-        {
-          return static_cast<Bound const&>(*this)[k];
-        }
-        else
-        {
-          throw std::runtime_error(lexical_cast<std::string>("no viable array subscript operator for ", demangle(type())));
-        }
-      }
-
-      auto operator []([[maybe_unused]] std::size_t k) -> heterogeneous_pointer & override
-      {
-        if constexpr (is_array_subscriptable_v<Bound &>)
-        {
-          return static_cast<Bound &>(*this)[k];
-        }
-        else
-        {
-          throw std::runtime_error(lexical_cast<std::string>("no viable array subscript operator for ", demangle(type())));
-        }
-      }
     };
 
   public:
@@ -236,32 +211,6 @@ inline namespace memory
       }
     }
 
-    [[deprecated]]
-    inline auto operator [](std::size_t k) const -> heterogeneous_pointer const&
-    {
-      if (dereferenceable() and *this)
-      {
-        return get()->operator [](k);
-      }
-      else
-      {
-        throw std::runtime_error(lexical_cast<std::string>("no viable array subscript operator for ", demangle(type())));
-      }
-    }
-
-    [[deprecated]]
-    inline auto operator [](std::size_t k) -> heterogeneous_pointer &
-    {
-      if (dereferenceable() and *this)
-      {
-        return get()->operator [](k);
-      }
-      else
-      {
-        throw std::runtime_error(lexical_cast<std::string>("no viable array subscript operator for ", demangle(type())));
-      }
-    }
-
     friend auto operator <<(std::ostream & os, heterogeneous_pointer const& datum) -> std::ostream &
     {
       return datum.write(os);

src/kernel/pair.cpp

@@ -41,16 +41,6 @@ inline namespace kernel
     return os << *this;
   }
 
-  auto pair::operator [](std::size_t k) const -> object const&
-  {
-    return 0 < k ? second[--k] : first;
-  }
-
-  auto pair::operator [](std::size_t k) -> object &
-  {
-    return 0 < k ? second[--k] : first;
-  }
-
   auto operator <<(std::ostream & os, pair const& datum) -> std::ostream &
   {
     if (is_circular_list(cdr(datum)))

src/kernel/vector.cpp

@@ -34,16 +34,6 @@ inline namespace kernel
     : vector { size, x }
   {}
 
-  auto heterogeneous_vector::operator [](std::size_t index) const -> object const&
-  {
-    return vector[index];
-  }
-
-  auto heterogeneous_vector::operator [](std::size_t index) -> object &
-  {
-    return vector[index];
-  }
-
   auto operator ==(heterogeneous_vector const& v, heterogeneous_vector const& u) -> bool
   {
     return std::equal(v.vector.begin(), v.vector.end(),