[svn:parrot] r36567 - in branches/vtable_morph_change: . config/auto/format docs/book docs/dev include/parrot languages/PIR languages/befunge languages/ecmascript/t/sanity_pt languages/lua/t/test languages/pipp languages/pipp/docs languages/pipp/src/classes languages/pipp/src/common languages/pipp/src/pmc languages/pipp/t/embed languages/pipp/t/php src src/dynpmc src/gc src/pmc t/benchmark t/compilers/tge t/dynpmc t/pmc t/src tools/dev tools/util
whiteknight at svn.parrot.org
whiteknight at svn.parrot.org
Wed Feb 11 01:22:32 UTC 2009
Author: whiteknight
Date: Wed Feb 11 01:22:31 2009
New Revision: 36567
URL: https://trac.parrot.org/parrot/changeset/36567
Log:
[vtable_morph_change] another update
Modified:
branches/vtable_morph_change/ (props changed)
branches/vtable_morph_change/config/auto/format/intval_maxmin_c.in (props changed)
branches/vtable_morph_change/docs/book/ch07_testing_and_debugging.pod (props changed)
branches/vtable_morph_change/docs/book/ch08_architecture.pod (props changed)
branches/vtable_morph_change/docs/book/ch09_pct.pod (props changed)
branches/vtable_morph_change/docs/book/ch10_hlls.pod (props changed)
branches/vtable_morph_change/docs/book/ch11_pmcs.pod (props changed)
branches/vtable_morph_change/docs/book/ch12_opcodes.pod (props changed)
branches/vtable_morph_change/docs/book/ch13_reference.pod (props changed)
branches/vtable_morph_change/docs/dev/c_functions.pod (props changed)
branches/vtable_morph_change/include/parrot/gc_api.h (contents, props changed)
branches/vtable_morph_change/include/parrot/gc_mark_sweep.h (props changed)
branches/vtable_morph_change/include/parrot/gc_pools.h (props changed)
branches/vtable_morph_change/include/parrot/thread.h
branches/vtable_morph_change/languages/PIR/pir.pir (props changed)
branches/vtable_morph_change/languages/befunge/Configure.pl (props changed)
branches/vtable_morph_change/languages/ecmascript/t/sanity_pt/03-boolean.t (props changed)
branches/vtable_morph_change/languages/lua/t/test/bisect-output-win32.txt (props changed)
branches/vtable_morph_change/languages/pipp/docs/internals.pod (props changed)
branches/vtable_morph_change/languages/pipp/pipp.pir (props changed)
branches/vtable_morph_change/languages/pipp/src/classes/Object.pir (props changed)
branches/vtable_morph_change/languages/pipp/src/common/php_filesystem.pir (props changed)
branches/vtable_morph_change/languages/pipp/src/pmc/pipp_hash.c (props changed)
branches/vtable_morph_change/languages/pipp/src/pmc/pipp_hash.h (props changed)
branches/vtable_morph_change/languages/pipp/t/embed/eval.t (props changed)
branches/vtable_morph_change/languages/pipp/t/php/filesystem.t (props changed)
branches/vtable_morph_change/src/dynpmc/pair.pmc (props changed)
branches/vtable_morph_change/src/gc/api.c (props changed)
branches/vtable_morph_change/src/gc/generational_ms.c (props changed)
branches/vtable_morph_change/src/gc/incremental_ms.c (props changed)
branches/vtable_morph_change/src/gc/mark_sweep.c (props changed)
branches/vtable_morph_change/src/gc/pools.c (props changed)
branches/vtable_morph_change/src/gc/system.c (props changed)
branches/vtable_morph_change/src/pmc/namespace.pmc
branches/vtable_morph_change/src/thread.c
branches/vtable_morph_change/t/benchmark/benchmarks.t
branches/vtable_morph_change/t/compilers/tge/NoneGrammar.tg (props changed)
branches/vtable_morph_change/t/dynpmc/pair.t (props changed)
branches/vtable_morph_change/t/pmc/namespace.t
branches/vtable_morph_change/t/src/embed.t (props changed)
branches/vtable_morph_change/tools/dev/mk_gitignore.pl (props changed)
branches/vtable_morph_change/tools/util/perlcritic-cage.conf (props changed)
Modified: branches/vtable_morph_change/include/parrot/gc_api.h
==============================================================================
--- branches/vtable_morph_change/include/parrot/gc_api.h Wed Feb 11 01:12:55 2009 (r36566)
+++ branches/vtable_morph_change/include/parrot/gc_api.h Wed Feb 11 01:22:31 2009 (r36567)
@@ -22,13 +22,13 @@
#define Parrot_block_GC_mark(interp) \
{ \
(interp)->arena_base->DOD_block_level++; \
- Parrot_shared_DOD_block(interp); \
+ Parrot_shared_gc_block(interp); \
}
#define Parrot_unblock_GC_mark(interp) \
if ((interp)->arena_base->DOD_block_level) { \
(interp)->arena_base->DOD_block_level--; \
- Parrot_shared_DOD_unblock(interp); \
+ Parrot_shared_gc_unblock(interp); \
}
/* Macros for recursively blocking and unblocking GC */
Modified: branches/vtable_morph_change/include/parrot/thread.h
==============================================================================
--- branches/vtable_morph_change/include/parrot/thread.h Wed Feb 11 01:12:55 2009 (r36566)
+++ branches/vtable_morph_change/include/parrot/thread.h Wed Feb 11 01:22:31 2009 (r36567)
@@ -93,8 +93,8 @@
Parrot_Interp joiner; /* thread that is trying to join this */
- /* for wr access to interpreter e.g. for DOD/GC
- * if only used for DOD/GC the lock could be in the arena
+ /* for wr access to interpreter e.g. for GC
+ * if only used for GC the lock could be in the arena
* instead here, or in the interpreter, with negative size impact
* for the non-threaded case
*/
@@ -162,11 +162,11 @@
/* Don't modify between HEADERIZER BEGIN / HEADERIZER END. Your changes will be lost. */
PARROT_EXPORT
-void Parrot_shared_DOD_block(PARROT_INTERP)
+void Parrot_shared_GC_block(PARROT_INTERP)
__attribute__nonnull__(1);
PARROT_EXPORT
-void Parrot_shared_DOD_unblock(PARROT_INTERP)
+void Parrot_shared_GC_unblock(PARROT_INTERP)
__attribute__nonnull__(1);
void pt_add_to_interpreters(PARROT_INTERP,
@@ -261,9 +261,9 @@
__attribute__nonnull__(3)
FUNC_MODIFIES(d);
-#define ASSERT_ARGS_Parrot_shared_DOD_block __attribute__unused__ int _ASSERT_ARGS_CHECK = \
+#define ASSERT_ARGS_Parrot_shared_gc_block __attribute__unused__ int _ASSERT_ARGS_CHECK = \
PARROT_ASSERT_ARG(interp)
-#define ASSERT_ARGS_Parrot_shared_DOD_unblock __attribute__unused__ int _ASSERT_ARGS_CHECK = \
+#define ASSERT_ARGS_Parrot_shared_gc_unblock __attribute__unused__ int _ASSERT_ARGS_CHECK = \
PARROT_ASSERT_ARG(interp)
#define ASSERT_ARGS_pt_add_to_interpreters __attribute__unused__ int _ASSERT_ARGS_CHECK = \
PARROT_ASSERT_ARG(interp)
Modified: branches/vtable_morph_change/src/pmc/namespace.pmc
==============================================================================
--- branches/vtable_morph_change/src/pmc/namespace.pmc Wed Feb 11 01:12:55 2009 (r36566)
+++ branches/vtable_morph_change/src/pmc/namespace.pmc Wed Feb 11 01:22:31 2009 (r36567)
@@ -94,10 +94,6 @@
add_to_class(interp, nsinfo, classobj, method_name, value);
}
- /* If it's anonymous, we're done. */
- if (PObj_get_FLAGS(value) & SUB_FLAG_PF_ANON)
- return 1;
-
return 0;
}
Modified: branches/vtable_morph_change/src/thread.c
==============================================================================
--- branches/vtable_morph_change/src/thread.c Wed Feb 11 01:12:55 2009 (r36566)
+++ branches/vtable_morph_change/src/thread.c Wed Feb 11 01:22:31 2009 (r36567)
@@ -1749,7 +1749,7 @@
/*
-=item C<void Parrot_shared_DOD_block>
+=item C<void Parrot_shared_gc_block>
Blocks stop-the-world DOD runs.
@@ -1759,9 +1759,9 @@
PARROT_EXPORT
void
-Parrot_shared_DOD_block(PARROT_INTERP)
+Parrot_shared_gc_block(PARROT_INTERP)
{
- ASSERT_ARGS(Parrot_shared_DOD_block)
+ ASSERT_ARGS(Parrot_shared_gc_block)
Shared_gc_info * const info = get_pool(interp);
if (info) {
@@ -1773,7 +1773,7 @@
/*
-=item C<void Parrot_shared_DOD_unblock>
+=item C<void Parrot_shared_gc_unblock>
Unblocks stop-the-world DOD runs.
@@ -1783,9 +1783,9 @@
PARROT_EXPORT
void
-Parrot_shared_DOD_unblock(PARROT_INTERP)
+Parrot_shared_gc_unblock(PARROT_INTERP)
{
- ASSERT_ARGS(Parrot_shared_DOD_unblock)
+ ASSERT_ARGS(Parrot_shared_gc_unblock)
Shared_gc_info * const info = get_pool(interp);
if (info) {
int level;
Modified: branches/vtable_morph_change/t/benchmark/benchmarks.t
==============================================================================
--- branches/vtable_morph_change/t/benchmark/benchmarks.t Wed Feb 11 01:12:55 2009 (r36566)
+++ branches/vtable_morph_change/t/benchmark/benchmarks.t Wed Feb 11 01:22:31 2009 (r36567)
@@ -74,7 +74,7 @@
q{arriter_o1.pir} => qq(100000\n100000\n100000\n111111\n),
q{bench_newp.pasm} => qr/^\d+\.\d+\sseconds.\s\d+\.\d+\sloops\/sec\n
A\stotal\sof\s\d+\sbytes\swere\sallocated\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
A\stotal\sof\s\d+\scollection\sruns\swere\smade\n
Copying\sa\stotal\sof\s\d+\sbytes\n
There\sare\s\d+\sactive\sPMC\sstructs\n
@@ -89,56 +89,56 @@
ResizablePMCArray\s100000\n$/x,
q{gc_alloc_new.pasm} => qr/^\d+\.\d+\sseconds\.\n
A\stotal\sof\s\d+\sbytes\swere\sallocated\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
A\stotal\sof\s\d+\scollection\sruns\swere\smade\n
Copying\sa\stotal\sof\s\d+\sbytes\n
There\sare\s\d+\sactive\sBuffer\sstructs\n
There\sare\s\d+\stotal\sBuffer\sstructs\n$/x,
q{gc_alloc_reuse.pasm} => qr/^\d+\.\d+\sseconds\.\n
A\stotal\sof\s\d+\sbytes\swere\sallocated\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
A\stotal\sof\s\d+\scollection\sruns\swere\smade\n
Copying\sa\stotal\sof\s\d+\sbytes\n
There\sare\s\d+\sactive\sBuffer\sstructs\n
There\sare\s\d+\stotal\sBuffer\sstructs\n$/x,
q{gc_generations.pasm} => qr/^\d+\.\d+\sseconds\.\n
A\stotal\sof\s\d+\sbytes\swere\sallocated\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
A\stotal\sof\s\d+\scollection\sruns\swere\smade\n
Copying\sa\stotal\sof\s\d+\sbytes\n
There\sare\s\d+\sactive\sBuffer\sstructs\n
There\sare\s\d+\stotal\sBuffer\sstructs\n$/x,
q{gc_header_new.pasm} => qr/^\d+\.\d+\sseconds\.\n
A\stotal\sof\s\d+\sbytes\swere\sallocated\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
A\stotal\sof\s\d+\scollection\sruns\swere\smade\n
Copying\sa\stotal\sof\s\d+\sbytes\n
There\sare\s\d+\sactive\sBuffer\sstructs\n
There\sare\s\d+\stotal\sBuffer\sstructs\n$/x,
q{gc_header_reuse.pasm} => qr/^\d+\.\d+\sseconds\.\n
A\stotal\sof\s\d+\sbytes\swere\sallocated\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
A\stotal\sof\s\d+\scollection\sruns\swere\smade\n
Copying\sa\stotal\sof\s\d+\sbytes\n
There\sare\s\d+\sactive\sBuffer\sstructs\n
There\sare\s\d+\stotal\sBuffer\sstructs\n$/x,
q{gc_waves_headers.pasm} => qr/^\d+\.\d+\sseconds\.\n
A\stotal\sof\s\d+\sbytes\swere\sallocated\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
A\stotal\sof\s\d+\scollection\sruns\swere\smade\n
Copying\sa\stotal\sof\s\d+\sbytes\n
There\sare\s\d+\sactive\sBuffer\sstructs\n
There\sare\s\d+\stotal\sBuffer\sstructs\n$/x,
q{gc_waves_sizeable_data.pasm} => qr/^\d+\.\d+\sseconds\.\n
A\stotal\sof\s\d+\sbytes\swere\sallocated\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
A\stotal\sof\s\d+\scollection\sruns\swere\smade\n
Copying\sa\stotal\sof\s\d+\sbytes\n
There\sare\s\d+\sactive\sBuffer\sstructs\n
There\sare\s\d+\stotal\sBuffer\sstructs\n$/x,
q{gc_waves_sizeable_headers.pasm} => qr/^\d+\.\d+\sseconds\.\n
A\stotal\sof\s\d+\sbytes\swere\sallocated\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
A\stotal\sof\s\d+\scollection\sruns\swere\smade\n
Copying\sa\stotal\sof\s\d+\sbytes\n
There\sare\s\d+\sactive\sBuffer\sstructs\n
@@ -170,30 +170,30 @@
q{primes_i.pasm} => qr/^N\sprimes\sup\sto\s10000\sis:\s1229\n
last\sis:\s9973\nElapsed\stime:\s\d+\.\d+\n$/x,
q{shared_ref.pasm} => qq(),
- q{stress.pasm} => qr/^A\stotal\sof\s\d+\sDOD\sruns\s
+ q{stress.pasm} => qr/^A\stotal\sof\s\d+\sGC\sruns\s
were\smade\n$/x,
q{stress1.pasm} => qr/^\d+\.\d+\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
\d+\.\d+\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
\d+\.\d+\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
\d+\.\d+\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
\d+\.\d+\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
\d+\.\d+\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
\d+\.\d+\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
\d+\.\d+\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
\d+\.\d+\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
\d+\.\d+\n
- A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n$/x,
+ A\stotal\sof\s\d+\sGC\sruns\swere\smade\n$/x,
q{stress2.pasm} => qq(),
- q{stress3.pasm} => qr/^A\stotal\sof\s\d+\sDOD\sruns\swere\smade\n
+ q{stress3.pasm} => qr/^A\stotal\sof\s\d+\sGC\sruns\swere\smade\n
\d+\sactive\sPMCs\n
\d+\stotal\s\sPMCs\n$/x,
q{vpm.pir} => qq(100000;\nl hackerjust another per\n)
Modified: branches/vtable_morph_change/t/pmc/namespace.t
==============================================================================
--- branches/vtable_morph_change/t/pmc/namespace.t Wed Feb 11 01:12:55 2009 (r36566)
+++ branches/vtable_morph_change/t/pmc/namespace.t Wed Feb 11 01:22:31 2009 (r36567)
@@ -1,17 +1,17 @@
#! perl
-# Copyright (C) 2001-2008, The Perl Foundation.
+# Copyright (C) 2001-2009, The Perl Foundation.
# $Id$
use strict;
use warnings;
use lib qw( . lib ../lib ../../lib );
use Test::More;
-use Parrot::Test tests => 66;
+use Parrot::Test tests => 67;
use Parrot::Config;
=head1 NAME
-t/pmc/namespace.t - test the NameSpace PMC as described in PDD21.
+t/pmc/namespace.t - test the NameSpace PMC as described in PDD 21.
=head1 SYNOPSIS
@@ -1789,6 +1789,30 @@
1
OUT
+pir_error_output_like( <<'CODE', <<'OUT', 'adding :anon sub to a namespace, TT #56' );
+.namespace ['Foo']
+.sub main :main
+ .const 'Sub' $P0 = 'bar'
+
+ set_global 'ok', $P0
+ $P1 = get_global 'ok'
+ say $P1
+ $S0 = ok()
+ say $S0
+ $S0 = nok()
+ say $S0
+.end
+
+.namespace []
+.sub 'nok' :anon :subid('bar')
+ .return( 'ok 1' )
+.end
+CODE
+/
+ok 1
+Could not find non-existent sub nok/
+OUT
+
# Local Variables:
# mode: cperl
# cperl-indent-level: 4
More information about the parrot-commits
mailing list