Correct new Raise functions to be static

This commit is contained in:
William S Fulton 2022-10-14 22:51:26 +01:00
commit 0e60d6b7a4
2 changed files with 2 additions and 2 deletions

View file

@ -33,7 +33,7 @@
// raise // raise
%runtime %{ %runtime %{
void SWIG_Octave_Raise(const octave_value &obj, const char *type) { SWIGINTERN void SWIG_Octave_Raise(const octave_value &obj, const char *type) {
if (obj.is_string()) if (obj.is_string())
error("%s", obj.string_value().c_str()); error("%s", obj.string_value().c_str());
else else

View file

@ -27,7 +27,7 @@ SWIGEXPORT void SWIG_init(void) {
%end_block %enddef %end_block %enddef
%runtime %{ %runtime %{
void SWIG_R_Raise(SEXP obj, const char *msg) { SWIGINTERN void SWIG_R_Raise(SEXP obj, const char *msg) {
Rf_error(Rf_isString(obj) ? CHAR(Rf_asChar(obj)) : msg); Rf_error(Rf_isString(obj) ? CHAR(Rf_asChar(obj)) : msg);
} }
%} %}