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 2015/05/06 17:32:15 UTC

[2/5] lucy-clownfish git commit: Remove unused function

Remove unused function


Project: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/repo
Commit: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/commit/d2a16305
Tree: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/tree/d2a16305
Diff: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/diff/d2a16305

Branch: refs/heads/master
Commit: d2a16305eefb512ccffcb0f3abac3849b14daad8
Parents: 299483d
Author: Nick Wellnhofer <we...@aevum.de>
Authored: Fri Apr 24 17:01:39 2015 +0200
Committer: Nick Wellnhofer <we...@aevum.de>
Committed: Wed May 6 17:25:21 2015 +0200

----------------------------------------------------------------------
 compiler/src/CFCPerlMethod.c | 15 ---------------
 compiler/src/CFCPerlMethod.h |  5 -----
 2 files changed, 20 deletions(-)
----------------------------------------------------------------------


http://git-wip-us.apache.org/repos/asf/lucy-clownfish/blob/d2a16305/compiler/src/CFCPerlMethod.c
----------------------------------------------------------------------
diff --git a/compiler/src/CFCPerlMethod.c b/compiler/src/CFCPerlMethod.c
index 7ab9ed5..e549f91 100644
--- a/compiler/src/CFCPerlMethod.c
+++ b/compiler/src/CFCPerlMethod.c
@@ -418,21 +418,6 @@ S_xsub_def_positional_args(CFCPerlMethod *self) {
 }
 
 char*
-CFCPerlMethod_callback_dec(CFCMethod *method) {
-    const char *override_sym = CFCMethod_full_override_sym(method);
-    CFCType      *return_type  = CFCMethod_get_return_type(method);
-    CFCParamList *param_list   = CFCMethod_get_param_list(method);
-    const char   *ret_type_str = CFCType_to_c(return_type);
-    const char   *params       = CFCParamList_to_c(param_list);
-    char pattern[] =
-        "%s\n"
-        "%s(%s);\n";
-    char *callback_dec
-        = CFCUtil_sprintf(pattern, ret_type_str, override_sym, params);
-    return callback_dec;
-}
-
-char*
 CFCPerlMethod_callback_def(CFCMethod *method) {
     // Return a callback wrapper that throws an error if there are no
     // bindings for a method.

http://git-wip-us.apache.org/repos/asf/lucy-clownfish/blob/d2a16305/compiler/src/CFCPerlMethod.h
----------------------------------------------------------------------
diff --git a/compiler/src/CFCPerlMethod.h b/compiler/src/CFCPerlMethod.h
index cf5bc5e..be441c4 100644
--- a/compiler/src/CFCPerlMethod.h
+++ b/compiler/src/CFCPerlMethod.h
@@ -57,11 +57,6 @@ CFCPerlMethod_perl_name(struct CFCMethod *method);
 char*
 CFCPerlMethod_xsub_def(CFCPerlMethod *self);
 
-/** Return C code declaring a callback to the Host for this method.
- */
-char*
-CFCPerlMethod_callback_dec(struct CFCMethod *method);
-
 /** Return C code implementing a callback to Perl for this method.  This code
  * is run when a Perl subclass has overridden a method in a Clownfish base
  * class.