Move/share a struct definition.

rakudo · Sep 25, 2011 · c4c2e1d · c4c2e1d
1 parent efe3f82
commit c4c2e1d
Show file tree

Hide file tree

Showing 2 changed files with 14 additions and 14 deletions.
diff --git a/src/binder/bind.c b/src/binder/bind.c
@@ -13,20 +13,6 @@ Copyright (C) 2009-2011, The Perl Foundation.
 #include "types.h"
 #include "sixmodelobject.h"
 
-/* Nabbed from Parrot, since it's not exposed and it's the only way
- * (so far as I can tell) to get at the underlying primitive type
- * being passed. */
-typedef struct Pcc_cell
-{
-    union u {
-        PMC     *p;
-        STRING  *s;
-        INTVAL   i;
-        FLOATVAL n;
-    } u;
-    INTVAL type;
-} Pcc_cell;
-
 /* Cache of Parrot type IDs and some strings. */
 static INTVAL smo_id            = 0;
 static INTVAL p6l_id            = 0;

diff --git a/src/binder/bind.h b/src/binder/bind.h
@@ -102,3 +102,17 @@ typedef struct {
     } val;
     char type;
 } Rakudo_BindVal;
+
+/* Nabbed from Parrot, since it's not exposed and it's the only way
+ * (so far as I can tell) to get at the underlying primitive type
+ * being passed. */
+typedef struct Pcc_cell
+{
+    union u {
+        PMC     *p;
+        STRING  *s;
+        INTVAL   i;
+        FLOATVAL n;
+    } u;
+    INTVAL type;
+} Pcc_cell;