You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@lucy.apache.org by nw...@apache.org on 2014/08/31 15:34:07 UTC
[8/8] git commit: Create Clownfish C API POD
Create Clownfish C API POD
Create documentation for all Clownfish classes for now.
Project: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/repo
Commit: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/commit/f50b736f
Tree: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/tree/f50b736f
Diff: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/diff/f50b736f
Branch: refs/heads/documentation
Commit: f50b736f9fd6caecc2ba475e345df650932c1b66
Parents: a3062c1
Author: Nick Wellnhofer <we...@aevum.de>
Authored: Sun Aug 31 15:20:48 2014 +0200
Committer: Nick Wellnhofer <we...@aevum.de>
Committed: Sun Aug 31 15:33:06 2014 +0200
----------------------------------------------------------------------
runtime/perl/buildlib/Clownfish/Build/Binding.pm | 11 ++++++++++-
1 file changed, 10 insertions(+), 1 deletion(-)
----------------------------------------------------------------------
http://git-wip-us.apache.org/repos/asf/lucy-clownfish/blob/f50b736f/runtime/perl/buildlib/Clownfish/Build/Binding.pm
----------------------------------------------------------------------
diff --git a/runtime/perl/buildlib/Clownfish/Build/Binding.pm b/runtime/perl/buildlib/Clownfish/Build/Binding.pm
index 98c7f0d..9e33a85 100644
--- a/runtime/perl/buildlib/Clownfish/Build/Binding.pm
+++ b/runtime/perl/buildlib/Clownfish/Build/Binding.pm
@@ -20,7 +20,8 @@ our $VERSION = '0.004000';
$VERSION = eval $VERSION;
sub bind_all {
- my $class = shift;
+ my ($class, $hierarchy, $binding) = @_;
+
$class->bind_clownfish;
$class->bind_test;
$class->bind_test_alias_obj;
@@ -34,6 +35,14 @@ sub bind_all {
$class->bind_varray;
$class->bind_class;
$class->bind_stringhelper;
+
+ for my $class (@{ $hierarchy->ordered_classes }) {
+ next if $class->get_parcel->get_name ne 'Clownfish';
+ my $c_api_pod = Clownfish::CFC::Binding::Perl::CPod->c_api_pod($class);
+ my $pod_name = $class->get_class_name;
+ $pod_name =~ s/^Clownfish::/Clownfish::Docs::C::/;
+ $binding->add_custom_pod($pod_name, $c_api_pod);
+ }
}
sub bind_clownfish {