File: Foo.xs

package info (click to toggle)

libmodule-build-xsutil-perl 0.19-3

links: PTS, VCS
area: main
in suites: forky, sid, trixie
size: 192 kB
sloc: perl: 338; makefile: 2

file content (28 lines) | stat: -rw-r--r-- 342 bytes

parent folder | download | duplicates (5)

#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
#include "ppport.h"
#include "xshelper.h"

MODULE = Foo PACKAGE = Foo

SV *
ok()
CODE:
    RETVAL = newSVpv( "ok", 0 );
OUTPUT:
    RETVAL

const char *
xs_version()
CODE:
    RETVAL = XS_VERSION;
OUTPUT:
    RETVAL

const char *
version()
CODE:
    RETVAL = VERSION;
OUTPUT:
    RETVAL