parent
5e06e0931e
commit
e1173cac26
1 changed files with 3 additions and 3 deletions
|
|
@ -34,11 +34,11 @@
|
||||||
%{
|
%{
|
||||||
#include <vector>
|
#include <vector>
|
||||||
|
|
||||||
Tcl_Obj* SwigString_FromString(const std::string &s) {
|
SWIGINTERN Tcl_Obj* SwigString_FromString(const std::string &s) {
|
||||||
return Tcl_NewStringObj(s.data(), (int)s.length());
|
return Tcl_NewStringObj(s.data(), (int)s.length());
|
||||||
}
|
}
|
||||||
|
|
||||||
int Tcl_GetBoolFromObj(Tcl_Interp *interp, Tcl_Obj *o, bool *val) {
|
SWIGINTERN int Tcl_GetBoolFromObj(Tcl_Interp *interp, Tcl_Obj *o, bool *val) {
|
||||||
int v;
|
int v;
|
||||||
int res = Tcl_GetBooleanFromObj(interp, o, &v);
|
int res = Tcl_GetBooleanFromObj(interp, o, &v);
|
||||||
if (res == TCL_OK) {
|
if (res == TCL_OK) {
|
||||||
|
|
@ -47,7 +47,7 @@ int Tcl_GetBoolFromObj(Tcl_Interp *interp, Tcl_Obj *o, bool *val) {
|
||||||
return res;
|
return res;
|
||||||
}
|
}
|
||||||
|
|
||||||
int SwigString_AsString(Tcl_Interp *interp, Tcl_Obj *o, std::string *val) {
|
SWIGINTERN int SwigString_AsString(Tcl_Interp *interp, Tcl_Obj *o, std::string *val) {
|
||||||
int len;
|
int len;
|
||||||
const char* temp = Tcl_GetStringFromObj(o, &len);
|
const char* temp = Tcl_GetStringFromObj(o, &len);
|
||||||
(void)interp;
|
(void)interp;
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue