flang/tools/f18-parse-demo/stub-evaluate.cpp

   1 //===-- tools/f18/stub-evaluate.cpp ---------------------------------------===//
   2 //
   3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
   4 // See https://llvm.org/LICENSE.txt for license information.
   5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
   6 //
   7 //===----------------------------------------------------------------------===//
   8
   9 // The parse tree has slots in which pointers to the results of semantic
  10 // analysis may be placed.  When using the parser without the semantics
  11 // libraries, as here, we need to stub out the dependences on the external
  12 // deleters, which will never actually be called.
  13
  14 namespace Fortran::evaluate {
  15 struct GenericExprWrapper {
  16   static void Deleter(GenericExprWrapper *);
  17 };
  18 void GenericExprWrapper::Deleter(GenericExprWrapper *) {}
  19 struct GenericAssignmentWrapper {
  20   static void Deleter(GenericAssignmentWrapper *);
  21 };
  22 void GenericAssignmentWrapper::Deleter(GenericAssignmentWrapper *) {}
  23 struct ProcedureRef {
  24   static void Deleter(ProcedureRef *);
  25 };
  26 void ProcedureRef::Deleter(ProcedureRef *) {}
  27 } // namespace Fortran::evaluate