# $Id: typemap,v 1.5 1997/05/01 22:06:51 jake Exp $

#   Copyright 1997 Jake Donham <jake@organic.com>

#   You may distribute under the terms of either the GNU General
#   Public License or the Artistic License, as specified in the README
#   file.

TYPEMAP
RPC::ONC::Client	T_PTROBJ
RPC::ONC::Auth	T_PTROBJ
RPC::ONC::svc_req	T_PTROBJ
RPC::ONC::Svcxprt	T_PTROBJ
RPC::ONC::opaque_auth	T_PTROBJ
RPC::ONC::authsys_parms	T_PTROBJ
RPC::ONC::authdes_cred	T_PTROBJ
u_long	T_IV
uid_t	T_IV
gid_t	T_IV
struct sockaddr_in *	T_sockaddr_in

INPUT
T_sockaddr_in
	$var = ($type)SvPV($arg,na)

OUTPUT
T_sockaddr_in
	sv_setpvn($arg, (char *)$var, sizeof(struct sockaddr_in));