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/18 21:29:32 UTC
[06/10] lucy-clownfish git commit: Remove Err_To_Host
Remove Err_To_Host
The specialization was only needed to enable overloading of Perl
objects.
Project: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/repo
Commit: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/commit/bea287db
Tree: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/tree/bea287db
Diff: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/diff/bea287db
Branch: refs/heads/master
Commit: bea287db46c020e2744593e72f2f16b5c958d06e
Parents: 63accb5
Author: Nick Wellnhofer <we...@aevum.de>
Authored: Tue May 12 17:50:32 2015 +0200
Committer: Nick Wellnhofer <we...@aevum.de>
Committed: Mon May 18 21:25:33 2015 +0200
----------------------------------------------------------------------
runtime/c/src/Clownfish/Err.c | 7 -------
runtime/core/Clownfish/Err.cfh | 3 ---
runtime/example-lang/src/Clownfish/Err.c | 6 ------
runtime/go/ext/clownfish.c | 7 -------
runtime/perl/xs/XSBind.c | 10 ----------
5 files changed, 33 deletions(-)
----------------------------------------------------------------------
http://git-wip-us.apache.org/repos/asf/lucy-clownfish/blob/bea287db/runtime/c/src/Clownfish/Err.c
----------------------------------------------------------------------
diff --git a/runtime/c/src/Clownfish/Err.c b/runtime/c/src/Clownfish/Err.c
index ec588db..1956293 100644
--- a/runtime/c/src/Clownfish/Err.c
+++ b/runtime/c/src/Clownfish/Err.c
@@ -177,13 +177,6 @@ Err_do_throw(Err *error) {
}
}
-void*
-Err_To_Host_IMP(Err *self) {
- UNUSED_VAR(self);
- THROW(ERR, "TODO");
- UNREACHABLE_RETURN(void*);
-}
-
void
Err_throw_mess(Class *klass, String *message) {
UNUSED_VAR(klass);
http://git-wip-us.apache.org/repos/asf/lucy-clownfish/blob/bea287db/runtime/core/Clownfish/Err.cfh
----------------------------------------------------------------------
diff --git a/runtime/core/Clownfish/Err.cfh b/runtime/core/Clownfish/Err.cfh
index da63a0f..db56849 100644
--- a/runtime/core/Clownfish/Err.cfh
+++ b/runtime/core/Clownfish/Err.cfh
@@ -55,9 +55,6 @@ public class Clownfish::Err inherits Clownfish::Obj {
public incremented String*
To_String(Err *self);
- void*
- To_Host(Err *self);
-
/** Concatenate the supplied argument onto the internal "mess".
*/
public void
http://git-wip-us.apache.org/repos/asf/lucy-clownfish/blob/bea287db/runtime/example-lang/src/Clownfish/Err.c
----------------------------------------------------------------------
diff --git a/runtime/example-lang/src/Clownfish/Err.c b/runtime/example-lang/src/Clownfish/Err.c
index 6cb5027..9134900 100644
--- a/runtime/example-lang/src/Clownfish/Err.c
+++ b/runtime/example-lang/src/Clownfish/Err.c
@@ -36,12 +36,6 @@ cfish_Err_do_throw(cfish_Err *err) {
THROW(CFISH_ERR, "TODO");
}
-void*
-CFISH_Err_To_Host_IMP(cfish_Err *self) {
- THROW(CFISH_ERR, "TODO");
- UNREACHABLE_RETURN(void*);
-}
-
void
cfish_Err_throw_mess(cfish_Class *klass, cfish_String *message) {
THROW(CFISH_ERR, "TODO");
http://git-wip-us.apache.org/repos/asf/lucy-clownfish/blob/bea287db/runtime/go/ext/clownfish.c
----------------------------------------------------------------------
diff --git a/runtime/go/ext/clownfish.c b/runtime/go/ext/clownfish.c
index c6f5f0b..dc88dee 100644
--- a/runtime/go/ext/clownfish.c
+++ b/runtime/go/ext/clownfish.c
@@ -219,13 +219,6 @@ Err_do_throw(Err *error) {
GoCfish_PanicErr(error);
}
-void*
-Err_To_Host_IMP(Err *self) {
- UNUSED_VAR(self);
- THROW(ERR, "TODO");
- UNREACHABLE_RETURN(void*);
-}
-
void
Err_throw_mess(Class *klass, String *message) {
UNUSED_VAR(klass);
http://git-wip-us.apache.org/repos/asf/lucy-clownfish/blob/bea287db/runtime/perl/xs/XSBind.c
----------------------------------------------------------------------
diff --git a/runtime/perl/xs/XSBind.c b/runtime/perl/xs/XSBind.c
index 4e45e13..9322098 100644
--- a/runtime/perl/xs/XSBind.c
+++ b/runtime/perl/xs/XSBind.c
@@ -977,16 +977,6 @@ cfish_Err_do_throw(cfish_Err *err) {
LEAVE;
}
-void*
-CFISH_Err_To_Host_IMP(cfish_Err *self) {
- dTHX;
- CFISH_Err_To_Host_t super_to_host
- = CFISH_SUPER_METHOD_PTR(CFISH_ERR, CFISH_Err_To_Host);
- SV *perl_obj = (SV*)super_to_host(self);
- XSBind_enable_overload(aTHX_ perl_obj);
- return perl_obj;
-}
-
void
cfish_Err_throw_mess(cfish_Class *klass, cfish_String *message) {
CFISH_UNUSED_VAR(klass);