Imported Upstream version 20090110

[ion3.git] / ioncore / return.c

diff --git a/ioncore/return.c b/ioncore/return.c
index 444f548c416462bbdf504df857b7b5f01bdca86b..ffc108375900b6880061f2523eef8b2402627814 100644 (file)
--- a/ioncore/return.c
+++ b/ioncore/return.c
@@ -1,12 +1,9 @@
 /*
  * ion/ioncore/return.h
  *
- * Copyright (c) Tuomo Valkonen 1999-2007. 
+ * Copyright (c) Tuomo Valkonen 1999-2009. 
  *
- * Ion is free software; you can redistribute it and/or modify it under
- * the terms of the GNU Lesser General Public License as published by
- * the Free Software Foundation; either version 2.1 of the License, or
- * (at your option) any later version.
+ * See the included file LICENSE for details.
  */
 
 #include <libtu/rb.h>
@@ -158,3 +155,18 @@ void region_unset_return(WRegion *reg)
 
 /*}}}*/
 
+
+/*{{{ Internal Lua exports */
+
+
+EXTL_SAFE
+EXTL_EXPORT_MEMBER
+WRegion *region___return_target(WRegion *reg)
+{
+    WPHolder *ph=region_get_return(reg);
+    return (ph!=NULL ? pholder_target(ph) : NULL);
+}
+
+
+/*}}}*/
+