GNU Octave
4.2.1
A high-level interpreted language, primarily intended for numerical computations, mostly compatible with Matlab
Main Page
Namespaces
Classes
Files
File List
File Members
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Properties
Friends
Macros
Pages
liboctave
util
singleton-cleanup.cc
Go to the documentation of this file.
1
/*
2
3
Copyright (C) 2012-2017 John W. Eaton
4
5
This file is part of Octave.
6
7
Octave is free software; you can redistribute it and/or modify it
8
under the terms of the GNU General Public License as published by the
9
Free Software Foundation; either version 3 of the License, or (at your
10
option) any later version.
11
12
Octave is distributed in the hope that it will be useful, but WITHOUT
13
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
14
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15
for more details.
16
17
You should have received a copy of the GNU General Public License
18
along with Octave; see the file COPYING. If not, see
19
<http://www.gnu.org/licenses/>.
20
21
*/
22
23
#if defined (HAVE_CONFIG_H)
24
# include "config.h"
25
#endif
26
27
#include <
lo-error.h
>
28
#include <
singleton-cleanup.h
>
29
30
singleton_cleanup_list
*
singleton_cleanup_list::instance
= 0;
31
32
singleton_cleanup_list::~singleton_cleanup_list
(
void
)
33
{
34
for
(
auto
fcnptr :
fcn_list
)
35
{
36
fptr
fcn
= *fcnptr;
37
38
fcn
();
39
}
40
}
41
42
bool
43
singleton_cleanup_list::instance_ok
(
void
)
44
{
45
bool
retval
=
true
;
46
47
if
(!
instance
)
48
instance
=
new
singleton_cleanup_list
();
49
50
if
(!
instance
)
51
(*current_liboctave_error_handler)
52
(
"unable to create singleton_cleanup_list object!"
);
53
54
return
retval
;
55
}
singleton_cleanup_list
Definition:
singleton-cleanup.h:8
singleton_cleanup_list::~singleton_cleanup_list
~singleton_cleanup_list(void)
Definition:
singleton-cleanup.cc:32
singleton-cleanup.h
singleton_cleanup_list::instance
static singleton_cleanup_list * instance
Definition:
singleton-cleanup.h:32
fcn
octave_function * fcn
Definition:
ov-class.cc:1743
singleton_cleanup_list::fptr
void(* fptr)(void)
Definition:
singleton-cleanup.h:18
lo-error.h
retval
octave_value retval
Definition:
data.cc:6294
singleton_cleanup_list::instance_ok
static bool instance_ok(void)
Definition:
singleton-cleanup.cc:43
singleton_cleanup_list::singleton_cleanup_list
singleton_cleanup_list(void)
Definition:
singleton-cleanup.h:14
singleton_cleanup_list::fcn_list
std::set< fptr > fcn_list
Definition:
singleton-cleanup.h:38
Generated on Wed May 10 2017 15:43:00 for GNU Octave by
1.8.8