X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=perl%2FIDZebra_wrap.c;h=c4224ea5a5b5178f9f862a3f5438ca1221e322d5;hb=7fc45ea31ae45c60e81074183b096ea0dcc0e60c;hp=1052668dbefa1409cf801ddabdd0e98f72e2cf21;hpb=e035737c20ac0caf47e9e48e3b11f006e9132e9c;p=idzebra-moved-to-github.git diff --git a/perl/IDZebra_wrap.c b/perl/IDZebra_wrap.c index 1052668..c4224ea 100644 --- a/perl/IDZebra_wrap.c +++ b/perl/IDZebra_wrap.c @@ -212,7 +212,7 @@ SWIG_TypeClientData(swig_type_info *ti, void *clientdata) { * perl5.swg * * Perl5 runtime library - * $Header: /home/cvsroot/idis/perl/Attic/IDZebra_wrap.c,v 1.12 2003-03-04 23:32:55 pop Exp $ + * $Header: /home/cvsroot/idis/perl/Attic/IDZebra_wrap.c,v 1.14 2003-03-05 13:55:21 pop Exp $ * ----------------------------------------------------------------------------- */ #define SWIGPERL @@ -3613,11 +3613,13 @@ XS(_wrap_begin_trans) { const char *_swigerr = _swigmsg; { ZebraHandle arg1 ; + int arg2 ; + int result; int argvi = 0; dXSARGS; - if ((items < 1) || (items > 1)) { - SWIG_croak("Usage: begin_trans(zh);"); + if ((items < 2) || (items > 2)) { + SWIG_croak("Usage: begin_trans(zh,rw);"); } { ZebraHandle * argp; @@ -3626,9 +3628,11 @@ XS(_wrap_begin_trans) { } arg1 = *argp; } - zebra_begin_trans(arg1); - + arg2 = (int) SvIV(ST(1)); + result = (int)zebra_begin_trans(arg1,arg2); + ST(argvi) = sv_newmortal(); + sv_setiv(ST(argvi++), (IV) result); XSRETURN(argvi); fail: (void) _swigerr; @@ -3703,66 +3707,6 @@ XS(_wrap_trans_no) { } -XS(_wrap_begin_read) { - char _swigmsg[SWIG_MAX_ERRMSG] = ""; - const char *_swigerr = _swigmsg; - { - ZebraHandle arg1 ; - int result; - int argvi = 0; - dXSARGS; - - if ((items < 1) || (items > 1)) { - SWIG_croak("Usage: begin_read(zh);"); - } - { - ZebraHandle * argp; - if (SWIG_ConvertPtr(ST(0),(void **) &argp, SWIGTYPE_p_ZebraHandle,0) < 0) { - SWIG_croak("Type error in argument 1 of begin_read. Expected _p_ZebraHandle"); - } - arg1 = *argp; - } - result = (int)zebra_begin_read(arg1); - - ST(argvi) = sv_newmortal(); - sv_setiv(ST(argvi++), (IV) result); - XSRETURN(argvi); - fail: - (void) _swigerr; - } - croak(_swigerr); -} - - -XS(_wrap_end_read) { - char _swigmsg[SWIG_MAX_ERRMSG] = ""; - const char *_swigerr = _swigmsg; - { - ZebraHandle arg1 ; - int argvi = 0; - dXSARGS; - - if ((items < 1) || (items > 1)) { - SWIG_croak("Usage: end_read(zh);"); - } - { - ZebraHandle * argp; - if (SWIG_ConvertPtr(ST(0),(void **) &argp, SWIGTYPE_p_ZebraHandle,0) < 0) { - SWIG_croak("Type error in argument 1 of end_read. Expected _p_ZebraHandle"); - } - arg1 = *argp; - } - zebra_end_read(arg1); - - - XSRETURN(argvi); - fail: - (void) _swigerr; - } - croak(_swigerr); -} - - XS(_wrap_commit) { char _swigmsg[SWIG_MAX_ERRMSG] = ""; const char *_swigerr = _swigmsg; @@ -8508,8 +8452,6 @@ static swig_command_info swig_commands[] = { {"IDZebrac::begin_trans", _wrap_begin_trans}, {"IDZebrac::end_trans", _wrap_end_trans}, {"IDZebrac::trans_no", _wrap_trans_no}, -{"IDZebrac::begin_read", _wrap_begin_read}, -{"IDZebrac::end_read", _wrap_end_read}, {"IDZebrac::commit", _wrap_commit}, {"IDZebrac::get_shadow_enable", _wrap_get_shadow_enable}, {"IDZebrac::set_shadow_enable", _wrap_set_shadow_enable},