~ubuntu-branches/ubuntu/lucid/libmodule-install-xsutil-perl/lucid

« back to all changes in this revision

Viewing changes to example/src/Foo.xs

  • Committer: Bazaar Package Importer
  • Author(s): Jonathan Yu
  • Date: 2010-01-11 15:49:12 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20100111154912-2tjpnjlgz7ki5he0
Tags: 0.21-1
* New upstream release
* Set this package to arch: all; dh-make-perl misdetected
  this because of the included examples (.xs extension)

Show diffs side-by-side

added added

removed removed

Lines of Context:
20
20
#endif
21
21
}
22
22
 
 
23
STATIC OPAnnotationGroup MYMODULE_ANNOTATIONS;
 
24
 
23
25
MODULE = Foo    PACKAGE = Foo
24
26
 
25
27
PROTOTYPES: DISABLE
26
28
 
27
29
BOOT:
28
 
        op_annotation_group_free(aTHX_ op_annotation_group_new());
 
30
        MYMODULE_ANNOTATIONS = op_annotation_group_new();
 
31
 
 
32
void
 
33
END()
 
34
CODE:
 
35
    op_annotation_group_free(aTHX_ MYMODULE_ANNOTATIONS);
29
36
 
30
37
bool
31
38
foo_is_ok()