view release on metacpan or  search on metacpan

README  view on Meta::CPAN

3. Neither name of copyright holders nor the names of its contributors
may be used to endorse or promote products derived from this software
without specific prior written permission.

THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR
CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.


7) AUTHOR INFORMATION
---------------------

The Perl Algorithm::SVM module was originally written by Cory Spencer but is

typemap  view on Meta::CPAN

TYPEMAP

SVM *				T_SVM
DataSet*			T_DATASET


OUTPUT

T_SVM
	if( $var == NULL )	XSRETURN_UNDEF;
	sv_setref_pv( $arg, "Algorithm::SVM", (void*)$var );

T_DATASET
	if( $var == NULL )	XSRETURN_UNDEF;
	sv_setref_pv( $arg, "Algorithm::SVM::DataSet", (void*)$var );

INPUT

T_SVM
	if( sv_isobject($arg) && sv_isa($arg, \"Algorithm::SVM\") ) {
		$var = ($type)SvIV((SV*)SvRV( $arg ));
	} else {
		warn( \"${Package}::$func_name() -- $var is not an Algorithm::SVM object\" );
		XSRETURN_UNDEF;
	}

T_DATASET
	if( sv_isobject($arg) && sv_isa($arg, \"Algorithm::SVM::DataSet\") ) {
		$var = ($type)SvIV((SV*)SvRV( $arg ));
	} else {
		warn( \"${Package}::$func_name() -- $var is not an Algorithm::SVM::DataSet object\" );
		XSRETURN_UNDEF;
	}