include/libfcollector.h

   1 ! Copyright (C) 2021-2023 Free Software Foundation, Inc.
   2 ! Contributed by Oracle.
   3 !
   4 ! This file is part of GNU Binutils.
   5 !
   6 ! This program is free software; you can redistribute it and/or modify
   7 ! it under the terms of the GNU General Public License as published by
   8 ! the Free Software Foundation; either version 3, or (at your option)
   9 ! any later version.
  10 !
  11 ! This program is distributed in the hope that it will be useful,
  12 ! but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 ! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 ! GNU General Public License for more details.
  15 !
  16 ! You should have received a copy of the GNU General Public License
  17 ! along with this program; if not, write to the Free Software
  18 ! Foundation, 51 Franklin Street - Fifth Floor, Boston,
  19 ! MA 02110-1301, USA.
  20 !
  21 ! Developer Sampling Collector interface include file
  22
  23         interface
  24
  25         ! Routine to record a sample in the experiment.
  26         subroutine collector_sample(name)
  27         character(len=*), intent(in) :: name
  28         end subroutine
  29
  30         ! Routine to suspend data collection during an experiment.
  31         subroutine collector_pause()
  32         end subroutine
  33
  34         ! Routine to resume data collection during an experiment.
  35         subroutine collector_resume()
  36         end subroutine
  37
  38         ! Routine to stop all data collection and close the experiment.
  39         subroutine collector_terminate_expt()
  40         end subroutine
  41
  42         end interface