[svn:parrot] r47045 - in branches/ops_massacre: include/parrot src src/dynoplibs t/dynoplibs

plobsing at svn.parrot.org plobsing at svn.parrot.org
Thu May 27 04:12:14 UTC 2010


Author: plobsing
Date: Thu May 27 04:12:14 2010
New Revision: 47045
URL: https://trac.parrot.org/parrot/changeset/47045

Log:
fix codetests

Modified:
   branches/ops_massacre/include/parrot/interpreter.h
   branches/ops_massacre/include/parrot/io.h
   branches/ops_massacre/include/parrot/misc.h
   branches/ops_massacre/src/dynoplibs/bit.ops   (props changed)
   branches/ops_massacre/src/dynoplibs/debug.ops   (contents, props changed)
   branches/ops_massacre/src/dynoplibs/io.ops   (contents, props changed)
   branches/ops_massacre/src/dynoplibs/sys.ops   (contents, props changed)
   branches/ops_massacre/src/utils.c
   branches/ops_massacre/t/dynoplibs/bit.t   (props changed)
   branches/ops_massacre/t/dynoplibs/debug.t   (contents, props changed)
   branches/ops_massacre/t/dynoplibs/io.t   (contents, props changed)
   branches/ops_massacre/t/dynoplibs/sysinfo.t   (contents, props changed)
   branches/ops_massacre/t/dynoplibs/time.t   (props changed)

Modified: branches/ops_massacre/include/parrot/interpreter.h
==============================================================================
--- branches/ops_massacre/include/parrot/interpreter.h	Thu May 27 04:00:30 2010	(r47044)
+++ branches/ops_massacre/include/parrot/interpreter.h	Thu May 27 04:12:14 2010	(r47045)
@@ -522,15 +522,6 @@
         __attribute__nonnull__(3)
         __attribute__nonnull__(4);
 
-PARROT_WARN_UNUSED_RESULT
-PARROT_CONST_FUNCTION
-INTVAL sysinfo_i(SHIM_INTERP, INTVAL info_wanted);
-
-PARROT_CANNOT_RETURN_NULL
-PARROT_WARN_UNUSED_RESULT
-STRING * sysinfo_s(PARROT_INTERP, INTVAL info_wanted)
-        __attribute__nonnull__(1);
-
 #define ASSERT_ARGS_interpinfo __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp))
 #define ASSERT_ARGS_interpinfo_p __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
@@ -557,9 +548,6 @@
        PARROT_ASSERT_ARG(interp) \
     , PARROT_ASSERT_ARG(func) \
     , PARROT_ASSERT_ARG(name))
-#define ASSERT_ARGS_sysinfo_i __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
-#define ASSERT_ARGS_sysinfo_s __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
-       PARROT_ASSERT_ARG(interp))
 /* Don't modify between HEADERIZER BEGIN / HEADERIZER END.  Your changes will be lost. */
 /* HEADERIZER END: src/interp/inter_misc.c */
 

Modified: branches/ops_massacre/include/parrot/io.h
==============================================================================
--- branches/ops_massacre/include/parrot/io.h	Thu May 27 04:00:30 2010	(r47044)
+++ branches/ops_massacre/include/parrot/io.h	Thu May 27 04:12:14 2010	(r47045)
@@ -222,6 +222,10 @@
 
 PARROT_EXPORT
 PARROT_WARN_UNUSED_RESULT
+PIOOFF_T Parrot_io_make_offset32(INTVAL hi, INTVAL lo);
+
+PARROT_EXPORT
+PARROT_WARN_UNUSED_RESULT
 PARROT_CANNOT_RETURN_NULL
 PMC * Parrot_io_new_pmc(PARROT_INTERP, INTVAL flags)
         __attribute__nonnull__(1);
@@ -342,9 +346,6 @@
         FUNC_MODIFIES(*pmc);
 
 PARROT_WARN_UNUSED_RESULT
-PIOOFF_T Parrot_io_make_offset32(INTVAL hi, INTVAL lo);
-
-PARROT_WARN_UNUSED_RESULT
 PIOOFF_T Parrot_io_make_offset_pmc(PARROT_INTERP, ARGMOD(PMC *pmc))
         __attribute__nonnull__(1)
         __attribute__nonnull__(2)
@@ -378,6 +379,7 @@
        PARROT_ASSERT_ARG(interp) \
     , PARROT_ASSERT_ARG(pmc))
 #define ASSERT_ARGS_Parrot_io_make_offset __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
+#define ASSERT_ARGS_Parrot_io_make_offset32 __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
 #define ASSERT_ARGS_Parrot_io_new_pmc __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp))
 #define ASSERT_ARGS_Parrot_io_open __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
@@ -420,7 +422,6 @@
        PARROT_ASSERT_ARG(interp) \
     , PARROT_ASSERT_ARG(pmc) \
     , PARROT_ASSERT_ARG(buffer))
-#define ASSERT_ARGS_Parrot_io_make_offset32 __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
 #define ASSERT_ARGS_Parrot_io_make_offset_pmc __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp) \
     , PARROT_ASSERT_ARG(pmc))

Modified: branches/ops_massacre/include/parrot/misc.h
==============================================================================
--- branches/ops_massacre/include/parrot/misc.h	Thu May 27 04:00:30 2010	(r47044)
+++ branches/ops_massacre/include/parrot/misc.h	Thu May 27 04:12:14 2010	(r47045)
@@ -83,6 +83,13 @@
 
 PARROT_EXPORT
 PARROT_WARN_UNUSED_RESULT
+PARROT_CANNOT_RETURN_NULL
+PMC* Parrot_tm_to_array(PARROT_INTERP, ARGIN(const struct tm *tm))
+        __attribute__nonnull__(1)
+        __attribute__nonnull__(2);
+
+PARROT_EXPORT
+PARROT_WARN_UNUSED_RESULT
 INTVAL Parrot_uint_rand(INTVAL how_random);
 
 PARROT_CONST_FUNCTION
@@ -102,12 +109,6 @@
         __attribute__nonnull__(4)
         FUNC_MODIFIES(*data);
 
-PARROT_WARN_UNUSED_RESULT
-PARROT_CANNOT_RETURN_NULL
-PMC* tm_to_array(PARROT_INTERP, ARGIN(const struct tm *tm))
-        __attribute__nonnull__(1)
-        __attribute__nonnull__(2);
-
 #define ASSERT_ARGS_Parrot_byte_index __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(base) \
     , PARROT_ASSERT_ARG(search))
@@ -123,6 +124,9 @@
     , PARROT_ASSERT_ARG(src_regs) \
     , PARROT_ASSERT_ARG(info))
 #define ASSERT_ARGS_Parrot_srand __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
+#define ASSERT_ARGS_Parrot_tm_to_array __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
+       PARROT_ASSERT_ARG(interp) \
+    , PARROT_ASSERT_ARG(tm))
 #define ASSERT_ARGS_Parrot_uint_rand __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
 #define ASSERT_ARGS_floatval_mod __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
 #define ASSERT_ARGS_intval_mod __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
@@ -130,9 +134,6 @@
        PARROT_ASSERT_ARG(interp) \
     , PARROT_ASSERT_ARG(data) \
     , PARROT_ASSERT_ARG(cmp))
-#define ASSERT_ARGS_tm_to_array __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
-       PARROT_ASSERT_ARG(interp) \
-    , PARROT_ASSERT_ARG(tm))
 /* Don't modify between HEADERIZER BEGIN / HEADERIZER END.  Your changes will be lost. */
 /* HEADERIZER END: src/utils.c */
 

Modified: branches/ops_massacre/src/dynoplibs/debug.ops
==============================================================================
--- branches/ops_massacre/src/dynoplibs/debug.ops	Thu May 27 04:00:30 2010	(r47044)
+++ branches/ops_massacre/src/dynoplibs/debug.ops	Thu May 27 04:12:14 2010	(r47045)
@@ -1,5 +1,5 @@
 /*
- * $Id: debug.ops 42916 2009-12-06 14:47:19Z fperrad $
+ * $Id$
  * Copyright (C) 2002-2008, Parrot Foundation.
  */
 

Modified: branches/ops_massacre/src/dynoplibs/io.ops
==============================================================================
--- branches/ops_massacre/src/dynoplibs/io.ops	Thu May 27 04:00:30 2010	(r47044)
+++ branches/ops_massacre/src/dynoplibs/io.ops	Thu May 27 04:12:14 2010	(r47045)
@@ -194,10 +194,6 @@
     }
 }
 
-=back
-
-=cut
-
 ##########################################
 
 =item B<peek>(out STR)

Modified: branches/ops_massacre/src/dynoplibs/sys.ops
==============================================================================
--- branches/ops_massacre/src/dynoplibs/sys.ops	Thu May 27 04:00:30 2010	(r47044)
+++ branches/ops_massacre/src/dynoplibs/sys.ops	Thu May 27 04:12:14 2010	(r47045)
@@ -1,5 +1,5 @@
 /*
- * $Id: sys.ops 46691 2010-05-16 00:39:58Z plobsing $
+ * $Id$
 ** sys.ops
 */
 

Modified: branches/ops_massacre/src/utils.c
==============================================================================
--- branches/ops_massacre/src/utils.c	Thu May 27 04:00:30 2010	(r47044)
+++ branches/ops_massacre/src/utils.c	Thu May 27 04:12:14 2010	(r47045)
@@ -540,7 +540,7 @@
 
 /*
 
-=item C<PMC* tm_to_array(PARROT_INTERP, const struct tm *tm)>
+=item C<PMC* Parrot_tm_to_array(PARROT_INTERP, const struct tm *tm)>
 
 Helper to convert a B<struct tm *> to an Array
 
@@ -554,7 +554,7 @@
 PMC*
 Parrot_tm_to_array(PARROT_INTERP, ARGIN(const struct tm *tm))
 {
-    ASSERT_ARGS(tm_to_array)
+    ASSERT_ARGS(Parrot_tm_to_array)
 
     PMC * const Array = Parrot_pmc_new(interp,
         Parrot_get_ctx_HLL_type(interp, enum_class_FixedIntegerArray));

Modified: branches/ops_massacre/t/dynoplibs/debug.t
==============================================================================
--- branches/ops_massacre/t/dynoplibs/debug.t	Thu May 27 04:00:30 2010	(r47044)
+++ branches/ops_massacre/t/dynoplibs/debug.t	Thu May 27 04:12:14 2010	(r47045)
@@ -1,6 +1,6 @@
 #!perl
 # Copyright (C) 2001-2007, Parrot Foundation.
-# $Id: debuginfo.t 45949 2010-04-24 01:14:23Z cotto $
+# $Id$
 
 use strict;
 use warnings;

Modified: branches/ops_massacre/t/dynoplibs/io.t
==============================================================================
--- branches/ops_massacre/t/dynoplibs/io.t	Thu May 27 04:00:30 2010	(r47044)
+++ branches/ops_massacre/t/dynoplibs/io.t	Thu May 27 04:12:14 2010	(r47045)
@@ -1,6 +1,6 @@
 #!./parrot
 # Copyright (C) 2008, Parrot Foundation.
-# $Id: io.t 46982 2010-05-25 03:05:26Z plobsing $
+# $Id$
 
 =head1 NAME
 

Modified: branches/ops_massacre/t/dynoplibs/sysinfo.t
==============================================================================
--- branches/ops_massacre/t/dynoplibs/sysinfo.t	Thu May 27 04:00:30 2010	(r47044)
+++ branches/ops_massacre/t/dynoplibs/sysinfo.t	Thu May 27 04:12:14 2010	(r47045)
@@ -1,6 +1,6 @@
 #!perl
 # Copyright (C) 2008-2010, Parrot Foundation.
-# $Id: sysinfo.t 44427 2010-02-24 00:30:09Z mikehh $
+# $Id$
 
 # initial work by Brad Gilbert b2gills <at> gmail <dot> com
 


More information about the parrot-commits mailing list