update swig on windows
This commit is contained in:
25
winx64/bin/swigwin-4.0.0/Lib/guile/std_common.i
Normal file
25
winx64/bin/swigwin-4.0.0/Lib/guile/std_common.i
Normal file
@@ -0,0 +1,25 @@
|
||||
/* -----------------------------------------------------------------------------
|
||||
* std_common.i
|
||||
*
|
||||
* SWIG typemaps for STL - common utilities
|
||||
* ----------------------------------------------------------------------------- */
|
||||
|
||||
%include <std/std_except.i>
|
||||
|
||||
%apply size_t { std::size_t };
|
||||
|
||||
#define SWIG_bool2scm(b) scm_from_bool(b ? 1 : 0)
|
||||
#define SWIG_string2scm(s) SWIG_str02scm(s.c_str())
|
||||
|
||||
%{
|
||||
#include <string>
|
||||
|
||||
SWIGINTERNINLINE
|
||||
std::string SWIG_scm2string(SCM x) {
|
||||
char* temp;
|
||||
temp = SWIG_scm2str(x);
|
||||
std::string s(temp);
|
||||
if (temp) SWIG_free(temp);
|
||||
return s;
|
||||
}
|
||||
%}
|
||||
Reference in New Issue
Block a user