Delete lambda list handler vestiges

Author: Bike

include/clasp/core/arguments.h

@@ -51,7 +51,6 @@ class Argument {
   inline bool isDefined() const { return (this->_ArgTarget) && (this->_ArgTarget.notnilp()); };
   inline bool _symbolP() const { return cl__symbolp(this->_ArgTarget); };
   Symbol_sp symbol() const;
-  inline bool _lambdaListHandlerP() const { return core__lambda_list_handler_p(this->_ArgTarget); };
   inline bool _lambdaListP() const { return this->_ArgTarget.consp(); };
   List_sp lambda_list() const;
   inline bool targetIsLexical() const { return this->_ArgTargetFrameIndex != SPECIAL_TARGET; }

include/clasp/core/creator.h

@@ -35,7 +35,6 @@ class Creator_O : public Function_O {
   virtual bool allocates() const { return true; };
   /*! If this is the allocator for a primary CxxAdapter class then return true, */
   T_sp functionName() const override { return nil<T_O>(); };
-  T_sp lambdaListHandler() const override { return nil<T_O>(); };
   T_sp lambda_list() const { return nil<T_O>(); };
   T_sp setSourcePosInfo(T_sp sourceFile, size_t filePos, int lineno, int column) { return nil<T_O>(); };
   virtual int duplicationLevel() const { return 0; };

include/clasp/core/function.h

@@ -186,10 +186,8 @@ class Function_O : public General_O {
   virtual bool compiledP() const;
   virtual bool builtinP() const { return false; };
   virtual T_sp sourcePosInfo() const { return nil<T_O>(); };
-  CL_DEFMETHOD T_sp functionLambdaListHandler() const { return this->lambdaListHandler(); }
   T_sp setSourcePosInfo(T_sp sourceFile, size_t filePos, int lineno, int column);
   virtual T_mv functionSourcePos() const;
-  virtual T_sp lambdaListHandler() const { SUBIMP(); };
   virtual T_sp lambdaList() const { return this->fdesc()->lambdaList(); }
   virtual string __repr__() const;
 };
@@ -476,8 +474,6 @@ class Closure_O final : public core::Function_O {
 public:
   Closure_O(size_t capacity, SimpleFun_sp ep) : Base(ep), _Slots(capacity, unbound<T_O>(), true){};
   virtual string __repr__() const override;
-  // FIXME: DELETE ME
-  core::T_sp lambdaListHandler() const override { return nil<T_O>(); }
   bool compiledP() const override { return true; }
   bool openP();
   inline T_sp& operator[](size_t idx) {

include/clasp/core/predicates.h

@@ -100,7 +100,6 @@ bool core__executableP(T_sp obj);
 bool core__external_object_p(T_sp obj);
 bool core__fixnump(T_sp obj);
 bool core__interpreted_function_p(T_sp obj);
-bool core__lambda_list_handler_p(T_sp obj);
 bool core__logical_pathname_p(T_sp obj);
 bool core__long_float_p(T_sp obj);
 bool core__pointerp(T_sp obj);