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 102 103 104 105 106
|
/*
Copyright (C) 2000, 2001, 2002, 2003 RiskMap srl
Copyright (C) 2003, 2004, 2005 StatPro Italia srl
Copyright (c) 2005 Dominic Thuillier
This file is part of QuantLib, a free-software/open-source library
for financial quantitative analysts and developers - http://quantlib.org/
QuantLib is free software: you can redistribute it and/or modify it under the
terms of the QuantLib license. You should have received a copy of the
license along with this program; if not, please email quantlib-dev@lists.sf.net
The license is also available online at http://quantlib.org/html/license.html
This program 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 license for more details.
*/
#if defined(SWIGRUBY)
%module QuantLibc
#elif defined(SWIGCSHARP)
%module NQuantLibc
#else
%module QuantLib
#endif
%include exception.i
#if defined(SWIGMZSCHEME)
%include std_except.i
#endif
%exception {
try {
$action
} catch (std::out_of_range& e) {
SWIG_exception(SWIG_IndexError,const_cast<char*>(e.what()));
} catch (std::exception& e) {
SWIG_exception(SWIG_RuntimeError,const_cast<char*>(e.what()));
} catch (...) {
SWIG_exception(SWIG_UnknownError,"unknown error");
}
}
#if defined(SWIGPYTHON)
%{
#ifdef barrier
#undef barrier
#endif
#include <ql/qldefines.hpp>
const int __hexversion__ = QL_HEX_VERSION;
const char* __version__ = QL_VERSION;
%}
const int __hexversion__;
%immutable;
const char* __version__;
%mutable;
#endif
#if defined(SWIGRUBY)
%{
#ifdef accept
#undef accept
#endif
#ifdef close
#undef close
#endif
#ifdef times
#undef times
#endif
#ifdef Sleep
#undef Sleep
#endif
%}
#endif
#if defined(SWIGGUILE)
// code for loading shared library
%scheme%{
(define (load-quantlibc-in path)
(if (null? path)
(error "QuantLibc.so not found")
(let ((so-name (string-append (car path) "/QuantLibc.so")))
(if (file-exists? so-name)
(dynamic-call
"scm_init_QuantLib_module"
(dynamic-link so-name))
(load-quantlibc-in (cdr path))))))
(load-quantlibc-in %load-path)
%}
#endif
#if defined(SWIGCSHARP)
%{
#define SWIGSTDCALL
%}
#endif
//#if defined(SWIGPYTHON)
//%feature("autodoc");
//#endif
%include ql.i
|