/usr/include/octave-3.8.1/octave/ov-oncleanup.h is in liboctave-dev 3.8.1-1ubuntu1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 | /*
Copyright (C) 2010-2013 VZLU Prague
This file is part of Octave.
Octave is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation; either version 3 of the License, or (at your
option) any later version.
Octave is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
You should have received a copy of the GNU General Public License
along with Octave; see the file COPYING. If not, see
<http://www.gnu.org/licenses/>.
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <iosfwd>
#include "ov-base.h"
#include "ov-struct.h"
#include "ov.h"
static void
gripe_internal (void)
{
error ("onCleanup: internal error: cloning nonempty object");
}
class octave_oncleanup : public octave_base_value
{
public:
octave_oncleanup (void) : fcn () { }
octave_oncleanup (const octave_value& fcn);
octave_base_value *clone (void) const
{
if (fcn.is_defined ())
gripe_internal ();
return empty_clone ();
}
octave_base_value *empty_clone (void) const
{
return new octave_oncleanup ();
}
~octave_oncleanup (void);
bool is_defined (void) const { return true; }
bool is_object (void) const { return true; } // do we want this?
octave_map map_value (void) const { return scalar_map_value (); }
octave_scalar_map scalar_map_value (void) const;
dim_vector dims (void) const
{
static dim_vector dv (1, 1);
return dv;
}
bool save_ascii (std::ostream& os);
bool load_ascii (std::istream& is);
bool save_binary (std::ostream& os, bool& save_as_floats);
bool load_binary (std::istream& is, bool swap,
oct_mach_info::float_format fmt);
#if defined (HAVE_HDF5)
bool save_hdf5 (hid_t loc_id, const char *name, bool save_as_floats);
bool load_hdf5 (hid_t loc_id, const char *name);
#endif
void print (std::ostream& os, bool pr_as_read_syntax = false) const;
void print_raw (std::ostream& os, bool pr_as_read_syntax = false) const;
private:
DECLARE_OV_TYPEID_FUNCTIONS_AND_DATA
protected:
octave_value fcn;
};
|