- SEE ALSO
Language::XS - Write XS code on the fly and load it dynamically.
This module allows C & XS-code creation "on-the-fly", i.e. while your script is running.
Here is a very simple example:
# create a Language::XS-object my $xs = new Language::XS cachedir => undef; # add plain C to the header $xs->hdr("#include <stdio.h>"); # add a c function (not using xs syntax) $xs->cfun('printf ("I was called with %d arguments\n", items);'); # now compile and find the code-reference my $coderef = $xs->find; # Now call it $coderef->(1, "Zwei", 1/3);
new attr => value, ...
Creates a new Language::XS object. Known attributes are:
id a unique id that woill be shared among all modules cachedir the common directory where shared objects should be cached. set to undef when you want to disable sharing (must be an absolute path)
Default values will be supplied when necessary. Two common idioms are:
$xs = new Language::XS; # caching enabled $xs = new Language::XS cachedir => undef; # caching disabled
Returns true when as shared object with the given id already exists. This obviously only makes sense when you gave the module a unique id.
hdr sourcecode, [id]
sourcecode to the header portion. Similar to the header portion of an XS module, you can insert any valid C-code here. Most often you'd add some include directives, though.
id can be used to identify this portion (for error messages).
cfun functionbody, [id], [prototype]
Adds a XS function whose body is given in
functionbody. Unlike XS, you have to do argument processing (i.e. fiddling with
id specifies the function name (for
find() or error messages), and can be omitted (which results in a default name).
prototype is an optional string that specifies the perl protoype. Remember that only the parser will evaluate prototypes.
cfun, but is able to parse normal XS syntax (most of it, that is). Pity that I haven't yet implemented this function, since that would require serious recoding of
Link against all the libraries given as arguments. The libraries should be specified as strings of the form
-llibrary. Additional search paths can be given using
-L/path/to/libs. See ExtUtils::Liblist.
Add additional include paths. These paths are prepended to the other include paths.
Create the shared object file. This method is called automatically by
load and even by
find. This function returns a truth status and fills the messages attribute (see
messages) with any compiler/linker warnings or errors.
Returns the compiler messages (created & updated by
Tries to load the shared object, generating it if necessary. Returns a truth status.
Find the function (either xs or c) with id
id and return a code-ref to it. If
id is omitted, the default function (see
cfun) is returned instead. If no shared object is loaded, calls
Requires a C compiler (or even worse: the same C compiler perl was compiled with).
Does (most probably) not work on many os's, especially non-unix ones.
You cannot yet use normal XS syntax.
Line number handling could be better.
Marc Lehmann <email@example.com>.