view release on metacpan or  search on metacpan

TacacsPlus.xs  view on Meta::CPAN

#include "XSUB.h"
#ifdef __cplusplus
}
#endif

#include <string.h>
#include "tacpluslib/tacplus_client.h"
#include "tacpluslib/tac_plus.h"

static int
not_here(s)
char *s;
{
    croak("%s not implemented on this architecture", s);
    return -1;
}

static double
constant(name, arg)
char *name;
int arg;

TacacsPlus.xs  view on Meta::CPAN

    case 'X':
	break;
    case 'Y':
	break;
    case 'Z':
	break;
    }
    errno = EINVAL;
    return 0;

//not_there:
//   errno = ENOENT;
//    return 0;
}


MODULE = Authen::TacacsPlus		PACKAGE = Authen::TacacsPlus		


double
constant(name,arg)