remove noblock=1 in the varin typemaps since Tcl could add some code before the variable declarations

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8490 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2006-01-20 00:59:29 +00:00
commit a551f26811
3 changed files with 11 additions and 11 deletions

View file

@ -69,7 +69,7 @@
/* varin */
%typemap(varin,noblock=1,fragment=#SWIG_AsCharPtrAndSize) Char * {
%typemap(varin,fragment=#SWIG_AsCharPtrAndSize) Char * {
Char *cptr = 0; size_t csize = 0; int alloc = SWIG_NEWOBJ;
int res = SWIG_AsCharPtrAndSize($input, &cptr, &csize, &alloc);
if (!SWIG_IsOK(res)) {
@ -83,7 +83,7 @@
}
}
%typemap(varin,noblock=1,fragment=#SWIG_AsCharPtrAndSize,warning=SWIGWARN_TYPEMAP_CHARLEAK_MSG) const Char * {
%typemap(varin,fragment=#SWIG_AsCharPtrAndSize,warning=SWIGWARN_TYPEMAP_CHARLEAK_MSG) const Char * {
Char *cptr = 0; size_t csize = 0; int alloc = SWIG_NEWOBJ;
int res = SWIG_AsCharPtrAndSize($input, &cptr, &csize, &alloc);
if (!SWIG_IsOK(res)) {
@ -289,7 +289,7 @@
/* varin */
%typemap(varin,noblock=1,fragment=#SWIG_AsCharArray) Char [ANY]
%typemap(varin,fragment=#SWIG_AsCharArray) Char [ANY]
{
int res = SWIG_AsCharArray($input, $1, $1_dim0);
if (!SWIG_IsOK(res)) {

View file

@ -142,7 +142,7 @@
}
}
%typemap(varin,noblock=1) SWIGTYPE [ANY] {
%typemap(varin) SWIGTYPE [ANY] {
$basetype *inp = 0;
int res = SWIG_ConvertPtr($input, %as_voidptrptr(&inp), $descriptor, %convertptr_flags);
if (!SWIG_IsOK(res)) {
@ -190,7 +190,7 @@
}
}
%typemap(varin,noblock=1) SWIGTYPE [ANY][ANY] {
%typemap(varin) SWIGTYPE [ANY][ANY] {
$basetype (*inp)[$dim1] = 0;
int res = SWIG_ConvertPtr($input, %as_voidptrptr(&inp), $descriptor, %convertptr_flags);
if (!SWIG_IsOK(res)) {
@ -212,7 +212,7 @@
/* Pointers, references, and variable size arrays */
%typemap(varin,noblock=1,warning=SWIGWARN_TYPEMAP_SWIGTYPELEAK_MSG) SWIGTYPE * {
%typemap(varin,warning=SWIGWARN_TYPEMAP_SWIGTYPELEAK_MSG) SWIGTYPE * {
void *argp = 0;
int res = SWIG_ConvertPtr($input, &argp, $descriptor, %convertptr_flags);
if (!SWIG_IsOK(res)) {
@ -226,7 +226,7 @@
%variable_fail(SWIG_AttributeError, "$type", "read-only $name");
}
%typemap(varin,noblock=1,warning=SWIGWARN_TYPEMAP_SWIGTYPELEAK_MSG) SWIGTYPE & {
%typemap(varin,warning=SWIGWARN_TYPEMAP_SWIGTYPELEAK_MSG) SWIGTYPE & {
void *argp = 0;
int res = SWIG_ConvertPtr($input, &argp, $descriptor, %convertptr_flags);
if (!SWIG_IsOK(res)) {
@ -239,7 +239,7 @@
}
#if defined(__cplusplus) && defined(%implicitconv_flag)
%typemap(varin,noblock=1,implicitconv=1) SWIGTYPE {
%typemap(varin,implicitconv=1) SWIGTYPE {
void *argp = 0;
int res = SWIG_ConvertPtr($input, &argp, $&descriptor, %convertptr_flags | %implicitconv_flag);
if (!SWIG_IsOK(res)) {
@ -255,7 +255,7 @@
}
}
#else
%typemap(varin,noblock=1) SWIGTYPE {
%typemap(varin) SWIGTYPE {
void *argp = 0;
int res = SWIG_ConvertPtr($input, &argp, $&descriptor, %convertptr_flags);
if (!SWIG_IsOK(res)) {
@ -570,7 +570,7 @@
}
}
%typemap(varin,noblock=1) SWIGTYPE *DISOWN {
%typemap(varin) SWIGTYPE *DISOWN {
void *temp = 0;
int res = SWIG_ConvertPtr($input, &temp, $descriptor, SWIG_POINTER_DISOWN | %convertptr_flags);
if (!SWIG_IsOK(res)) {

View file

@ -32,7 +32,7 @@
/* varin */
%typemap(varin,noblock=1) void * {
%typemap(varin) void * {
void *temp = 0;
int res = SWIG_ConvertPtr($input, &temp, 0, SWIG_POINTER_DISOWN);
if (!SWIG_IsOK(res)) {