Changeset 6f0fbe9 for perlglue.xs


Ignore:
Timestamp:
Oct 3, 2009, 9:46:51 PM (12 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
Branches:
master, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
32ad44d
Parents:
df569c5
Message:
Add a function for perl to query whether Zephyr is available.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perlglue.xs

    r8830f79f r6f0fbe9  
    434434
    435435
     436MODULE = BarnOwl                PACKAGE = BarnOwl::Zephyr
     437
     438int
     439have_zephyr()
     440        CODE:
     441                RETVAL = owl_global_is_havezephyr(&g);
     442        OUTPUT:
     443                RETVAL
    436444
    437445MODULE = BarnOwl                PACKAGE = BarnOwl::Internal
Note: See TracChangeset for help on using the changeset viewer.