[svn:parrot] r49320 - in trunk: config/gen/makefiles include/parrot src

plobsing at svn.parrot.org plobsing at svn.parrot.org
Sat Sep 25 04:29:30 UTC 2010


Author: plobsing
Date: Sat Sep 25 04:29:29 2010
New Revision: 49320
URL: https://trac.parrot.org/parrot/changeset/49320

Log:
eliminate unuzed PFC_* constants

Modified:
   trunk/config/gen/makefiles/root.in
   trunk/include/parrot/packfile.h
   trunk/src/packout.c

Modified: trunk/config/gen/makefiles/root.in
==============================================================================
--- trunk/config/gen/makefiles/root.in	Sat Sep 25 04:16:03 2010	(r49319)
+++ trunk/config/gen/makefiles/root.in	Sat Sep 25 04:29:29 2010	(r49320)
@@ -202,7 +202,6 @@
 	runtime/parrot/include/dlopenflags.pasm \
 	runtime/parrot/include/longopt.pasm \
 	runtime/parrot/include/packfile_segments.pasm \
-	runtime/parrot/include/packfile_constants.pasm \
 	runtime/parrot/include/packfile_annotation_key_type.pasm \
 	runtime/parrot/include/stat.pasm \
 	runtime/parrot/include/stringinfo.pasm \
@@ -1207,8 +1206,6 @@
 
 runtime/parrot/include/packfile_segments.pasm : $(INC_DIR)/packfile.h $(H2INC)
 	$(PERL) $(H2INC) $(INC_DIR)/packfile.h $@
-runtime/parrot/include/packfile_constants.pasm : $(INC_DIR)/packfile.h $(H2INC)
-	$(PERL) $(H2INC) $(INC_DIR)/packfile.h $@
 runtime/parrot/include/packfile_annotation_key_type.pasm : $(INC_DIR)/packfile.h $(H2INC)
 	$(PERL) $(H2INC) $(INC_DIR)/packfile.h $@
 

Modified: trunk/include/parrot/packfile.h
==============================================================================
--- trunk/include/parrot/packfile.h	Sat Sep 25 04:16:03 2010	(r49319)
+++ trunk/include/parrot/packfile.h	Sat Sep 25 04:29:29 2010	(r49320)
@@ -215,17 +215,6 @@
 
 typedef INTVAL (*PackFile_map_segments_func_t)(PARROT_INTERP, PackFile_Segment *seg, void *user_data);
 
-/* &gen_from_def(packfile_constants.pasm) */
-
-/* no ascii chars use numbers: for n, s, k, p */
-#define PFC_NONE    0x0
-#define PFC_NUMBER  0x6E
-#define PFC_STRING  0x73
-#define PFC_PMC     0x70
-#define PFC_KEY     0x6B
-
-/* &end_gen */
-
 typedef struct PackFile_ConstTable {
     PackFile_Segment           base;
     struct {

Modified: trunk/src/packout.c
==============================================================================
--- trunk/src/packout.c	Sat Sep 25 04:16:03 2010	(r49319)
+++ trunk/src/packout.c	Sat Sep 25 04:29:29 2010	(r49320)
@@ -26,26 +26,6 @@
 
 /* HEADERIZER HFILE: include/parrot/packfile.h */
 /* HEADERIZER BEGIN: static */
-/* Don't modify between HEADERIZER BEGIN / HEADERIZER END.  Your changes will be lost. */
-
-PARROT_CANNOT_RETURN_NULL
-PARROT_WARN_UNUSED_RESULT
-static opcode_t * PackFile_Constant_pack_key(PARROT_INTERP,
-    ARGIN(PMC *self),
-    ARGIN(const PackFile_ConstTable *const_table),
-    ARGOUT(opcode_t *cursor))
-        __attribute__nonnull__(1)
-        __attribute__nonnull__(2)
-        __attribute__nonnull__(3)
-        __attribute__nonnull__(4)
-        FUNC_MODIFIES(*cursor);
-
-#define ASSERT_ARGS_PackFile_Constant_pack_key __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
-       PARROT_ASSERT_ARG(interp) \
-    , PARROT_ASSERT_ARG(self) \
-    , PARROT_ASSERT_ARG(const_table) \
-    , PARROT_ASSERT_ARG(cursor))
-/* Don't modify between HEADERIZER BEGIN / HEADERIZER END.  Your changes will be lost. */
 /* HEADERIZER END: static */
 
 /*


More information about the parrot-commits mailing list