develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r34012 - branches/cc_restart/include/parrot

From:
allison
Date:
December 16, 2008 22:42
Subject:
[svn:parrot] r34012 - branches/cc_restart/include/parrot
Message ID:
20081217064249.BF147CBA12@x12.develooper.com
Author: allison
Date: Tue Dec 16 22:42:49 2008
New Revision: 34012

Modified:
   branches/cc_restart/include/parrot/enums.h

Log:
[calling_conventions] Adding enum flags for invocant arguments. (Causes no test failures.)


Modified: branches/cc_restart/include/parrot/enums.h
==============================================================================
--- branches/cc_restart/include/parrot/enums.h	(original)
+++ branches/cc_restart/include/parrot/enums.h	Tue Dec 16 22:42:49 2008
@@ -58,7 +58,8 @@
     /* unused - 0x040 */
     PARROT_ARG_OPTIONAL         = 0x080, /* 128 */
     PARROT_ARG_OPT_FLAG         = 0x100, /* 256 prev optional was set */
-    PARROT_ARG_NAME             = 0x200 /* 512 this String is an arg name */
+    PARROT_ARG_NAME             = 0x200, /* 512 this String is an arg name */
+    PARROT_ARG_INVOCANT         = 0x400  /* 1024 this PMC is an invocant */
     /* more to come soon */
 
 } Call_bits_enum_t;
@@ -77,6 +78,7 @@
 #define PARROT_ARG_OPTIONAL_ISSET(o)      ((o) & PARROT_ARG_OPTIONAL)
 #define PARROT_ARG_OPT_FLAG_ISSET(o)      ((o) & PARROT_ARG_OPT_FLAG)
 #define PARROT_ARG_NAME_ISSET(o)          ((o) & PARROT_ARG_NAME)
+#define PARROT_ARG_INVOCANT_ISSET(o)      ((o) & PARROT_ARG_INVOCANT)
 
 
 #endif /* PARROT_ENUMS_H_GUARD */



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About