Mercurial > octave-nkf
view liboctave/numeric/DASRT.h @ 18840:4a4edf0f2077 nkf-ready
fix LLVM 3.4 build (bug #41061)
* configure.ac: Call new functions OCTAVE_LLVM_RAW_FD_OSTREAM_API and
OCTAVE_LLVM_LEGACY_PASSMANAGER_API, check for Verifier.h header file
* m4/acinclude.m4 (OCTAVE_LLVM_RAW_FD_OSTREAM_API): New function to
detect correct raw_fd_ostream API
* m4/acinclude.m4 (OCTAVE_LLVM_LEGACY_PASSMANAGER_API): New function
to detect legacy passmanager API
* libinterp/corefcn/jit-util.h: Use legacy passmanager namespace if
necessary
* libinterp/corefcn/pt-jit.h (class tree_jit): Use legacy passmanager
class if necessary
* libinterp/corefcn/pt-jit.cc: Include appropriate header files
* libinterp/corefcn/pt-jit.cc (tree_jit::initialize): Use legacy
passmanager if necessary
* libinterp/corefcn/pt-jit.cc (tree_jit::optimize): Use correct API
* libinterp/corefcn/jit-typeinfo.cc: Include appropriate header file
author | Stefan Mahr <dac922@gmx.de> |
---|---|
date | Sun, 11 May 2014 02:28:33 +0200 |
parents | 49a5a4be04a1 |
children | 4197fc428c7d |
line wrap: on
line source
/* Copyright (C) 2002-2013 John W. Eaton 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/>. */ #if !defined (octave_DASRT_h) #define octave_DASRT_h 1 #include <cfloat> #include "DASRT-opts.h" #include "lo-math.h" class DASRT_result { public: DASRT_result (void) : x (), xdot (), t () { } DASRT_result (const Matrix& xx, const Matrix& xxdot, const ColumnVector& tt) : x (xx), xdot (xxdot), t (tt) { } DASRT_result (const DASRT_result& r) : x (r.x), xdot (r.xdot), t (r.t) { } DASRT_result& operator = (const DASRT_result& r) { if (this != &r) { x = r.x; xdot = r.xdot; t = r.t; } return *this; } ~DASRT_result (void) { } Matrix state (void) const { return x; } Matrix deriv (void) const { return xdot; } ColumnVector times (void) const { return t; } private: Matrix x; Matrix xdot; ColumnVector t; }; class OCTAVE_API DASRT : public DAERT, public DASRT_options { public: DASRT (void) : DAERT (), DASRT_options (), initialized (false), liw (0), lrw (0), ng (0), info (), iwork (), jroot (), rwork (), abs_tol (), rel_tol () { } DASRT (const ColumnVector& s, double tm, DAERTFunc& f) : DAERT (s, tm, f), DASRT_options (), initialized (false), liw (0), lrw (0), ng (0), info (), iwork (), jroot (), rwork (), abs_tol (), rel_tol () { } DASRT (const ColumnVector& s, const ColumnVector& deriv, double tm, DAERTFunc& f) : DAERT (s, deriv, tm, f), DASRT_options (), initialized (false), liw (0), lrw (0), ng (0), info (), iwork (), jroot (), rwork (), abs_tol (), rel_tol () { } ~DASRT (void) { } DASRT_result integrate (const ColumnVector& tout); DASRT_result integrate (const ColumnVector& tout, const ColumnVector& tcrit); std::string error_message (void) const; private: bool initialized; octave_idx_type liw; octave_idx_type lrw; octave_idx_type ng; Array<octave_idx_type> info; Array<octave_idx_type> iwork; Array<octave_idx_type> jroot; Array<double> rwork; Array<double> abs_tol; Array<double> rel_tol; void integrate (double t); }; #endif