[svn:parrot] r37846 - in trunk: compilers/imcc src src/call src/gc src/io src/string src/string/charset src/string/encoding
Infinoid at svn.parrot.org
Infinoid at svn.parrot.org
Wed Apr 1 18:24:35 UTC 2009
Author: Infinoid
Date: Wed Apr 1 18:24:31 2009
New Revision: 37846
URL: https://trac.parrot.org/parrot/changeset/37846
Log:
[cage] Headerizer updates.
Modified:
trunk/compilers/imcc/cfg.c
trunk/compilers/imcc/imc.c
trunk/src/byteorder.c
trunk/src/call/ops.c
trunk/src/datatypes.c
trunk/src/debug.c
trunk/src/embed.c
trunk/src/exit.c
trunk/src/gc/api.c
trunk/src/gc/generational_ms.c
trunk/src/gc/incremental_ms.c
trunk/src/gc/mark_sweep.c
trunk/src/gc/memory.c
trunk/src/gc/pools.c
trunk/src/gc/register.c
trunk/src/gc/resources.c
trunk/src/gc/system.c
trunk/src/global_setup.c
trunk/src/hll.c
trunk/src/io/api.c
trunk/src/io/buffer.c
trunk/src/io/core.c
trunk/src/io/filehandle.c
trunk/src/io/portable.c
trunk/src/io/socket_api.c
trunk/src/io/socket_unix.c
trunk/src/io/socket_win32.c
trunk/src/io/unix.c
trunk/src/io/utf8.c
trunk/src/io/win32.c
trunk/src/library.c
trunk/src/longopt.c
trunk/src/misc.c
trunk/src/multidispatch.c
trunk/src/oo.c
trunk/src/pmc.c
trunk/src/runops_cores.c
trunk/src/scheduler.c
trunk/src/stacks.c
trunk/src/string/api.c
trunk/src/string/charset.c
trunk/src/string/charset/ascii.c
trunk/src/string/charset/binary.c
trunk/src/string/charset/iso-8859-1.c
trunk/src/string/charset/unicode.c
trunk/src/string/encoding.c
trunk/src/string/encoding/fixed_8.c
trunk/src/string/encoding/ucs2.c
trunk/src/string/encoding/utf16.c
trunk/src/string/encoding/utf8.c
trunk/src/string/primitives.c
trunk/src/sub.c
trunk/src/trace.c
trunk/src/tsq.c
trunk/src/vtables.c
trunk/src/warnings.c
Modified: trunk/compilers/imcc/cfg.c
==============================================================================
--- trunk/compilers/imcc/cfg.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/compilers/imcc/cfg.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -206,8 +206,7 @@
/*
-=item C<static int check_invoke_type(PARROT_INTERP, const IMC_Unit *unit,
-const Instruction *ins)>
+=item C<static int check_invoke_type>
Given an invoke-type instruction, returns the type of the invocation.
@@ -247,7 +246,7 @@
/*
-=item C<void find_basic_blocks(PARROT_INTERP, IMC_Unit *unit, int first)>
+=item C<void find_basic_blocks>
Finds all basic blocks in the given IMC_Unit, expanding PCC calls if first is
true.
@@ -359,8 +358,7 @@
/*
-=item C<static void bb_check_set_addr(PARROT_INTERP, IMC_Unit *unit,
-Basic_block *bb, const SymReg *label)>
+=item C<static void bb_check_set_addr>
Looks for a C<set_addr> op in the current unit referring to the given label.
@@ -396,7 +394,7 @@
/*
-=item C<void build_cfg(PARROT_INTERP, IMC_Unit *unit)>
+=item C<void build_cfg>
Once the basic blocks have been computed, build_cfg computes the dependencies
between them.
@@ -538,8 +536,7 @@
/*
-=item C<static void bb_findadd_edge(PARROT_INTERP, IMC_Unit *unit,
-Basic_block *from, const SymReg *label)>
+=item C<static void bb_findadd_edge>
Finds the placement of the given label and links its containing block to the
given basic block.
@@ -580,7 +577,7 @@
/*
-=item C<int blocks_are_connected(const Basic_block *from, const Basic_block *to)>
+=item C<int blocks_are_connected>
Returns true or false whether the given blocks are linked.
@@ -610,7 +607,7 @@
/*
-=item C<static void bb_add_edge(IMC_Unit *unit, Basic_block *from, Basic_block *to)>
+=item C<static void bb_add_edge>
Adds an edge between the two given blocks.
@@ -653,7 +650,7 @@
/*
-=item C<static void bb_remove_edge(IMC_Unit *unit, Edge *edge)>
+=item C<static void bb_remove_edge>
Removes the given edge from the graph.
@@ -708,7 +705,7 @@
/*
-=item C<static void free_edge(IMC_Unit *unit)>
+=item C<static void free_edge>
Frees the memory of an IMC_Unit's edge list.
@@ -734,7 +731,7 @@
/*
-=item C<int edge_count(const IMC_Unit *unit)>
+=item C<int edge_count>
Counts and returns the number of edges in the specified IMC_Unit.
@@ -760,7 +757,7 @@
/*
-=item C<void life_analysis(PARROT_INTERP, const IMC_Unit *unit)>
+=item C<void life_analysis>
This driver routine calls analyse_life_symbol for each reglist in the specified
IMC_Unit.
@@ -785,7 +782,7 @@
/*
-=item C<static void analyse_life_symbol(const IMC_Unit *unit, SymReg* r)>
+=item C<static void analyse_life_symbol>
Analyzes the lifetime for a given symbol.
@@ -848,7 +845,7 @@
/*
-=item C<void free_life_info(const IMC_Unit *unit, SymReg *r)>
+=item C<void free_life_info>
Frees memory of the life analysis info structures.
@@ -878,7 +875,7 @@
/*
-=item C<static void analyse_life_block(const Basic_block* bb, SymReg *r)>
+=item C<static void analyse_life_block>
Studies the state of the var r in the block bb.
@@ -959,7 +956,7 @@
/*
-=item C<static void propagate_need(Basic_block *bb, const SymReg *r, int i)>
+=item C<static void propagate_need>
Follows the uses of the given symbol through all of the basic blocks of the
unit.
@@ -1026,7 +1023,7 @@
/*
-=item C<void compute_dominators(PARROT_INTERP, IMC_Unit *unit)>
+=item C<void compute_dominators>
Computes the dominators tree of the CFG. Basic block A dominates B if each
path to B passes through A
@@ -1167,7 +1164,7 @@
/*
-=item C<void compute_dominance_frontiers(PARROT_INTERP, IMC_Unit *unit)>
+=item C<void compute_dominance_frontiers>
Algorithm to find dominance frontiers described in paper "A Simple, Fast
Dominance Algorithm", Cooper et al. (2001)
@@ -1230,7 +1227,7 @@
/*
-=item C<static void free_dominators(IMC_Unit *unit)>
+=item C<static void free_dominators>
Frees the memory in the given unit related to all dominators.
@@ -1258,7 +1255,7 @@
/*
-=item C<static void free_dominance_frontiers(IMC_Unit *unit)>
+=item C<static void free_dominance_frontiers>
Frees the memory in the given unit related to all dominance frontiers.
@@ -1285,7 +1282,7 @@
/*
-=item C<static void sort_loops(PARROT_INTERP, IMC_Unit *unit)>
+=item C<static void sort_loops>
Sorts the loops found in the CFG of the current unit.
@@ -1365,7 +1362,7 @@
/*
-=item C<void find_loops(PARROT_INTERP, IMC_Unit *unit)>
+=item C<void find_loops>
Searches for loops in the CFG. We search for edges that go from a node to one
of its dominators.
@@ -1400,7 +1397,7 @@
/*
-=item C<int natural_preheader(const IMC_Unit *unit, const Loop_info *loop_info)>
+=item C<int natural_preheader>
For loop_info, finds the natural preheader of the loop, if any, and returns its
index, otherwise returns -1. A natural preheader exists if there is only one
@@ -1443,7 +1440,7 @@
/*
-=item C<static void mark_loop(PARROT_INTERP, IMC_Unit *unit, const Edge *e)>
+=item C<static void mark_loop>
Increases the loop_depth of all the nodes in a loop.
@@ -1530,7 +1527,7 @@
/*
-=item C<static void free_loops(IMC_Unit *unit)>
+=item C<static void free_loops>
Frees the memory associated with the loops in this unit.
@@ -1559,7 +1556,7 @@
/*
-=item C<void search_predecessors_not_in(const Basic_block *node, Set *s)>
+=item C<void search_predecessors_not_in>
Searches for predecessor edges for this node not in the given set (and adds
them).
@@ -1589,7 +1586,7 @@
/*
-=item C<static void init_basic_blocks(IMC_Unit *unit)>
+=item C<static void init_basic_blocks>
Initializes the basic blocks memory for this unit.
@@ -1615,7 +1612,7 @@
/*
-=item C<void clear_basic_blocks(IMC_Unit *unit)>
+=item C<void clear_basic_blocks>
Frees all of the blocks and CFG memory allocated for this unit.
@@ -1647,8 +1644,7 @@
/*
-=item C<static Basic_block* make_basic_block(IMC_Unit *unit,
-Instruction *ins)>
+=item C<static Basic_block* make_basic_block>
Creates, initializes, and returns a new Basic_block.
@@ -1689,7 +1685,7 @@
/*
-=item C<Life_range * make_life_range(SymReg *r, int idx)>
+=item C<Life_range * make_life_range>
Creates and returns a Life_range for the given register at the specified index.
Modified: trunk/compilers/imcc/imc.c
==============================================================================
--- trunk/compilers/imcc/imc.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/compilers/imcc/imc.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -52,7 +52,7 @@
/*
-=item C<void imc_compile_all_units(PARROT_INTERP)>
+=item C<void imc_compile_all_units>
Compiles all imc_units, and free all memory of instructions and structures
afterwards.
@@ -102,7 +102,7 @@
/*
-=item C<void imc_compile_unit(PARROT_INTERP, IMC_Unit *unit)>
+=item C<void imc_compile_unit>
Compiles each unit in IMCC. This is the main loop of the compiler; it operates
on a single compilation unit at a time.
@@ -126,7 +126,7 @@
/*
-=item C<void imc_cleanup(PARROT_INTERP, void *yyscanner)>
+=item C<void imc_cleanup>
Cleans up the compiler state in preparation for another compiler invocation.
@@ -148,7 +148,7 @@
/*
-=item C<static IMC_Unit * imc_new_unit(IMC_Unit_Type t)>
+=item C<static IMC_Unit * imc_new_unit>
Creates a new IMC_Unit of the given IMC_Unit_Type C<t>.
@@ -171,7 +171,7 @@
/*
-=item C<IMC_Unit * imc_open_unit(PARROT_INTERP, IMC_Unit_Type t)>
+=item C<IMC_Unit * imc_open_unit>
Creates a new IMC_Unit and "open" it for construction. This sets the current
state of the parser. You can close the unit later while retaining all the
@@ -212,7 +212,7 @@
/*
-=item C<void imc_close_unit(PARROT_INTERP, IMC_Unit *unit)>
+=item C<void imc_close_unit>
Closes a unit from compilation. This does not destroy the unit, but leaves it
on the list of units.
@@ -236,7 +236,7 @@
/*
-=item C<static void imc_free_unit(PARROT_INTERP, IMC_Unit *unit)>
+=item C<static void imc_free_unit>
Frees an IMC_Unit and all of its associated memory.
Modified: trunk/src/byteorder.c
==============================================================================
--- trunk/src/byteorder.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/byteorder.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -32,7 +32,7 @@
/*
-=item C<INTVAL fetch_iv_le(INTVAL w)>
+=item C<INTVAL fetch_iv_le>
This function converts a 4 or 8 byte C<INTVAL> into little endian
format. If the native format is already little endian, then no
@@ -76,7 +76,7 @@
/*
-=item C<INTVAL fetch_iv_be(INTVAL w)>
+=item C<INTVAL fetch_iv_be>
This function converts a 4 or 8 byte C<INTVAL> into big endian format.
If the native format is already big endian, then no conversion is done.
@@ -118,7 +118,7 @@
/*
-=item C<opcode_t fetch_op_be(opcode_t w)>
+=item C<opcode_t fetch_op_be>
Same as C<fetch_iv_be> for opcode_t
@@ -156,7 +156,7 @@
/*
-=item C<opcode_t fetch_op_le(opcode_t w)>
+=item C<opcode_t fetch_op_le>
Same as C<fetch_iv_le> for opcode_t
@@ -206,7 +206,7 @@
/*
-=item C<void fetch_buf_be_4(unsigned char *rb, const unsigned char *b)>
+=item C<void fetch_buf_be_4>
Converts a 4-byte big-endian buffer C<b> into a little-endian C<rb>.
@@ -230,7 +230,7 @@
/*
-=item C<void fetch_buf_le_4(unsigned char *rb, const unsigned char *b)>
+=item C<void fetch_buf_le_4>
Converts a 4-byte little-endian buffer C<b> into a big-endian buffer C<rb>.
@@ -254,7 +254,7 @@
/*
-=item C<void fetch_buf_be_8(unsigned char *rb, const unsigned char *b)>
+=item C<void fetch_buf_be_8>
Converts an 8-byte big-endian buffer C<b> into a little-endian buffer C<rb>
@@ -282,7 +282,7 @@
/*
-=item C<void fetch_buf_le_8(unsigned char *rb, const unsigned char *b)>
+=item C<void fetch_buf_le_8>
Converts an 8-byte little-endian buffer C<b> into a big-endian buffer C<rb>.
@@ -310,7 +310,7 @@
/*
-=item C<void fetch_buf_le_12(unsigned char *rb, const unsigned char *b)>
+=item C<void fetch_buf_le_12>
Converts a 12-byte little-endian buffer C<b> into a big-endian buffer C<b>.
@@ -342,7 +342,7 @@
/*
-=item C<void fetch_buf_be_12(unsigned char *rb, const unsigned char *b)>
+=item C<void fetch_buf_be_12>
Converts a 12-byte big-endian buffer C<b> into a little-endian buffer C<b>.
@@ -374,7 +374,7 @@
/*
-=item C<void fetch_buf_le_16(unsigned char *rb, const unsigned char *b)>
+=item C<void fetch_buf_le_16>
Converts a 16-byte little-endian buffer C<b> into a big-endian buffer C<b>.
@@ -410,7 +410,7 @@
/*
-=item C<void fetch_buf_be_16(unsigned char *rb, const unsigned char *b)>
+=item C<void fetch_buf_be_16>
Converts a 16-byte big-endian buffer C<b> into a little-endian buffer C<b>.
@@ -446,7 +446,7 @@
/*
-=item C<void fetch_buf_le_32(unsigned char *rb, const unsigned char *b)>
+=item C<void fetch_buf_le_32>
Converts a 32-byte little-endian buffer C<b> into a big-endian buffer C<b>.
@@ -498,7 +498,7 @@
/*
-=item C<void fetch_buf_be_32(unsigned char *rb, const unsigned char *b)>
+=item C<void fetch_buf_be_32>
Converts a 32-byte big-endian buffer C<b> into a little-endian buffer C<b>.
Modified: trunk/src/call/ops.c
==============================================================================
--- trunk/src/call/ops.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/call/ops.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -53,7 +53,7 @@
/*
-=item C<void runops(PARROT_INTERP, size_t offs)>
+=item C<void runops>
Run parrot ops. Set exception handler and/or resume after exception.
@@ -121,7 +121,7 @@
/*
-=item C<Parrot_Context * Parrot_runops_fromc(PARROT_INTERP, PMC *sub)>
+=item C<Parrot_Context * Parrot_runops_fromc>
Runs the Parrot ops, called from C code. The function arguments are
already setup according to Parrot calling conventions, the C<sub> argument
@@ -165,8 +165,7 @@
/*
-=item C<static Parrot_Context * runops_args(PARROT_INTERP, PMC *sub,
-PMC *obj, STRING *meth, const char *sig, va_list ap)>
+=item C<static Parrot_Context * runops_args>
Calls the PMC subroutine C<sub> with optional name C<meth>. If PMC object
C<obj> is provided, the call is treated as a method call on that object.
@@ -259,8 +258,7 @@
/*
-=item C<void * Parrot_run_meth_fromc(PARROT_INTERP, PMC *sub, PMC *obj,
-STRING *meth)>
+=item C<void * Parrot_run_meth_fromc>
Run a method sub from C. The function arguments are
already setup according to Parrot calling conventions, the C<sub> argument
@@ -298,8 +296,7 @@
/*
-=item C<PMC * Parrot_runops_fromc_args(PARROT_INTERP, PMC *sub,
-const char *sig, ...)>
+=item C<PMC * Parrot_runops_fromc_args>
Run parrot ops, called from C code, function arguments are passed as
C<va_args> according to the signature. The C<sub> argument is an
@@ -330,8 +327,7 @@
/*
-=item C<void * Parrot_runops_fromc_args_event(PARROT_INTERP, PMC *sub,
-const char *sig, ...)>
+=item C<void * Parrot_runops_fromc_args_event>
Run code from within event handlers. This variant deals with some reentrency
issues. It also should do sanity checks, if e.g. the handler subroutine
@@ -377,8 +373,7 @@
/*
-=item C<INTVAL Parrot_runops_fromc_args_reti(PARROT_INTERP, PMC *sub,
-const char *sig, ...)>
+=item C<INTVAL Parrot_runops_fromc_args_reti>
Called from C code, runs a Parrot subroutine C<sub>. The subroutine has
function signature C<sig> and a C variadic argument list. Returns an
@@ -409,8 +404,7 @@
/*
-=item C<FLOATVAL Parrot_runops_fromc_args_retf(PARROT_INTERP, PMC *sub,
-const char *sig, ...)>
+=item C<FLOATVAL Parrot_runops_fromc_args_retf>
Called from C code, runs a Parrot subroutine C<sub>. The subroutine has
function signature C<sig> and a C variadic argument list. Returns a
@@ -441,8 +435,7 @@
/*
-=item C<void* Parrot_run_meth_fromc_args(PARROT_INTERP, PMC *sub, PMC *obj,
-STRING *meth, const char *sig, ...)>
+=item C<void* Parrot_run_meth_fromc_args>
Called from C code, runs a Parrot subroutine C<sub> as a method on object
C<obj>. The subroutine has function signature C<sig> and a C variadic argument
@@ -474,8 +467,7 @@
/*
-=item C<INTVAL Parrot_run_meth_fromc_args_reti(PARROT_INTERP, PMC *sub,
-PMC *obj, STRING *meth, const char *sig, ...)>
+=item C<INTVAL Parrot_run_meth_fromc_args_reti>
Called from C code, runs a Parrot subroutine C<sub> as a method on object
C<obj>. The subroutine has function signature C<sig> and a C variadic argument
@@ -506,8 +498,7 @@
/*
-=item C<FLOATVAL Parrot_run_meth_fromc_args_retf(PARROT_INTERP, PMC *sub,
-PMC *obj, STRING *meth, const char *sig, ...)>
+=item C<FLOATVAL Parrot_run_meth_fromc_args_retf>
Called from C code, runs a Parrot subroutine C<sub> as a method on object
C<obj>. The subroutine has function signature C<sig> and a C variadic argument
@@ -538,8 +529,7 @@
/*
-=item C<void * Parrot_runops_fromc_arglist(PARROT_INTERP, PMC *sub,
-const char *sig, va_list args)>
+=item C<void * Parrot_runops_fromc_arglist>
Called from C code, runs a Parrot subroutine C<sub>.
The subroutine has function signature C<sig> and a C C<va_list>
@@ -567,8 +557,7 @@
/*
-=item C<INTVAL Parrot_runops_fromc_arglist_reti(PARROT_INTERP, PMC *sub,
-const char *sig, va_list args)>
+=item C<INTVAL Parrot_runops_fromc_arglist_reti>
Called from C code, runs a Parrot subroutine C<sub>.
The subroutine has function signature C<sig> and a C C<va_list>
@@ -595,8 +584,7 @@
/*
-=item C<FLOATVAL Parrot_runops_fromc_arglist_retf(PARROT_INTERP, PMC *sub,
-const char *sig, va_list args)>
+=item C<FLOATVAL Parrot_runops_fromc_arglist_retf>
Called from C code, runs a Parrot subroutine C<sub>.
The subroutine has function signature C<sig> and a C C<va_list>
@@ -623,8 +611,7 @@
/*
-=item C<void* Parrot_run_meth_fromc_arglist(PARROT_INTERP, PMC *sub,
-PMC *obj, STRING *meth, const char *sig, va_list args)>
+=item C<void* Parrot_run_meth_fromc_arglist>
Calls the subroutine C<sub> as a method on object C<obj>. The method to be
called is named C<meth>, has the function signature C<sig> and arguments
@@ -653,8 +640,7 @@
/*
-=item C<INTVAL Parrot_run_meth_fromc_arglist_reti(PARROT_INTERP, PMC *sub,
-PMC *obj, STRING *meth, const char *sig, va_list args)>
+=item C<INTVAL Parrot_run_meth_fromc_arglist_reti>
Calls the subroutine C<sub> as a method on object C<obj>. The method to be
called is named C<meth>, has the function signature C<sig> and arguments
@@ -683,8 +669,7 @@
/*
-=item C<FLOATVAL Parrot_run_meth_fromc_arglist_retf(PARROT_INTERP, PMC *sub,
-PMC *obj, STRING *meth, const char *sig, va_list args)>
+=item C<FLOATVAL Parrot_run_meth_fromc_arglist_retf>
Calls the subroutine C<sub> as a method on object C<obj>. The method to be
called is named C<meth>, has the function signature C<sig> and arguments
@@ -718,7 +703,7 @@
=over 4
-=item C<void new_runloop_jump_point(PARROT_INTERP)>
+=item C<void new_runloop_jump_point>
Create a new runloop jump point, either by allocating it or by
getting one from the free list.
@@ -747,7 +732,7 @@
/*
-=item C<void free_runloop_jump_point(PARROT_INTERP)>
+=item C<void free_runloop_jump_point>
Place runloop jump point back on the free list.
@@ -768,7 +753,7 @@
/*
-=item C<void destroy_runloop_jump_points(PARROT_INTERP)>
+=item C<void destroy_runloop_jump_points>
Destroys (and frees the memory of) the runloop jump point list and the
associated free list for the specified interpreter.
@@ -787,7 +772,7 @@
/*
-=item C<void really_destroy_runloop_jump_points(Parrot_runloop *jump_point)>
+=item C<void really_destroy_runloop_jump_points>
Takes a pointer to a runloop jump point (which had better be the last one in
the list). Walks back through the list, freeing the memory of each one, until
Modified: trunk/src/datatypes.c
==============================================================================
--- trunk/src/datatypes.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/datatypes.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -27,7 +27,7 @@
/*
-=item C<INTVAL Parrot_get_datatype_enum(PARROT_INTERP, const STRING *type_name)>
+=item C<INTVAL Parrot_get_datatype_enum>
Return datatype C<enum> for C<STRING*> type_name.
@@ -58,7 +58,7 @@
/*
-=item C<STRING * Parrot_get_datatype_name(PARROT_INTERP, INTVAL type)>
+=item C<STRING * Parrot_get_datatype_name>
Return datatype name for C<type>.
@@ -83,7 +83,7 @@
/*
-=item C<FLOATVAL floatval_divide_by_zero(PARROT_INTERP, FLOATVAL num)>
+=item C<FLOATVAL floatval_divide_by_zero>
=cut
Modified: trunk/src/debug.c
==============================================================================
--- trunk/src/debug.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/debug.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -575,7 +575,7 @@
/*
-=item C<static const DebuggerCmd * get_cmd(const char **cmd)>
+=item C<static const DebuggerCmd * get_cmd>
=cut
@@ -633,7 +633,7 @@
/*
-=item C<static const char * skip_whitespace(const char *cmd)>
+=item C<static const char * skip_whitespace>
=cut
@@ -652,7 +652,7 @@
/*
-=item C<static unsigned long get_uint(const char **cmd, unsigned int def)>
+=item C<static unsigned long get_uint>
=cut
@@ -675,7 +675,7 @@
/*
-=item C<static unsigned long get_ulong(const char **cmd, unsigned long def)>
+=item C<static unsigned long get_ulong>
=cut
@@ -698,7 +698,7 @@
/*
-=item C<static void chop_newline(char * buf)>
+=item C<static void chop_newline>
If the C string argument end with a newline, delete it.
@@ -718,7 +718,7 @@
/*
-=item C<static const char * nextarg(const char *command)>
+=item C<static const char * nextarg>
Returns the position just past the current argument in the PASM instruction
C<command>. This is not the same as C<skip_command()>, which is intended for
@@ -751,7 +751,7 @@
/*
-=item C<static const char * skip_command(const char *str)>
+=item C<static const char * skip_command>
Returns the pointer past the current debugger command. (This is an
alternative to the C<skip_command()> macro above.)
@@ -777,7 +777,7 @@
/*
-=item C<static const char * parse_int(const char *str, int *intP)>
+=item C<static const char * parse_int>
Parse an C<int> out of a string and return a pointer to just after the C<int>.
The output parameter C<intP> contains the parsed value.
@@ -801,7 +801,7 @@
/*
-=item C<static const char * parse_string(PARROT_INTERP, const char *str, STRING **strP)>
+=item C<static const char * parse_string>
Parse a double-quoted string out of a C string and return a pointer to
just after the string. The parsed string is converted to a Parrot
@@ -850,7 +850,7 @@
/*
-=item C<static const char* parse_key(PARROT_INTERP, const char *str, PMC **keyP)>
+=item C<static const char* parse_key>
Parse an aggregate key out of a string and return a pointer to just
after the key. Currently only string and integer keys are allowed.
@@ -903,7 +903,7 @@
/*
-=item C<static void debugger_cmdline(PARROT_INTERP)>
+=item C<static void debugger_cmdline>
Debugger command line.
@@ -936,7 +936,7 @@
/*
-=item C<static void close_script_file(PARROT_INTERP)>
+=item C<static void close_script_file>
Close the script file, returning to command prompt mode.
@@ -960,7 +960,7 @@
/*
-=item C<void Parrot_debugger_init(PARROT_INTERP)>
+=item C<void Parrot_debugger_init>
Initializes the Parrot debugger, if it's not already initialized.
@@ -996,7 +996,7 @@
/*
-=item C<void Parrot_debugger_destroy(PARROT_INTERP)>
+=item C<void Parrot_debugger_destroy>
Destroy the current Parrot debugger instance.
@@ -1028,7 +1028,7 @@
/*
-=item C<void Parrot_debugger_load(PARROT_INTERP, STRING *filename)>
+=item C<void Parrot_debugger_load>
Loads a Parrot source file for the current program.
@@ -1055,7 +1055,7 @@
/*
-=item C<void Parrot_debugger_start(PARROT_INTERP, opcode_t * cur_opcode)>
+=item C<void Parrot_debugger_start>
Start debugger.
@@ -1097,7 +1097,7 @@
/*
-=item C<void Parrot_debugger_break(PARROT_INTERP, opcode_t * cur_opcode)>
+=item C<void Parrot_debugger_break>
Breaks execution and drops into the debugger. If we are already into the
debugger and it is the first call, set a breakpoint.
@@ -1153,7 +1153,7 @@
/*
-=item C<void PDB_get_command(PARROT_INTERP)>
+=item C<void PDB_get_command>
Get a command from the user input to execute.
@@ -1278,7 +1278,7 @@
/*
-=item C<void PDB_script_file(PARROT_INTERP, const char *command)>
+=item C<void PDB_script_file>
Interprets the contents of a file as user input commands
@@ -1314,7 +1314,7 @@
/*
-=item C<int PDB_run_command(PARROT_INTERP, const char *command)>
+=item C<int PDB_run_command>
Run a command.
@@ -1365,7 +1365,7 @@
/*
-=item C<void PDB_next(PARROT_INTERP, const char *command)>
+=item C<void PDB_next>
Execute the next N operation(s).
@@ -1430,7 +1430,7 @@
/*
-=item C<void PDB_trace(PARROT_INTERP, const char *command)>
+=item C<void PDB_trace>
Execute the next N operations; if no number is specified, it defaults to 1.
@@ -1488,7 +1488,7 @@
/*
-=item C<static unsigned short condition_regtype(const char *cmd)>
+=item C<static unsigned short condition_regtype>
=cut
@@ -1518,7 +1518,7 @@
/*
-=item C<PDB_condition_t * PDB_cond(PARROT_INTERP, const char *command)>
+=item C<PDB_condition_t * PDB_cond>
Analyzes a condition from the user input.
@@ -1690,7 +1690,7 @@
/*
-=item C<void PDB_watchpoint(PARROT_INTERP, const char *command)>
+=item C<void PDB_watchpoint>
Set a watchpoint.
@@ -1717,7 +1717,7 @@
/*
-=item C<void PDB_set_break(PARROT_INTERP, const char *command)>
+=item C<void PDB_set_break>
Set a break point, the source code file must be loaded.
@@ -1841,7 +1841,7 @@
/*
-=item C<static void list_breakpoints(PDB_t *pdb)>
+=item C<static void list_breakpoints>
=cut
@@ -1865,7 +1865,7 @@
/*
-=item C<void PDB_init(PARROT_INTERP, const char *command)>
+=item C<void PDB_init>
Init the program.
@@ -1889,7 +1889,7 @@
/*
-=item C<void PDB_continue(PARROT_INTERP, const char *command)>
+=item C<void PDB_continue>
Continue running the program. If a number is specified, skip that many
breakpoints.
@@ -1947,7 +1947,7 @@
/*
-=item C<PDB_breakpoint_t * PDB_find_breakpoint(PARROT_INTERP, const char *command)>
+=item C<PDB_breakpoint_t * PDB_find_breakpoint>
Find breakpoint number N; returns C<NULL> if the breakpoint doesn't
exist or if no breakpoint was specified.
@@ -1990,7 +1990,7 @@
/*
-=item C<void PDB_disable_breakpoint(PARROT_INTERP, const char *command)>
+=item C<void PDB_disable_breakpoint>
Disable a breakpoint; it can be reenabled with the enable command.
@@ -2011,7 +2011,7 @@
/*
-=item C<void PDB_enable_breakpoint(PARROT_INTERP, const char *command)>
+=item C<void PDB_enable_breakpoint>
Reenable a disabled breakpoint; if the breakpoint was not disabled, has
no effect.
@@ -2033,7 +2033,7 @@
/*
-=item C<void PDB_delete_breakpoint(PARROT_INTERP, const char *command)>
+=item C<void PDB_delete_breakpoint>
Delete a breakpoint.
@@ -2082,7 +2082,7 @@
/*
-=item C<void PDB_delete_condition(PARROT_INTERP, PDB_breakpoint_t *breakpoint)>
+=item C<void PDB_delete_condition>
Delete a condition associated with a breakpoint.
@@ -2115,7 +2115,7 @@
/*
-=item C<void PDB_skip_breakpoint(PARROT_INTERP, unsigned long i)>
+=item C<void PDB_skip_breakpoint>
Skip C<i> times all breakpoints.
@@ -2136,7 +2136,7 @@
/*
-=item C<char PDB_program_end(PARROT_INTERP)>
+=item C<char PDB_program_end>
End the program.
@@ -2161,7 +2161,7 @@
/*
-=item C<char PDB_check_condition(PARROT_INTERP, const PDB_condition_t *condition)>
+=item C<char PDB_check_condition>
Returns true if the condition was met.
@@ -2271,7 +2271,7 @@
/*
-=item C<static PDB_breakpoint_t * current_breakpoint(PDB_t * pdb)>
+=item C<static PDB_breakpoint_t * current_breakpoint>
Returns a pointer to the breakpoint at the current position,
or NULL if there is none.
@@ -2296,7 +2296,7 @@
/*
-=item C<char PDB_break(PARROT_INTERP)>
+=item C<char PDB_break>
Returns true if we have to stop running.
@@ -2366,7 +2366,7 @@
/*
-=item C<char * PDB_escape(const char *string, UINTVAL length)>
+=item C<char * PDB_escape>
Escapes C<">, C<\r>, C<\n>, C<\t>, C<\a> and C<\\>.
@@ -2438,7 +2438,7 @@
/*
-=item C<int PDB_unescape(char *string)>
+=item C<int PDB_unescape>
Do inplace unescape of C<\r>, C<\n>, C<\t>, C<\a> and C<\\>.
@@ -2493,9 +2493,7 @@
/*
-=item C<size_t PDB_disassemble_op(PARROT_INTERP, char *dest, size_t space,
-const op_info_t *info, const opcode_t *op, PDB_file_t *file,
-const opcode_t *code_start, int full_name)>
+=item C<size_t PDB_disassemble_op>
Disassembles C<op>.
@@ -2807,7 +2805,7 @@
/*
-=item C<void PDB_disassemble(PARROT_INTERP, const char *command)>
+=item C<void PDB_disassemble>
Disassemble the bytecode.
@@ -2909,8 +2907,7 @@
/*
-=item C<long PDB_add_label(PDB_file_t *file, const opcode_t *cur_opcode,
-opcode_t offset)>
+=item C<long PDB_add_label>
Add a label to the label list.
@@ -2956,7 +2953,7 @@
/*
-=item C<void PDB_free_file(PARROT_INTERP, PDB_file_t *file)>
+=item C<void PDB_free_file>
Frees any allocated source files.
@@ -3005,7 +3002,7 @@
/*
-=item C<void PDB_load_source(PARROT_INTERP, const char *command)>
+=item C<void PDB_load_source>
Load a source code file.
@@ -3110,7 +3107,7 @@
/*
-=item C<char PDB_hasinstruction(const char *c)>
+=item C<char PDB_hasinstruction>
Return true if the line has an instruction.
@@ -3157,7 +3154,7 @@
/*
-=item C<void PDB_list(PARROT_INTERP, const char *command)>
+=item C<void PDB_list>
Show lines from the source code file.
@@ -3226,7 +3223,7 @@
/*
-=item C<void PDB_eval(PARROT_INTERP, const char *command)>
+=item C<void PDB_eval>
C<eval>s an instruction.
@@ -3247,7 +3244,7 @@
/*
-=item C<opcode_t * PDB_compile(PARROT_INTERP, const char *command)>
+=item C<opcode_t * PDB_compile>
Compiles instructions with the PASM compiler.
@@ -3284,7 +3281,7 @@
/*
-=item C<static void dump_string(PARROT_INTERP, const STRING *s)>
+=item C<static void dump_string>
Dumps the buflen, flags, bufused, strlen, and offset associated with a string
and the string itself.
@@ -3311,7 +3308,7 @@
/*
-=item C<void PDB_print(PARROT_INTERP, const char *command)>
+=item C<void PDB_print>
Print interp registers.
@@ -3330,7 +3327,7 @@
/*
-=item C<void PDB_info(PARROT_INTERP)>
+=item C<void PDB_info>
Print the interpreter info.
@@ -3375,7 +3372,7 @@
/*
-=item C<void PDB_help(PARROT_INTERP, const char *command)>
+=item C<void PDB_help>
Print the help text. "Help" with no arguments prints a list of commands.
"Help xxx" prints information on command xxx.
@@ -3417,7 +3414,7 @@
/*
-=item C<void PDB_backtrace(PARROT_INTERP)>
+=item C<void PDB_backtrace>
Prints a backtrace of the interp's call chain.
@@ -3534,7 +3531,7 @@
/*
-=item C<static const char* GDB_print_reg(PARROT_INTERP, int t, int n)>
+=item C<static const char* GDB_print_reg>
Used by GDB_P to convert register values for display. Takes register
type and number as arguments.
@@ -3574,7 +3571,7 @@
/*
-=item C<static const char* GDB_P(PARROT_INTERP, const char *s)>
+=item C<static const char* GDB_P>
Used by PDB_print to print register values. Takes a pointer to the
register name(s).
Modified: trunk/src/embed.c
==============================================================================
--- trunk/src/embed.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/embed.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -79,7 +79,7 @@
/*
-=item C<Parrot_Interp Parrot_new(Parrot_Interp parent)>
+=item C<Parrot_Interp Parrot_new>
Returns a new Parrot interpreter.
@@ -111,7 +111,7 @@
/*
-=item C<void Parrot_init_stacktop(PARROT_INTERP, void *stack_top)>
+=item C<void Parrot_init_stacktop>
Initializes the new interpreter when it hasn't been initialized before.
@@ -138,7 +138,7 @@
/*
-=item C<void Parrot_set_flag(PARROT_INTERP, INTVAL flag)>
+=item C<void Parrot_set_flag>
Sets on any of the following flags, specified by C<flag>, in the interpreter:
@@ -173,7 +173,7 @@
/*
-=item C<void Parrot_set_debug(PARROT_INTERP, UINTVAL flag)>
+=item C<void Parrot_set_debug>
Set a debug flag: C<PARROT_DEBUG_FLAG>.
@@ -191,7 +191,7 @@
/*
-=item C<void Parrot_set_executable_name(PARROT_INTERP, Parrot_String name)>
+=item C<void Parrot_set_executable_name>
Sets the name of the executable launching Parrot (see C<pbc_to_exe> and the
C<parrot> binary).
@@ -213,7 +213,7 @@
/*
-=item C<void Parrot_set_trace(PARROT_INTERP, UINTVAL flag)>
+=item C<void Parrot_set_trace>
Set a trace flag: C<PARROT_TRACE_FLAG>
@@ -232,7 +232,7 @@
/*
-=item C<void Parrot_clear_flag(PARROT_INTERP, INTVAL flag)>
+=item C<void Parrot_clear_flag>
Clears a flag in the interpreter.
@@ -250,7 +250,7 @@
/*
-=item C<void Parrot_clear_debug(PARROT_INTERP, UINTVAL flag)>
+=item C<void Parrot_clear_debug>
Clears a flag in the interpreter.
@@ -268,7 +268,7 @@
/*
-=item C<void Parrot_clear_trace(PARROT_INTERP, UINTVAL flag)>
+=item C<void Parrot_clear_trace>
Clears a flag in the interpreter.
@@ -286,7 +286,7 @@
/*
-=item C<Parrot_Int Parrot_test_flag(PARROT_INTERP, INTVAL flag)>
+=item C<Parrot_Int Parrot_test_flag>
Test the interpreter flags specified in C<flag>.
@@ -304,7 +304,7 @@
/*
-=item C<UINTVAL Parrot_test_debug(PARROT_INTERP, UINTVAL flag)>
+=item C<UINTVAL Parrot_test_debug>
Test the interpreter flags specified in C<flag>.
@@ -322,7 +322,7 @@
/*
-=item C<UINTVAL Parrot_test_trace(PARROT_INTERP, UINTVAL flag)>
+=item C<UINTVAL Parrot_test_trace>
Test the interpreter flags specified in C<flag>.
@@ -340,7 +340,7 @@
/*
-=item C<void Parrot_set_run_core(PARROT_INTERP, Parrot_Run_core_t core)>
+=item C<void Parrot_set_run_core>
Sets the specified run core.
@@ -358,7 +358,7 @@
/*
-=item C<void Parrot_setwarnings(PARROT_INTERP, Parrot_warnclass wc)>
+=item C<void Parrot_setwarnings>
Activates the given warnings.
@@ -377,8 +377,7 @@
/*
-=item C<PackFile * Parrot_pbc_read(PARROT_INTERP, const char *fullname,
-const int debug)>
+=item C<PackFile * Parrot_pbc_read>
Read in a bytecode, unpack it into a C<PackFile> structure, and do fixups.
@@ -564,7 +563,7 @@
/*
-=item C<void Parrot_pbc_load(PARROT_INTERP, PackFile *pf)>
+=item C<void Parrot_pbc_load>
Loads the C<PackFile> returned by C<Parrot_pbc_read()>.
@@ -587,7 +586,7 @@
/*
-=item C<void Parrot_pbc_fixup_loaded(PARROT_INTERP)>
+=item C<void Parrot_pbc_fixup_loaded>
Fixups after pbc loading
@@ -604,7 +603,7 @@
/*
-=item C<static PMC* setup_argv(PARROT_INTERP, int argc, char **argv)>
+=item C<static PMC* setup_argv>
Creates and returns C<ARGS> array PMC.
@@ -653,7 +652,7 @@
/*
-=item C<static int prof_sort_f(const void *a, const void *b)>
+=item C<static int prof_sort_f>
Sort function for profile data, by time.
@@ -680,7 +679,7 @@
/*
-=item C<static const char * op_name(PARROT_INTERP, int k)>
+=item C<static const char * op_name>
Returns the name of the opcode.
@@ -716,7 +715,7 @@
/*
-=item C<static FLOATVAL calibrate(PARROT_INTERP)>
+=item C<static FLOATVAL calibrate>
With this calibration, reported times of C<parrot -p> almost match those
measured with time C<parrot -R bounds>.
@@ -748,7 +747,7 @@
/*
-=item C<static void print_profile(PARROT_INTERP, int status, void *p)>
+=item C<static void print_profile>
Prints out a profile listing.
@@ -832,7 +831,7 @@
/*
-=item C<static void print_debug(PARROT_INTERP, int status, void *p)>
+=item C<static void print_debug>
Prints GC info.
@@ -855,7 +854,7 @@
/*
-=item C<static PMC* set_current_sub(PARROT_INTERP)>
+=item C<static PMC* set_current_sub>
Search the fixup table for a PMC matching the argument. On a match,
set up the appropriate context.
@@ -919,7 +918,7 @@
/*
-=item C<void Parrot_runcode(PARROT_INTERP, int argc, char **argv)>
+=item C<void Parrot_runcode>
Sets up C<ARGV> and runs the ops.
@@ -1015,7 +1014,7 @@
/*
-=item C<opcode_t * Parrot_debug(PARROT_INTERP, Parrot_Interp debugger, opcode_t * pc)>
+=item C<opcode_t * Parrot_debug>
Runs the interpreter's bytecode in debugging mode.
@@ -1144,8 +1143,7 @@
/*
-=item C<void Parrot_disassemble(PARROT_INTERP, const char *outfile,
-Parrot_disassemble_options options)>
+=item C<void Parrot_disassemble>
Disassembles and prints out the interpreter's bytecode.
@@ -1237,7 +1235,7 @@
/*
-=item C<void Parrot_run_native(PARROT_INTERP, native_func_t func)>
+=item C<void Parrot_run_native>
Run the C function C<func> through the program C<[enternative, end]>.
This ensures that the function is run with the same setup as in other
@@ -1277,8 +1275,7 @@
/*
-=item C<Parrot_PMC Parrot_compile_string(PARROT_INTERP, Parrot_String type,
-const char *code, Parrot_String *error)>
+=item C<Parrot_PMC Parrot_compile_string>
Compile code string.
Modified: trunk/src/exit.c
==============================================================================
--- trunk/src/exit.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/exit.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -28,8 +28,7 @@
/*
-=item C<void Parrot_on_exit(PARROT_INTERP, exit_handler_f function,
-void *arg)>
+=item C<void Parrot_on_exit>
Register the specified function to be called on exit.
@@ -55,7 +54,7 @@
/*
-=item C<void Parrot_exit(PARROT_INTERP, int status)>
+=item C<void Parrot_exit>
Exit, calling any registered exit handlers.
Modified: trunk/src/gc/api.c
==============================================================================
--- trunk/src/gc/api.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/gc/api.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -52,7 +52,7 @@
/*
-=item C<PMC * new_pmc_header(PARROT_INTERP, UINTVAL flags)>
+=item C<PMC * new_pmc_header>
Gets a new PMC header from the PMC pool's free list. Guaranteed to return a
valid PMC object or else Parrot will panic. Sets the necessary flags for the
@@ -101,7 +101,7 @@
/*
-=item C<static PMC_EXT * new_pmc_ext(PARROT_INTERP)>
+=item C<static PMC_EXT * new_pmc_ext>
Gets a new free C<PMC_EXT> structure from the PMC_EXT pool. A pointer to the
new PMC_EXT is returned. Does not check to ensure the PMC_EXT is non-null
@@ -126,7 +126,7 @@
/*
-=item C<void add_pmc_ext(PARROT_INTERP, PMC *pmc)>
+=item C<void add_pmc_ext>
Obtains a new C<PMC_EXT> structure, and attaches it to the given C<PMC>.
Sets the necessary flags associated with the PMC_EXT structure. Ensures
@@ -159,7 +159,7 @@
/*
-=item C<void add_pmc_sync(PARROT_INTERP, PMC *pmc)>
+=item C<void add_pmc_sync>
Adds a C<Sync*> structure to the given C<PMC>. Initializes the PMC's owner
field and the synchronization mutext. Does not check to ensure the C<Sync *> is
@@ -187,7 +187,7 @@
/*
-=item C<STRING * new_string_header(PARROT_INTERP, UINTVAL flags)>
+=item C<STRING * new_string_header>
Returns a new C<STRING> header from the string pool or the constant string
pool. Sets default flags on the string object: C<PObj_is_string_FLAG>,
@@ -219,7 +219,7 @@
/*
-=item C<Buffer * new_buffer_header(PARROT_INTERP)>
+=item C<Buffer * new_buffer_header>
Creates and returns a new C<Buffer> from the buffer header pool. Calls
C<get_free_buffer> to do all the work.
@@ -241,7 +241,7 @@
/*
-=item C<void * new_bufferlike_header(PARROT_INTERP, size_t size)>
+=item C<void * new_bufferlike_header>
Returns a new buffer-like header from the appropriate sized pool.
@@ -263,7 +263,7 @@
/*
-=item C<void Parrot_gc_free_pmc(PARROT_INTERP, Small_Object_Pool *pool, PObj *p)>
+=item C<void Parrot_gc_free_pmc>
Frees a PMC that is no longer being used. Calls a custom C<destroy> VTABLE
method if one is available. If the PMC uses a PMC_EXT structure, that is freed
@@ -303,7 +303,7 @@
/*
-=item C<void Parrot_gc_free_pmc_ext(PARROT_INTERP, PMC *p)>
+=item C<void Parrot_gc_free_pmc_ext>
Frees the C<PMC_EXT> structure attached to a PMC, if it exists.
@@ -335,7 +335,7 @@
/*
-=item C<void Parrot_gc_free_sysmem(PARROT_INTERP, Small_Object_Pool *pool, PObj *b)>
+=item C<void Parrot_gc_free_sysmem>
If the PMC uses memory allocated directly from the system, this function
frees that memory.
@@ -359,7 +359,7 @@
/*
-=item C<void Parrot_gc_free_buffer_malloc(PARROT_INTERP, Small_Object_Pool *pool, PObj *b)>
+=item C<void Parrot_gc_free_buffer_malloc>
Frees the given buffer, returning the storage space to the operating system
and removing it from Parrot's memory management system. If the buffer is COW,
@@ -394,7 +394,7 @@
/*
-=item C<void Parrot_gc_free_buffer(PARROT_INTERP, Small_Object_Pool *pool, PObj *b)>
+=item C<void Parrot_gc_free_buffer>
Frees a buffer, returning it to the memory pool for Parrot to possibly
reuse later.
@@ -423,7 +423,7 @@
/*
-=item C<void Parrot_gc_profile_start(PARROT_INTERP)>
+=item C<void Parrot_gc_profile_start>
Records the start time of a GC mark run when profiling is enabled.
@@ -441,7 +441,7 @@
/*
-=item C<void Parrot_gc_profile_end(PARROT_INTERP, int what)>
+=item C<void Parrot_gc_profile_end>
Records the end time of the GC mark run part C<what> run when profiling is
enabled. Also record start time of next part.
@@ -476,7 +476,7 @@
/*
-=item C<void Parrot_gc_ms_run_init(PARROT_INTERP)>
+=item C<void Parrot_gc_ms_run_init>
Prepares the collector for a mark & sweep GC run. This is the
initializer function for the MS garbage collector.
@@ -500,7 +500,7 @@
/*
-=item C<void Parrot_do_gc_run(PARROT_INTERP, UINTVAL flags)>
+=item C<void Parrot_do_gc_run>
Calls the configured garbage collector to find and reclaim unused
headers.
Modified: trunk/src/gc/generational_ms.c
==============================================================================
--- trunk/src/gc/generational_ms.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/gc/generational_ms.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -498,7 +498,7 @@
=over 4
-=item C<static void parrot_gc_gms_deinit(PARROT_INTERP)>
+=item C<static void parrot_gc_gms_deinit>
Free used resources.
@@ -521,7 +521,7 @@
/*
-=item C<static void gc_gms_pool_init(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void gc_gms_pool_init>
Initialize pool variables. This function must set the pool function pointers
for C<add_free_object>, C<get_free_object>, C<alloc_objects>, and
@@ -549,7 +549,7 @@
/*
-=item C<void Parrot_gc_gms_init(PARROT_INTERP)>
+=item C<void Parrot_gc_gms_init>
Initialize the state structures of the gc system. Called immediately before
creation of memory pools.
@@ -584,7 +584,7 @@
=over 4
-=item C<static void gc_gms_add_free_object(PARROT_INTERP, Small_Object_Pool *pool, PObj *to_add)>
+=item C<static void gc_gms_add_free_object>
Unused. White (dead) objects are added in a bunch to the free_list.
@@ -603,8 +603,7 @@
/*
-=item C<static void gc_gms_chain_objects(PARROT_INTERP, Small_Object_Pool *pool,
-Small_Object_Arena *new_arena, size_t real_size)>
+=item C<static void gc_gms_chain_objects>
TODO: interfere active_destroy and put these items into a
separate white area, so that a sweep has just to run through these
@@ -694,7 +693,7 @@
/*
-=item C<static void gc_gms_alloc_objects(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void gc_gms_alloc_objects>
Allocate new objects for the given pool.
@@ -727,7 +726,7 @@
/*
-=item C<static void gc_gms_more_objects(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void gc_gms_more_objects>
Run a GC cycle or allocate new objects for the given pool.
@@ -754,7 +753,7 @@
/*
-=item C<static PObj * gc_gms_get_free_object(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static PObj * gc_gms_get_free_object>
Get a new object off the free_list in the given pool.
@@ -810,8 +809,7 @@
=over 4
-=item C<static Gc_gms_gen * gc_gms_create_gen(PARROT_INTERP,
-Small_Object_Pool *pool, size_t gen_no)>
+=item C<static Gc_gms_gen * gc_gms_create_gen>
Create a generation structure for the given generation number.
@@ -842,7 +840,7 @@
/*
-=item C<static void gc_gms_init_gen(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void gc_gms_init_gen>
Initalize the generation system by creating the first two generations.
@@ -872,7 +870,7 @@
/*
-=item C<static Gc_gms_gen * gc_gms_find_gen(PARROT_INTERP, const Gc_gms_hdr *h, UINTVAL gen_no)>
+=item C<static Gc_gms_gen * gc_gms_find_gen>
=cut
@@ -908,7 +906,7 @@
/*
-=item C<static void gc_gms_promote(PARROT_INTERP, Gc_gms_hdr *h, UINTVAL gen_no)>
+=item C<static void gc_gms_promote>
=cut
@@ -954,7 +952,7 @@
/*
-=item C<static void gc_gms_store_hdr_list(PARROT_INTERP, Gc_gms_hdr_list *l, Gc_gms_hdr *h)>
+=item C<static void gc_gms_store_hdr_list>
=cut
@@ -986,7 +984,7 @@
/*
-=item C<static void gc_gms_clear_hdr_list(PARROT_INTERP, Gc_gms_hdr_list *l)>
+=item C<static void gc_gms_clear_hdr_list>
=cut
@@ -1007,7 +1005,7 @@
/*
-=item C<static void gc_gms_store_igp(PARROT_INTERP, Gc_gms_hdr *h)>
+=item C<static void gc_gms_store_igp>
=cut
@@ -1025,7 +1023,7 @@
/*
-=item C<static void gc_gms_clear_igp(PARROT_INTERP, Gc_gms_gen *gen)>
+=item C<static void gc_gms_clear_igp>
=cut
@@ -1042,7 +1040,7 @@
/*
-=item C<void parrot_gc_gms_wb(PARROT_INTERP, PMC *agg, void *old, void *_new)>
+=item C<void parrot_gc_gms_wb>
Called by the write barrier. The aggregate belongs to an older generation
then the I<new> value written into it. Put the header of the new value
@@ -1079,8 +1077,7 @@
/*
-=item C<void parrot_gc_gms_wb_key(PARROT_INTERP, PMC *agg, void *old,
-void *old_key, void *_new, void *new_key)>
+=item C<void parrot_gc_gms_wb_key>
=cut
@@ -1114,8 +1111,7 @@
/*
-=item C<static void gc_gms_merge_gen(PARROT_INTERP, Small_Object_Pool *pool,
-int flag, Gc_gms_plan *plan)>
+=item C<static void gc_gms_merge_gen>
=cut
@@ -1148,8 +1144,7 @@
/*
-=item C<static void gc_gms_use_gen(PARROT_INTERP, Small_Object_Pool *pool,
-int flag, const Gc_gms_plan *plan)>
+=item C<static void gc_gms_use_gen>
=cut
@@ -1183,7 +1178,7 @@
/*
-=item C<static int set_gen_cb(PARROT_INTERP, Small_Object_Pool *pool, int flag, void *arg)>
+=item C<static int set_gen_cb>
=cut
@@ -1205,7 +1200,7 @@
/*
-=item C<static void gc_gms_set_gen(PARROT_INTERP)>
+=item C<static void gc_gms_set_gen>
=cut
@@ -1320,7 +1315,7 @@
/*
-=item C<static void gc_gms_setto_gray(PARROT_INTERP, Gc_gms_hdr *h, int priority)>
+=item C<static void gc_gms_setto_gray>
Set the white header C<h> to gray.
@@ -1383,7 +1378,7 @@
/*
-=item C<static void gc_gms_setto_black(PARROT_INTERP, Gc_gms_hdr *h, int priority)>
+=item C<static void gc_gms_setto_black>
Set the white header C<h> to black.
@@ -1443,7 +1438,7 @@
/*
-=item C<void parrot_gc_gms_pobject_lives(PARROT_INTERP, PObj *obj)>
+=item C<void parrot_gc_gms_pobject_lives>
Set the object live - called by the pobject_lives macro
@@ -1473,8 +1468,7 @@
/*
-=item C<static int init_mark_cb(PARROT_INTERP, Small_Object_Pool *pool,
-int flag, void *arg)>
+=item C<static int init_mark_cb>
=cut
@@ -1493,7 +1487,7 @@
/*
-=item C<static void gc_gms_init_mark(PARROT_INTERP)>
+=item C<static void gc_gms_init_mark>
Initialize the mark phase of GC.
@@ -1517,8 +1511,7 @@
/*
-=item C<static int trace_igp_cb(PARROT_INTERP, Small_Object_Pool *pool,
-int flag, void *arg)>
+=item C<static int trace_igp_cb>
=cut
@@ -1544,7 +1537,7 @@
/*
-=item C<static int gc_gms_trace_root(PARROT_INTERP, int trace_stack)>
+=item C<static int gc_gms_trace_root>
Trace the root set. If C<trace_stack> is true, trace system areas.
@@ -1566,8 +1559,7 @@
/*
-=item C<static int trace_children_cb(PARROT_INTERP, Small_Object_Pool *pool,
-int flag, void *arg)>
+=item C<static int trace_children_cb>
=cut
@@ -1612,7 +1604,7 @@
/*
-=item C<static int gc_gms_trace_children(PARROT_INTERP)>
+=item C<static int gc_gms_trace_children>
Traverse gray objects: mark and blacken. Returns 0 if the trace was aborted
lazily.
@@ -1631,7 +1623,7 @@
/*
-=item C<static int sweep_cb_pmc(PARROT_INTERP, Small_Object_Pool *pool, int flag, void *arg)>
+=item C<static int sweep_cb_pmc>
move everything from white up to the free_list to the free_list
scan for active destroy objects
@@ -1671,8 +1663,7 @@
/*
-=item C<static int sweep_cb_buf(PARROT_INTERP, Small_Object_Pool *pool,
-int flag, void *arg)>
+=item C<static int sweep_cb_buf>
=cut
@@ -1738,7 +1729,7 @@
/*
-=item C<static void gc_gms_sweep(PARROT_INTERP)>
+=item C<static void gc_gms_sweep>
Free unused resources, put white objects onto free_list.
@@ -1756,8 +1747,7 @@
/*
-=item C<static int end_cycle_cb(PARROT_INTERP, Small_Object_Pool *pool,
-int flag, void *arg)>
+=item C<static int end_cycle_cb>
=cut
@@ -1782,7 +1772,7 @@
/*
-=item C<static void gc_gms_end_cycle(PARROT_INTERP)>
+=item C<static void gc_gms_end_cycle>
=cut
@@ -1803,7 +1793,7 @@
=over 4
-=item C<static void parrot_gc_gms_run(PARROT_INTERP, UINTVAL flags)>
+=item C<static void parrot_gc_gms_run>
Interface to C<Parrot_do_gc_run>. C<flags> is one of:
@@ -1859,7 +1849,7 @@
/*
-=item C<static void gms_debug_verify(PARROT_INTERP, Small_Object_Pool *pool, const char *action)>
+=item C<static void gms_debug_verify>
=cut
Modified: trunk/src/gc/incremental_ms.c
==============================================================================
--- trunk/src/gc/incremental_ms.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/gc/incremental_ms.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -504,8 +504,7 @@
/*
-=item C<static void gc_ims_add_free_object(PARROT_INTERP,
-Small_Object_Pool *pool, void *to_add)>
+=item C<static void gc_ims_add_free_object>
Add object C<to_add> to the free_list in the given pool.
C<pool->num_free_objects> has to be updated by the caller.
@@ -532,7 +531,7 @@
/*
-=item C<static void * gc_ims_get_free_object(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void * gc_ims_get_free_object>
Get a new object off the free_list in the given pool.
@@ -575,7 +574,7 @@
/*
-=item C<static void gc_ims_alloc_objects(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void gc_ims_alloc_objects>
Allocate new objects for the given pool.
@@ -605,7 +604,7 @@
/*
-=item C<static void gc_ims_pool_init(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void gc_ims_pool_init>
Initializes a pool by setting the appropriate function pointers to add, get,
and allocate objects.
@@ -627,7 +626,7 @@
/*
-=item C<static void parrot_gc_ims_deinit(PARROT_INTERP)>
+=item C<static void parrot_gc_ims_deinit>
Shuts down this GC system.
@@ -648,7 +647,7 @@
/*
-=item C<void Parrot_gc_ims_init(PARROT_INTERP)>
+=item C<void Parrot_gc_ims_init>
Initialize the state structures of the gc system. Called immediately before
creation of memory pools. This function must set the function pointers
@@ -679,7 +678,7 @@
/*
-=item C<static void parrot_gc_ims_reinit(PARROT_INTERP)>
+=item C<static void parrot_gc_ims_reinit>
Reinitialize the collector for the next collection cycle.
@@ -711,7 +710,7 @@
/*
-=item C<static void parrot_gc_ims_mark(PARROT_INTERP)>
+=item C<static void parrot_gc_ims_mark>
Mark a bunch of children.
@@ -754,7 +753,7 @@
/*
-=item C<static int sweep_cb(PARROT_INTERP, Small_Object_Pool *pool, int flag, void *arg)>
+=item C<static int sweep_cb>
Callback to sweep a header pool (see Parrot_forall_header_pools).
@@ -781,7 +780,7 @@
/*
-=item C<static void parrot_gc_ims_sweep(PARROT_INTERP)>
+=item C<static void parrot_gc_ims_sweep>
Free unused objects in all header pools.
@@ -832,8 +831,7 @@
/*
-=item C<static int collect_cb(PARROT_INTERP, Small_Object_Pool *pool, int flag,
-void *arg)>
+=item C<static int collect_cb>
Callback to collect a header pool (see Parrot_forall_header_pools).
@@ -883,7 +881,7 @@
/*
-=item C<static int parrot_gc_ims_collect(PARROT_INTERP, int check_only)>
+=item C<static int parrot_gc_ims_collect>
Run the copying collector in memory pools, if it could yield some free memory.
@@ -928,7 +926,7 @@
/*
-=item C<static void parrot_gc_ims_run_increment(PARROT_INTERP)>
+=item C<static void parrot_gc_ims_run_increment>
Run one increment of collection. This function is triggered by object
allocation.
@@ -1006,7 +1004,7 @@
/*
-=item C<static void parrot_gc_ims_run(PARROT_INTERP, UINTVAL flags)>
+=item C<static void parrot_gc_ims_run>
Interface to C<Parrot_do_gc_run>. C<flags> is one of:
@@ -1109,7 +1107,7 @@
/*
-=item C<void Parrot_gc_ims_wb(PARROT_INTERP, PMC *agg, PMC *_new)>
+=item C<void Parrot_gc_ims_wb>
Write barrier called by the GC_WRITE_BARRIER macro. Always when storing
a white object into a black aggregate, either the object must
Modified: trunk/src/gc/mark_sweep.c
==============================================================================
--- trunk/src/gc/mark_sweep.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/gc/mark_sweep.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -140,7 +140,7 @@
/*
-=item C<void Parrot_gc_ms_run(PARROT_INTERP, UINTVAL flags)>
+=item C<void Parrot_gc_ms_run>
Runs the stop-the-world mark & sweep (MS) collector.
@@ -245,7 +245,7 @@
/*
-=item C<int Parrot_gc_trace_root(PARROT_INTERP, Parrot_gc_trace_type trace)>
+=item C<int Parrot_gc_trace_root>
Traces the root set. Returns 0 if it's a lazy GC run and all objects
that need timely destruction were found.
@@ -369,7 +369,7 @@
/*
-=item C<void Parrot_gc_sweep(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<void Parrot_gc_sweep>
Puts any buffers/PMCs that are now unused onto the pool's free list. If
C<GC_IS_MALLOC>, bufstart gets freed too, if possible. Avoids buffers that
@@ -461,7 +461,7 @@
/*
-=item C<void pobject_lives(PARROT_INTERP, PObj *obj)>
+=item C<void pobject_lives>
Marks the PObj as "alive" for the Garbage Collector. Takes a pointer to a PObj,
and performs necessary marking to ensure the PMC and its direct children nodes
@@ -525,7 +525,7 @@
/*
-=item C<INTVAL contained_in_pool(const Small_Object_Pool *pool, const void *ptr)>
+=item C<INTVAL contained_in_pool>
Returns whether the given C<*ptr> points to a location in C<pool>.
@@ -557,7 +557,7 @@
/*
-=item C<int Parrot_is_const_pmc(PARROT_INTERP, const PMC *pmc)>
+=item C<int Parrot_is_const_pmc>
Returns whether C<*pmc> is a constant PMC. The given pointer is a constant
PMC if it points into the constant PMC pool.
@@ -585,7 +585,7 @@
/*
-=item C<static void mark_special(PARROT_INTERP, PMC *obj)>
+=item C<static void mark_special>
Marks the children of a special PMC. Handles the marking necessary
for shared PMCs, and ensures timely marking of high-priority PMCs.
@@ -680,7 +680,7 @@
/*
-=item C<static void more_traceable_objects(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void more_traceable_objects>
We're out of traceable objects. First we try a GC run to free some up. If
that doesn't work, allocate a new arena.
@@ -714,7 +714,7 @@
/*
-=item C<static void gc_ms_add_free_pmc_ext(PARROT_INTERP, Small_Object_Pool *pool, void *to_add)>
+=item C<static void gc_ms_add_free_pmc_ext>
Add a freed PMC_EXT structure to the free list in the PMC_EXT pool. Objects
on the free list can be reused later.
@@ -737,7 +737,7 @@
/*
-=item C<static void gc_ms_add_free_object(PARROT_INTERP, Small_Object_Pool *pool, void *to_add)>
+=item C<static void gc_ms_add_free_object>
Add an unused object back to the pool's free list for later reuse. Set
the PObj flags to indicate that the item is free.
@@ -761,7 +761,7 @@
/*
-=item C<static void * gc_ms_get_free_object(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void * gc_ms_get_free_object>
Free object allocator for the MS garbage collector system. If there are no
free objects, call C<gc_ms_add_free_object> to either free them up with a
@@ -800,7 +800,7 @@
/*
-=item C<static void * gc_ms_get_free_pmc_ext(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void * gc_ms_get_free_pmc_ext>
Get a new PMC_EXT structure from the free pool and return it.
@@ -835,7 +835,7 @@
/*
-=item C<static int sweep_cb(PARROT_INTERP, Small_Object_Pool *pool, int flag, void *arg)>
+=item C<static int sweep_cb>
Sweeps the given pool for the MS collector. This function also ends
the profiling timer, if profiling is enabled. Returns the total number
@@ -865,7 +865,7 @@
/*
-=item C<static int trace_active_PMCs(PARROT_INTERP, Parrot_gc_trace_type trace)>
+=item C<static int trace_active_PMCs>
Performs a full trace run and marks all the PMCs as active if they
are. Returns whether the run completed, that is, whether it's safe
@@ -890,7 +890,7 @@
/*
-=item C<static void clear_live_bits(const Small_Object_Pool *pool)>
+=item C<static void clear_live_bits>
Runs through all PMC arenas and clear live bits. This is used to reset
the GC system after a full system sweep.
@@ -921,7 +921,7 @@
/*
-=item C<void Parrot_gc_clear_live_bits(PARROT_INTERP)>
+=item C<void Parrot_gc_clear_live_bits>
Resets the PMC pool, so all objects are marked as "White". This
is done after a GC run to reset the system and prepare for the
@@ -942,7 +942,7 @@
/*
-=item C<int Parrot_gc_trace_children(PARROT_INTERP, size_t how_many)>
+=item C<int Parrot_gc_trace_children>
Returns whether the tracing process has completed.
@@ -1017,8 +1017,7 @@
/*
-=item C<void Parrot_add_to_free_list(PARROT_INTERP, Small_Object_Pool *pool,
-Small_Object_Arena *arena)>
+=item C<void Parrot_add_to_free_list>
Adds the objects in the newly allocated C<arena> to the free list.
@@ -1053,8 +1052,7 @@
/*
-=item C<void Parrot_append_arena_in_pool(PARROT_INTERP,
-Small_Object_Pool *pool, Small_Object_Arena *new_arena, size_t size)>
+=item C<void Parrot_append_arena_in_pool>
Insert the new arena into the pool's structure. Arenas are stored in a
linked list, so add the new arena to the list. Set information in the
@@ -1094,7 +1092,7 @@
/*
-=item C<static void gc_ms_alloc_objects(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void gc_ms_alloc_objects>
New arena allocator function for the MS garbage collector system. Allocates
and initializes a new memory arena in the given pool. Adds all the new
@@ -1146,7 +1144,7 @@
/*
-=item C<Small_Object_Pool * new_small_object_pool(size_t object_size, size_t objects_per_alloc)>
+=item C<Small_Object_Pool * new_small_object_pool>
Creates a new C<Small_Object_Pool> and returns a pointer to it.
Initializes the pool structure based on the size of objects in the
@@ -1177,7 +1175,7 @@
/*
-=item C<void gc_pmc_ext_pool_init(Small_Object_Pool *pool)>
+=item C<void gc_pmc_ext_pool_init>
Initialize the PMC_EXT pool functions. This is done separately from other
pools.
@@ -1199,7 +1197,7 @@
/*
-=item C<static void gc_ms_pool_init(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<static void gc_ms_pool_init>
Initialize a memory pool for the MS garbage collector system. Sets the
function pointers necessary to perform basic operations on a pool, such
@@ -1222,7 +1220,7 @@
/*
-=item C<void Parrot_gc_ms_init(PARROT_INTERP)>
+=item C<void Parrot_gc_ms_init>
Initialize the state structures of the gc system. Called immediately before
creation of memory pools. This function must set the function pointers
@@ -1247,8 +1245,7 @@
/*
-=item C<void Parrot_small_object_pool_merge(PARROT_INTERP,
-Small_Object_Pool *dest, Small_Object_Pool *source)>
+=item C<void Parrot_small_object_pool_merge>
Merge pool C<source> into pool C<dest>. Combines the free lists directly,
moves all arenas to the new pool, and remove the old pool. To merge, the
Modified: trunk/src/gc/memory.c
==============================================================================
--- trunk/src/gc/memory.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/gc/memory.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -28,7 +28,7 @@
/*
-=item C<void * mem_sys_allocate(size_t size)>
+=item C<void * mem_sys_allocate>
Uses C<malloc> to allocate system memory. Panics if the system cannot
return memory.
@@ -55,7 +55,7 @@
/*
-=item C<void * mem__internal_allocate(size_t size, const char *file, int line)>
+=item C<void * mem__internal_allocate>
Calls C<malloc> to allocate memory from the system, Panics if there is no
memory available. If C<DETAIL_MEMORY_DEBUG> macro is defined, prints
@@ -86,7 +86,7 @@
/*
-=item C<void * mem_sys_allocate_zeroed(size_t size)>
+=item C<void * mem_sys_allocate_zeroed>
Uses C<calloc> to allocate system memory. Guaranteed to succeed, Panics
otherwise.
@@ -113,7 +113,7 @@
/*
-=item C<void * mem__internal_allocate_zeroed(size_t size, const char *file, int line)>
+=item C<void * mem__internal_allocate_zeroed>
Uses C<calloc> to allocate system memory. Guaranteed to succeed, Panics
otherwise. If C<DETAIL_MEMORY_DEBUG> macro is defined, prints
@@ -144,7 +144,7 @@
/*
-=item C<void * mem_sys_realloc(void *from, size_t size)>
+=item C<void * mem_sys_realloc>
Resizes a chunk of memory. Unlike C<realloc>, it can handle a
NULL pointer, in which case it calls C<calloc> to create the memory
@@ -180,7 +180,7 @@
/*
-=item C<void * mem_sys_realloc_zeroed(void *from, size_t size, size_t old_size)>
+=item C<void * mem_sys_realloc_zeroed>
Resizes a chunk of system memory and fills the newly allocated space
with zeroes. If the pointer is C<NULL> a new memory block is
@@ -216,8 +216,7 @@
/*
-=item C<void * mem__internal_realloc(void *from, size_t size,
-const char *file, int line)>
+=item C<void * mem__internal_realloc>
Resizes a chunk of system memory. Unlike C<realloc>, it can handle a
NULL pointer, in which case a new memory block is allocated for the
@@ -254,8 +253,7 @@
/*
-=item C<void * mem__internal_realloc_zeroed(void *from, size_t size,
-size_t old_size, const char *file, int line)>
+=item C<void * mem__internal_realloc_zeroed>
Reallocates a given buffer of size C<old_size> to C<size>. If the new size
is larger then the old size, the difference is filled with zeros. Contains
@@ -295,7 +293,7 @@
/*
-=item C<void mem_sys_free(void *from)>
+=item C<void mem_sys_free>
Frees a chunk of memory back to the system.
@@ -317,7 +315,7 @@
/*
-=item C<void mem__internal_free(void *from, const char *file, int line)>
+=item C<void mem__internal_free>
Frees a chunk of memory back to the system. If
C<DETAIL_MEMORY_DEBUG> macro is defined, prints debug information to
@@ -342,7 +340,7 @@
/*
-=item C<void mem_setup_allocator(PARROT_INTERP, void *stacktop)>
+=item C<void mem_setup_allocator>
Initializes the memory allocator and the garbage collection subsystem.
Calls the initialization function associated with each collector, which
Modified: trunk/src/gc/pools.c
==============================================================================
--- trunk/src/gc/pools.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/gc/pools.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -84,7 +84,7 @@
=over 4
-=item C<void * get_free_buffer(PARROT_INTERP, Small_Object_Pool *pool)>
+=item C<void * get_free_buffer>
Gets a free object or buffer from the given C<pool> and returns it. If the
object is larger then a standard C<PObj> structure, all additional memory is
@@ -122,7 +122,7 @@
=over 4
-=item C<Small_Object_Pool * new_pmc_pool(PARROT_INTERP)>
+=item C<Small_Object_Pool * new_pmc_pool>
Creates and initializes a new pool for PMCs and returns it.
@@ -150,7 +150,7 @@
/*
-=item C<Small_Object_Pool * new_bufferlike_pool(PARROT_INTERP, size_t actual_buffer_size)>
+=item C<Small_Object_Pool * new_bufferlike_pool>
Creates a new pool for buffer-like structures. This is called from
C<get_bufferlike_pool()>, and should probably not be called directly.
@@ -180,7 +180,7 @@
/*
-=item C<Small_Object_Pool * new_buffer_pool(PARROT_INTERP)>
+=item C<Small_Object_Pool * new_buffer_pool>
Creates a new C<Small_Object_Pool> structure for managing buffer objects.
@@ -210,7 +210,7 @@
/*
-=item C<Small_Object_Pool * new_string_pool(PARROT_INTERP, INTVAL constant)>
+=item C<Small_Object_Pool * new_string_pool>
Creates a new pool for C<STRING>s and returns it. This calls
C<get_bufferlike_pool> internally, which in turn calls C<new_bufferlike_pool>.
@@ -241,7 +241,7 @@
/*
-=item C<Small_Object_Pool * get_bufferlike_pool(PARROT_INTERP, size_t buffer_size)>
+=item C<Small_Object_Pool * get_bufferlike_pool>
Makes and return a bufferlike header pool for objects of a given size. If a
pool for objects of that size already exists, no new pool will be created and
@@ -286,7 +286,7 @@
/*
-=item C<size_t get_max_buffer_address(PARROT_INTERP)>
+=item C<size_t get_max_buffer_address>
Calculates the maximum buffer address and returns it. This is done by looping
through all the sized pools, and finding the pool whose C<end_arena_memory>
@@ -320,7 +320,7 @@
/*
-=item C<size_t get_min_buffer_address(PARROT_INTERP)>
+=item C<size_t get_min_buffer_address>
Calculates the minimum buffer address and returns it. Loops through all sized
pools, and finds the one with the smallest C<start_arena_memory> field. Notice
@@ -356,7 +356,7 @@
/*
-=item C<size_t get_max_pmc_address(PARROT_INTERP)>
+=item C<size_t get_max_pmc_address>
Returns the maximum memory address used by the C<pmc_pool>.
@@ -375,7 +375,7 @@
/*
-=item C<size_t get_min_pmc_address(PARROT_INTERP)>
+=item C<size_t get_min_pmc_address>
Returns the minimum memory address used by the C<pmc_pool>. Notice that the
memory region between C<get_min_pmc_address> and C<get_max_pmc_address> may be
@@ -396,7 +396,7 @@
/*
-=item C<int is_buffer_ptr(PARROT_INTERP, const void *ptr)>
+=item C<int is_buffer_ptr>
Checks whether the given C<ptr> is located within one of the sized
header pools. Returns C<1> if it is, and C<0> if not.
@@ -425,7 +425,7 @@
/*
-=item C<int is_pmc_ptr(PARROT_INTERP, const void *ptr)>
+=item C<int is_pmc_ptr>
Checks that C<ptr> is actually a PMC pointer. Returns C<1> if it is, C<0>
otherwise.
@@ -445,7 +445,7 @@
/*
-=item C<void Parrot_initialize_header_pools(PARROT_INTERP)>
+=item C<void Parrot_initialize_header_pools>
The initialization routine for the interpreter's header pools. Initializes
pools for string headers, constant string headers, buffers, PMCs, PMC_EXTs, and
@@ -512,8 +512,7 @@
/*
-=item C<int Parrot_forall_header_pools(PARROT_INTERP, int flag, void *arg,
-pool_iter_fn func)>
+=item C<int Parrot_forall_header_pools>
Iterates through header pools, invoking the given callback function on each
pool in the list matching the given criteria. Determines which pools to iterate
@@ -599,7 +598,7 @@
/*
-=item C<static void free_pool(Small_Object_Pool *pool)>
+=item C<static void free_pool>
Frees a pool and all of its arenas. Loops through the list of arenas backwards
and returns each to the memory manager. Then, frees the pool structure itself.
@@ -626,8 +625,7 @@
/*
-=item C<static int sweep_cb_buf(PARROT_INTERP, Small_Object_Pool *pool,
-int flag, void *arg)>
+=item C<static int sweep_cb_buf>
Performs a final garbage collection sweep, then frees the pool. Calls
C<Parrot_gc_sweep> to perform the sweep, and C<free_pool> to free the pool and
@@ -663,8 +661,7 @@
/*
-=item C<static int sweep_cb_pmc(PARROT_INTERP, Small_Object_Pool *pool,
-int flag, void *arg)>
+=item C<static int sweep_cb_pmc>
Performs a garbage collection sweep of the given pmc pool, then frees it. Calls
C<Parrot_gc_sweep> to perform the sweep, and C<free_pool> to free the pool and
@@ -686,7 +683,7 @@
/*
-=item C<void Parrot_destroy_header_pools(PARROT_INTERP)>
+=item C<void Parrot_destroy_header_pools>
Performs a garbage collection sweep on all pools, then frees them. Calls
C<Parrot_forall_header_pools> to loop over all the pools, passing
@@ -733,7 +730,7 @@
/*
-=item C<static void fix_pmc_syncs(Interp *dest_interp, Small_Object_Pool *pool)>
+=item C<static void fix_pmc_syncs>
Walks through the given arena, looking for all live and shared PMCs,
transferring their sync values to the destination interpreter.
@@ -773,7 +770,7 @@
/*
-=item C<void Parrot_merge_header_pools(Interp *dest_interp, Interp *source_interp)>
+=item C<void Parrot_merge_header_pools>
Merges the header pools of C<source_interp> into those of C<dest_interp>.
(Used to deal with shared objects left after interpreter destruction.)
Modified: trunk/src/gc/register.c
==============================================================================
--- trunk/src/gc/register.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/gc/register.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -146,7 +146,7 @@
/*
-=item C<void destroy_context(PARROT_INTERP)>
+=item C<void destroy_context>
Frees allocated context memory.
@@ -182,7 +182,7 @@
/*
-=item C<void create_initial_context(PARROT_INTERP)>
+=item C<void create_initial_context>
Creates the interpreter's initial context.
@@ -212,7 +212,7 @@
/*
-=item C<void parrot_gc_context(PARROT_INTERP)>
+=item C<void parrot_gc_context>
Cleans up dead context memory; called by the garbage collector. This only
applies in the chunked context memory scheme.
@@ -242,7 +242,7 @@
/*
-=item C<static void clear_regs(PARROT_INTERP, Parrot_Context *ctx)>
+=item C<static void clear_regs>
Clears all registers in a context. PMC and STRING registers contain PMCNULL
and NULL, respectively. Integer and float registers contain negative flag
@@ -294,8 +294,7 @@
/*
-=item C<static void init_context(PARROT_INTERP, Parrot_Context *ctx,
-const Parrot_Context *old)>
+=item C<static void init_context>
Initializes a freshly allocated or recycled context.
@@ -339,7 +338,7 @@
/*
-=item C<Parrot_Context * Parrot_push_context(PARROT_INTERP, const INTVAL *n_regs_used)>
+=item C<Parrot_Context * Parrot_push_context>
Creates and sets the current context to a new context, remembering the old
context in C<caller_ctx>. Suitable to use with C<Parrot_pop_context>.
@@ -370,7 +369,7 @@
/*
-=item C<void Parrot_pop_context(PARROT_INTERP)>
+=item C<void Parrot_pop_context>
Frees the context created with C<Parrot_push_context> and restores the previous
context (the caller context).
@@ -406,8 +405,7 @@
/*
-=item C<Parrot_Context * Parrot_alloc_context(PARROT_INTERP,
-const INTVAL *number_regs_used, Parrot_Context *old)>
+=item C<Parrot_Context * Parrot_alloc_context>
Allocates and returns a new context. Does not set this new context as the
current context. Note that the register usage C<n_regs_used> is copied. Use
@@ -507,7 +505,7 @@
/*
-=item C<Parrot_Context * Parrot_set_new_context(PARROT_INTERP, const INTVAL *number_regs_used)>
+=item C<Parrot_Context * Parrot_set_new_context>
Allocates and returns a new context as the current context. Note that the
register usage C<n_regs_used> is copied.
@@ -535,7 +533,7 @@
/*
-=item C<void Parrot_free_context(PARROT_INTERP, Parrot_Context *ctx, int deref)>
+=item C<void Parrot_free_context>
Frees the context if its reference count is zero. If C<deref>
is true, then reduce the reference count prior to determining
@@ -642,8 +640,7 @@
/*
-=item C<Parrot_Context * Parrot_context_ref_trace(PARROT_INTERP,
-Parrot_Context *ctx, const char *file, int line)>
+=item C<Parrot_Context * Parrot_context_ref_trace>
Helper function to trace references when CTX_LEAK_DEBUG is set.
@@ -677,7 +674,7 @@
/*
-=item C<void Parrot_set_context_threshold(PARROT_INTERP, Parrot_Context *ctx)>
+=item C<void Parrot_set_context_threshold>
Marks the context as possible threshold.
@@ -703,7 +700,7 @@
=cut
-=item C<void Parrot_clear_i(PARROT_INTERP)>
+=item C<void Parrot_clear_i>
Sets all integer registers in the current context to 0.
@@ -724,7 +721,7 @@
/*
-=item C<void Parrot_clear_s(PARROT_INTERP)>
+=item C<void Parrot_clear_s>
Sets all STRING registers in the current context to NULL.
@@ -745,7 +742,7 @@
/*
-=item C<void Parrot_clear_p(PARROT_INTERP)>
+=item C<void Parrot_clear_p>
Sets all PMC registers in the current context to NULL.
@@ -766,7 +763,7 @@
/*
-=item C<void Parrot_clear_n(PARROT_INTERP)>
+=item C<void Parrot_clear_n>
Sets all number registers in the current context to 0.0.
Modified: trunk/src/gc/resources.c
==============================================================================
--- trunk/src/gc/resources.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/gc/resources.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -131,8 +131,7 @@
/*
-=item C<static void alloc_new_block(PARROT_INTERP, size_t size,
-Memory_Pool *pool, const char *why)>
+=item C<static void alloc_new_block>
Allocate a new memory block. We allocate either the requested size or the
default size, whichever is larger. Add the new block to the given memory
@@ -191,7 +190,7 @@
/*
-=item C<static void * mem_allocate(PARROT_INTERP, size_t size, Memory_Pool *pool)>
+=item C<static void * mem_allocate>
Allocates memory for headers.
@@ -291,7 +290,7 @@
/*
-=item C<static const char* buffer_location(PARROT_INTERP, const PObj *b)>
+=item C<static const char* buffer_location>
Recturns a constant string representing the location of the given
PObj C<b> in one of the PMC registers. If the PMC is not located
@@ -327,7 +326,7 @@
/*
-=item C<static void debug_print_buf(PARROT_INTERP, const PObj *b)>
+=item C<static void debug_print_buf>
Prints a debug statement with information about the given PObj C<b>.
=cut
@@ -352,7 +351,7 @@
=over 4
-=item C<static void compact_pool(PARROT_INTERP, Memory_Pool *pool)>
+=item C<static void compact_pool>
Compact the string buffer pool. Does not perform a GC scan, or mark items
as being alive in any way.
@@ -589,7 +588,7 @@
/*
-=item C<void Parrot_go_collect(PARROT_INTERP)>
+=item C<void Parrot_go_collect>
Scan the string pools and compact them. This does not perform a GC mark or
sweep run, and does not check whether string buffers are still alive.
@@ -608,7 +607,7 @@
/*
-=item C<static size_t aligned_size(const Buffer *buffer, size_t len)>
+=item C<static size_t aligned_size>
Determines the size of Buffer C<buffer> which has nominal length C<len>.
The actual size in RAM of the Buffer might be different because of
@@ -635,7 +634,7 @@
/*
-=item C<static char * aligned_mem(const Buffer *buffer, char *mem)>
+=item C<static char * aligned_mem>
Returns a pointer to the aligned allocated storage for Buffer C<buffer>,
which might not be the same as the pointer to C<buffeR> because of
@@ -664,7 +663,7 @@
/*
-=item C<static size_t aligned_string_size(size_t len)>
+=item C<static size_t aligned_string_size>
Determines the size of a string of length C<len> in RAM, accounting for
alignment.
@@ -687,7 +686,7 @@
/*
-=item C<int Parrot_in_memory_pool(PARROT_INTERP, void *bufstart)>
+=item C<int Parrot_in_memory_pool>
Determines if the given C<bufstart> pointer points to a location inside the
memory pool. Returns 1 if the pointer is in the memory pool, 0 otherwise.
@@ -723,7 +722,7 @@
=over 4
-=item C<void Parrot_reallocate(PARROT_INTERP, Buffer *buffer, size_t newsize)>
+=item C<void Parrot_reallocate>
Reallocate the Buffer's buffer memory to the given size. The
allocated buffer will not shrink. If the buffer was allocated with
@@ -795,7 +794,7 @@
/*
-=item C<void Parrot_reallocate_string(PARROT_INTERP, STRING *str, size_t newsize)>
+=item C<void Parrot_reallocate_string>
Reallocate the STRING's buffer memory to the given size. The allocated
buffer will not shrink. This function sets also C<str-E<gt>strstart> to the
@@ -866,7 +865,7 @@
/*
-=item C<void Parrot_allocate(PARROT_INTERP, Buffer *buffer, size_t size)>
+=item C<void Parrot_allocate>
Allocate buffer memory for the given Buffer pointer. The C<size>
has to be a multiple of the word size.
@@ -891,7 +890,7 @@
/*
-=item C<void Parrot_allocate_aligned(PARROT_INTERP, Buffer *buffer, size_t size)>
+=item C<void Parrot_allocate_aligned>
Like above, except the C<size> will be rounded up and the address of
the buffer will have the same alignment as a pointer returned by
@@ -922,7 +921,7 @@
/*
-=item C<void Parrot_allocate_string(PARROT_INTERP, STRING *str, size_t size)>
+=item C<void Parrot_allocate_string>
Allocate the STRING's buffer memory to the given size. The allocated
buffer maybe slightly bigger than the given C<size>. This function
@@ -965,7 +964,7 @@
/*
-=item C<static Memory_Pool * new_memory_pool(size_t min_block, compact_f compact)>
+=item C<static Memory_Pool * new_memory_pool>
Allocate a new C<Memory_Pool> structures, and set some initial values.
return a pointer to the new pool.
@@ -995,7 +994,7 @@
/*
-=item C<void Parrot_initialize_memory_pools(PARROT_INTERP)>
+=item C<void Parrot_initialize_memory_pools>
Initialize the managed memory pools. Parrot maintains two C<Memory_Pool>
structures, the general memory pool and the constant string pool. Create
@@ -1023,7 +1022,7 @@
/*
-=item C<void Parrot_destroy_memory_pools(PARROT_INTERP)>
+=item C<void Parrot_destroy_memory_pools>
Destroys the memory pool and the constant string pool. Loop through both
pools and destroy all memory blocks contained in them. Once all the
@@ -1059,7 +1058,7 @@
/*
-=item C<static void merge_pools(Memory_Pool *dest, Memory_Pool *source)>
+=item C<static void merge_pools>
Merge two memory pools together. Do this by moving all memory blocks
from the C<*source> pool into the C<*dest> pool. The C<source> pool
@@ -1104,7 +1103,7 @@
/*
-=item C<void Parrot_merge_memory_pools(Interp *dest_interp, Interp *source_interp)>
+=item C<void Parrot_merge_memory_pools>
Merge the memory pools of two interpreter structures. Merge the general
memory pool and the constant string pools from C<source_interp> into
Modified: trunk/src/gc/system.c
==============================================================================
--- trunk/src/gc/system.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/gc/system.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -50,7 +50,7 @@
/*
-=item C<void trace_system_areas(PARROT_INTERP)>
+=item C<void trace_system_areas>
Initiates a trace of the system stack, looking for pointers which are being
used by functions in the call chain, but which might not be marked as alive
@@ -140,7 +140,7 @@
/*
-=item C<static void trace_system_stack(PARROT_INTERP)>
+=item C<static void trace_system_stack>
Traces the memory block starting at C<< interp->lo_var_ptr >>. This should be
the address of a local variable which has been created on the stack early in
@@ -169,7 +169,7 @@
/*
-=item C<static size_t find_common_mask(PARROT_INTERP, size_t val1, size_t val2)>
+=item C<static size_t find_common_mask>
Finds a mask covering the longest common bit-prefix of C<val1>
and C<val2>.
@@ -208,7 +208,7 @@
/*
-=item C<void trace_mem_block(PARROT_INTERP, size_t lo_var_ptr, size_t hi_var_ptr)>
+=item C<void trace_mem_block>
Traces the memory block between C<lo_var_ptr> and C<hi_var_ptr>.
Attempt to find pointers to PObjs or buffers, and mark them as "alive"
Modified: trunk/src/global_setup.c
==============================================================================
--- trunk/src/global_setup.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/global_setup.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -50,8 +50,7 @@
/*
-=item C<void Parrot_set_config_hash_internal(const unsigned char* parrot_config,
-unsigned int parrot_config_size)>
+=item C<void Parrot_set_config_hash_internal>
Called by Parrot_set_config_hash with the serialised hash which
will be used in subsequently created Interpreters.
@@ -72,7 +71,7 @@
/*
-=item C<static void parrot_set_config_hash_interpreter(PARROT_INTERP)>
+=item C<static void parrot_set_config_hash_interpreter>
Used internally to associate the config hash with an Interpreter
using the last registered config data.
@@ -108,7 +107,7 @@
/*
-=item C<void init_world_once(PARROT_INTERP)>
+=item C<void init_world_once>
Call init_world() if it hasn't been called before.
@@ -135,7 +134,7 @@
/*
-=item C<void init_world(PARROT_INTERP)>
+=item C<void init_world>
This is the actual initialization code called by C<init_world_once()>.
@@ -190,7 +189,7 @@
/*
-=item C<void parrot_global_setup_2(PARROT_INTERP)>
+=item C<void parrot_global_setup_2>
called from inmidst of PMC bootstrapping between pass 0 and 1
Modified: trunk/src/hll.c
==============================================================================
--- trunk/src/hll.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/hll.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -65,7 +65,7 @@
/*
-=item C<static PMC* new_hll_entry(PARROT_INTERP, STRING *entry_name)>
+=item C<static PMC* new_hll_entry>
Create a new HLL information table entry.
Takes an interpreter name and (optional) entry name.
@@ -119,7 +119,7 @@
/*
-=item C<void Parrot_init_HLL(PARROT_INTERP)>
+=item C<void Parrot_init_HLL>
Initialises the HLL_info and HLL_namespace fields. Takes an interpreter and
calls C<Parrot_register_HLL> to register name within Parrot core.
@@ -142,7 +142,7 @@
/*
-=item C<INTVAL Parrot_register_HLL(PARROT_INTERP, STRING *hll_name)>
+=item C<INTVAL Parrot_register_HLL>
Return the HLL id if C<hll_name> is already registered in the interpreter.
@@ -209,7 +209,7 @@
/*
-=item C<INTVAL Parrot_register_HLL_lib(PARROT_INTERP, STRING *hll_lib)>
+=item C<INTVAL Parrot_register_HLL_lib>
Register an HLL library.
Takes an interpreter name and a pointer to a library name.
@@ -264,7 +264,7 @@
/*
-=item C<INTVAL Parrot_get_HLL_id(PARROT_INTERP, STRING *hll_name)>
+=item C<INTVAL Parrot_get_HLL_id>
Return the ID of the given HLL name or -1 on error. C<parrot> has ID 0.
@@ -298,7 +298,7 @@
/*
-=item C<STRING * Parrot_get_HLL_name(PARROT_INTERP, INTVAL id)>
+=item C<STRING * Parrot_get_HLL_name>
Returns the corresponding PMC's name.
Takes an interpreter name and an id.
@@ -340,8 +340,7 @@
/*
-=item C<void Parrot_register_HLL_type(PARROT_INTERP, INTVAL hll_id,
-INTVAL core_type, INTVAL hll_type)>
+=item C<void Parrot_register_HLL_type>
Register a type mapping of C<< core_type => hll_type >> for the given HLL.
@@ -385,7 +384,7 @@
/*
-=item C<INTVAL Parrot_get_HLL_type(PARROT_INTERP, INTVAL hll_id, INTVAL core_type)>
+=item C<INTVAL Parrot_get_HLL_type>
Get an equivalent HLL type number for the language C<hll_id>. If the given HLL
doesn't remap the given type, or if C<hll_id> is the special value
@@ -433,7 +432,7 @@
/*
-=item C<INTVAL Parrot_get_ctx_HLL_type(PARROT_INTERP, INTVAL core_type)>
+=item C<INTVAL Parrot_get_ctx_HLL_type>
Return an equivalent PMC type number according to the current HLL setings in
the context. If no type is registered, returns C<core_type>.
@@ -454,7 +453,7 @@
/*
-=item C<PMC* Parrot_get_ctx_HLL_namespace(PARROT_INTERP)>
+=item C<PMC* Parrot_get_ctx_HLL_namespace>
Return root namespace of the current HLL.
@@ -474,7 +473,7 @@
/*
-=item C<PMC* Parrot_get_HLL_namespace(PARROT_INTERP, int hll_id)>
+=item C<PMC* Parrot_get_HLL_namespace>
Return root namespace of the HLL with the ID of I<hll_id>. If C<hll_id> is the
special value C<PARROT_HLL_NONE>, return the global root namespace.
@@ -498,7 +497,7 @@
/*
-=item C<void Parrot_regenerate_HLL_namespaces(PARROT_INTERP)>
+=item C<void Parrot_regenerate_HLL_namespaces>
Create all HLL namespaces that don't already exist. This is necessary when
creating a new interpreter which shares an old interpreter's HLL_info.
Modified: trunk/src/io/api.c
==============================================================================
--- trunk/src/io/api.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/api.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -37,7 +37,7 @@
=over 4
-=item C<PMC * Parrot_io_stdhandle(PARROT_INTERP, INTVAL fileno, PMC *newhandle)>
+=item C<PMC * Parrot_io_stdhandle>
Get the current standard IO object and optionally set a new one.
@@ -63,7 +63,7 @@
/*
-=item C<PMC * Parrot_io_new_pmc(PARROT_INTERP, INTVAL flags)>
+=item C<PMC * Parrot_io_new_pmc>
Creates a new I/O filehandle object. The value of C<flags> is set
in the returned PMC.
@@ -91,7 +91,7 @@
/*
-=item C<PMC * Parrot_io_open(PARROT_INTERP, PMC *pmc, STRING *path, STRING *mode)>
+=item C<PMC * Parrot_io_open>
Return an open filehandle for a given string path and flags. Defaults to
creating a new FileHandle PMC. If a PMC object is passed in, it uses that
@@ -124,7 +124,7 @@
/*
-=item C<PMC * Parrot_io_fdopen(PARROT_INTERP, PMC *pmc, PIOHANDLE fd, STRING *sflags)>
+=item C<PMC * Parrot_io_fdopen>
Creates and returns a C<FileHandle> PMC for a given set of flags on an
existing, open file descriptor.
@@ -167,7 +167,7 @@
/*
-=item C<INTVAL Parrot_io_close(PARROT_INTERP, PMC *pmc)>
+=item C<INTVAL Parrot_io_close>
Closes the filehandle object.
@@ -192,7 +192,7 @@
/*
-=item C<INTVAL Parrot_io_is_closed(PARROT_INTERP, PMC *pmc)>
+=item C<INTVAL Parrot_io_is_closed>
Test whether a filehandle is closed.
@@ -216,7 +216,7 @@
/*
-=item C<void Parrot_io_flush(PARROT_INTERP, PMC *pmc)>
+=item C<void Parrot_io_flush>
Flushes the C<ParrotIO> PMC C<*pmc>.
@@ -237,7 +237,7 @@
/*
-=item C<STRING * Parrot_io_reads(PARROT_INTERP, PMC *pmc, size_t length)>
+=item C<STRING * Parrot_io_reads>
Return a new C<STRING*> holding up to C<len> bytes.
@@ -261,7 +261,7 @@
/*
-=item C<STRING * Parrot_io_readline(PARROT_INTERP, PMC *pmc)>
+=item C<STRING * Parrot_io_readline>
Return a new C<STRING*> holding the next line read from the file.
@@ -285,7 +285,7 @@
/*
-=item C<INTVAL Parrot_io_write(PARROT_INTERP, PMC *pmc, const void *buffer, size_t length)>
+=item C<INTVAL Parrot_io_write>
Writes C<len> bytes from C<*buffer> to C<*pmc>.
@@ -317,7 +317,7 @@
/*
-=item C<PIOOFF_T Parrot_io_seek(PARROT_INTERP, PMC *pmc, PIOOFF_T offset, INTVAL w)>
+=item C<PIOOFF_T Parrot_io_seek>
Moves the read/write position of C<*pmc> to offset C<bytes> from the
position indicated by C<w>. Typically C<w> will be C<0> for the start of
@@ -341,7 +341,7 @@
/*
-=item C<PIOOFF_T Parrot_io_tell(PARROT_INTERP, PMC *pmc)>
+=item C<PIOOFF_T Parrot_io_tell>
Returns the current read/write position of C<*pmc>.
@@ -364,7 +364,7 @@
/*
-=item C<INTVAL Parrot_io_peek(PARROT_INTERP, PMC *pmc, STRING **buffer)>
+=item C<INTVAL Parrot_io_peek>
Retrieve the next character in the stream without modifying the stream. Calls
the platform-specific implementation of 'peek'.
@@ -386,7 +386,7 @@
/*
-=item C<INTVAL Parrot_io_eof(PARROT_INTERP, PMC *pmc)>
+=item C<INTVAL Parrot_io_eof>
Returns a boolean value indication whether C<*pmc>'s current read/write
position is C<EOF>.
@@ -418,7 +418,7 @@
/*
-=item C<INTVAL Parrot_io_puts(PARROT_INTERP, PMC *pmc, const char *s)>
+=item C<INTVAL Parrot_io_puts>
Writes C<*s> tp C<*pmc>. C string version.
@@ -436,7 +436,7 @@
/*
-=item C<INTVAL Parrot_io_putps(PARROT_INTERP, PMC *pmc, STRING *s)>
+=item C<INTVAL Parrot_io_putps>
Writes C<*s> to C<*pmc>. Parrot string version.
@@ -463,7 +463,7 @@
/*
-=item C<INTVAL Parrot_io_fprintf(PARROT_INTERP, PMC *pmc, const char *s, ...)>
+=item C<INTVAL Parrot_io_fprintf>
Writes a C string format with varargs to C<*pmc>.
@@ -490,7 +490,7 @@
/*
-=item C<INTVAL Parrot_io_printf(PARROT_INTERP, const char *s, ...)>
+=item C<INTVAL Parrot_io_printf>
Writes a C string format with varargs to C<stdout>.
@@ -526,7 +526,7 @@
/*
-=item C<INTVAL Parrot_io_eprintf(PARROT_INTERP, const char *s, ...)>
+=item C<INTVAL Parrot_io_eprintf>
Writes a C string format with varargs to C<stderr>.
@@ -564,7 +564,7 @@
/*
-=item C<PIOHANDLE Parrot_io_getfd(PARROT_INTERP, PMC *pmc)>
+=item C<PIOHANDLE Parrot_io_getfd>
Returns C<*pmc>'s file descriptor, or C<0> if it is not defined.
@@ -583,7 +583,7 @@
/*
-=item C<INTVAL Parrot_io_is_tty(PARROT_INTERP, PMC *pmc)>
+=item C<INTVAL Parrot_io_is_tty>
Returns a boolean value indicating whether C<*pmc> is a console/tty.
@@ -611,7 +611,7 @@
=over 4
-=item C<PMC * Parrot_io_STDIN(PARROT_INTERP)>
+=item C<PMC * Parrot_io_STDIN>
Returns the C<FileHandle> PMC for C<stdin>.
@@ -631,7 +631,7 @@
/*
-=item C<PMC * Parrot_io_STDOUT(PARROT_INTERP)>
+=item C<PMC * Parrot_io_STDOUT>
Returns the C<FileHandle> PMC for C<stdout>.
@@ -651,7 +651,7 @@
/*
-=item C<PMC * Parrot_io_STDERR(PARROT_INTERP)>
+=item C<PMC * Parrot_io_STDERR>
Returns the C<FileHandle> PMC for C<stderr>.
@@ -679,7 +679,7 @@
=over 4
-=item C<PIOOFF_T Parrot_io_make_offset(INTVAL offset)>
+=item C<PIOOFF_T Parrot_io_make_offset>
Returns C<offset>.
@@ -697,7 +697,7 @@
/*
-=item C<PIOOFF_T Parrot_io_make_offset32(INTVAL hi, INTVAL lo)>
+=item C<PIOOFF_T Parrot_io_make_offset32>
C<hi> is shifted 32 bytes to the left and C<or>ed together with C<lo>.
This allows 64-bit seeks with only 32-bit C<INTVALS>.
@@ -715,7 +715,7 @@
/*
-=item C<PIOOFF_T Parrot_io_make_offset_pmc(PARROT_INTERP, PMC *pmc)>
+=item C<PIOOFF_T Parrot_io_make_offset_pmc>
Returns the return value of the C<get_integer> vtable method on C<*pmc>.
Modified: trunk/src/io/buffer.c
==============================================================================
--- trunk/src/io/buffer.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/buffer.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -36,7 +36,7 @@
/*
-=item C<INTVAL Parrot_io_init_buffer(PARROT_INTERP)>
+=item C<INTVAL Parrot_io_init_buffer>
Initialize buffering on STDOUT and STDIN.
@@ -59,7 +59,7 @@
/*
-=item C<void Parrot_io_setbuf(PARROT_INTERP, PMC *filehandle, size_t bufsize)>
+=item C<void Parrot_io_setbuf>
Set the buffering mode for the filehandle.
@@ -129,7 +129,7 @@
/*
-=item C<INTVAL Parrot_io_setlinebuf(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_setlinebuf>
Set the file handle to line buffering mode.
@@ -161,7 +161,7 @@
/*
-=item C<INTVAL Parrot_io_flush_buffer(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_flush_buffer>
Flush the I/O buffer for a given filehandle object.
@@ -221,7 +221,7 @@
/*
-=item C<size_t Parrot_io_fill_readbuf(PARROT_INTERP, PMC *filehandle)>
+=item C<size_t Parrot_io_fill_readbuf>
The buffer layer's C<Fill> function.
@@ -264,7 +264,7 @@
/*
-=item C<size_t Parrot_io_read_buffer(PARROT_INTERP, PMC *filehandle, STRING **buf)>
+=item C<size_t Parrot_io_read_buffer>
The buffer layer's C<Read> function.
@@ -394,7 +394,7 @@
/*
-=item C<size_t Parrot_io_peek_buffer(PARROT_INTERP, PMC *filehandle, STRING **buf)>
+=item C<size_t Parrot_io_peek_buffer>
Retrieve the next character in the buffer without modifying the stream.
@@ -452,7 +452,7 @@
/*
-=item C<size_t Parrot_io_readline_buffer(PARROT_INTERP, PMC *filehandle, STRING **buf)>
+=item C<size_t Parrot_io_readline_buffer>
This is called from C<Parrot_io_read_buffer()> to do line buffered reading if
that is what is required.
@@ -555,7 +555,7 @@
/*
-=item C<size_t Parrot_io_write_buffer(PARROT_INTERP, PMC *filehandle, STRING *s)>
+=item C<size_t Parrot_io_write_buffer>
The buffer layer's C<Write> function.
@@ -673,8 +673,7 @@
/*
-=item C<PIOOFF_T Parrot_io_seek_buffer(PARROT_INTERP, PMC *filehandle,
-PIOOFF_T offset, INTVAL whence)>
+=item C<PIOOFF_T Parrot_io_seek_buffer>
The buffer layer's C<Seek> function.
@@ -729,7 +728,7 @@
/*
-=item C<static INTVAL io_is_end_of_line(const char *c)>
+=item C<static INTVAL io_is_end_of_line>
Determine if the current character is the end of the line.
Modified: trunk/src/io/core.c
==============================================================================
--- trunk/src/io/core.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/core.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -34,7 +34,7 @@
/*
-=item C<void Parrot_io_init(PARROT_INTERP)>
+=item C<void Parrot_io_init>
Sets up the interpreter's I/O storage and creates the C<STD*> handles.
@@ -78,7 +78,7 @@
/*
-=item C<void Parrot_io_finish(PARROT_INTERP)>
+=item C<void Parrot_io_finish>
Closes the interpreter's IO resourses. Called during its interpreter
destruction.
@@ -105,7 +105,7 @@
/*
-=item C<void Parrot_IOData_mark(PARROT_INTERP, ParrotIOData *piodata)>
+=item C<void Parrot_IOData_mark>
Called from C<trace_active_PMCs()> to mark the IO data live.
Modified: trunk/src/io/filehandle.c
==============================================================================
--- trunk/src/io/filehandle.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/filehandle.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -27,7 +27,7 @@
=over 4
-=item C<INTVAL Parrot_io_parse_open_flags(PARROT_INTERP, STRING *mode_str)>
+=item C<INTVAL Parrot_io_parse_open_flags>
Parses a Parrot string for file open mode flags (C<r> for read, C<w> for write,
C<a> for append, and C<p> for pipe) and returns the combined generic bit flags.
@@ -80,7 +80,7 @@
/*
-=item C<STRING * Parrot_io_make_string(PARROT_INTERP, STRING **buf, size_t len)>
+=item C<STRING * Parrot_io_make_string>
Creates a STRING* suitable for returning results from IO read functions.
The passed in C<buf> parameter can:
@@ -134,8 +134,7 @@
/*
-=item C<void Parrot_io_set_os_handle(PARROT_INTERP, PMC *filehandle,
-PIOHANDLE file_descriptor)>
+=item C<void Parrot_io_set_os_handle>
Sets the C<os_handle> attribute of the FileHandle object, which stores the
low-level filehandle for the OS.
@@ -162,7 +161,7 @@
/*
-=item C<PIOHANDLE Parrot_io_get_os_handle(PARROT_INTERP, PMC *filehandle)>
+=item C<PIOHANDLE Parrot_io_get_os_handle>
Retrieve the C<os_handle> attribute of the FileHandle object, which stores the
low-level filehandle for the OS.
@@ -186,7 +185,7 @@
/*
-=item C<void Parrot_io_set_flags(PARROT_INTERP, PMC *filehandle, INTVAL flags)>
+=item C<void Parrot_io_set_flags>
Set the C<flags> attribute of the FileHandle object, which stores bitwise flags
marking filehandle characteristics.
@@ -211,7 +210,7 @@
/*
-=item C<INTVAL Parrot_io_get_flags(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_get_flags>
Set the C<flags> attribute of the FileHandle object, which stores bitwise flags
marking filehandle characteristics.
@@ -237,7 +236,7 @@
/*
-=item C<void Parrot_io_set_file_size(PARROT_INTERP, PMC *filehandle, PIOOFF_T file_size)>
+=item C<void Parrot_io_set_file_size>
Set the C<file_size> attribute of the FileHandle object, which stores the
current file size.
@@ -262,7 +261,7 @@
/*
-=item C<PIOOFF_T Parrot_io_get_file_size(PARROT_INTERP, PMC *filehandle)>
+=item C<PIOOFF_T Parrot_io_get_file_size>
Get the C<file_size> attribute of the FileHandle object, which stores the
current file size.
@@ -287,8 +286,7 @@
/*
-=item C<void Parrot_io_set_buffer_start(PARROT_INTERP, PMC *filehandle,
-unsigned char *new_start)>
+=item C<void Parrot_io_set_buffer_start>
Set the C<buffer_start> attribute of the FileHandle object, which stores
the position of the start of the buffer.
@@ -312,7 +310,7 @@
/*
-=item C<unsigned char * Parrot_io_get_buffer_start(PARROT_INTERP, PMC *filehandle)>
+=item C<unsigned char * Parrot_io_get_buffer_start>
Get the C<buffer_start> attribute of the FileHandle object, which stores
the position of the start of the buffer.
@@ -337,7 +335,7 @@
/*
-=item C<unsigned char * Parrot_io_get_buffer_next(PARROT_INTERP, PMC *filehandle)>
+=item C<unsigned char * Parrot_io_get_buffer_next>
Get the C<buffer_next> attribute of the FileHandle object, which stores
the current position within the buffer.
@@ -362,8 +360,7 @@
/*
-=item C<void Parrot_io_set_buffer_next(PARROT_INTERP, PMC *filehandle,
-unsigned char *new_next)>
+=item C<void Parrot_io_set_buffer_next>
Set the C<buffer_next> attribute of the FileHandle object, which stores
the current position within the buffer.
@@ -387,7 +384,7 @@
/*
-=item C<unsigned char * Parrot_io_get_buffer_end(PARROT_INTERP, PMC *filehandle)>
+=item C<unsigned char * Parrot_io_get_buffer_end>
Get the C<buffer_end> attribute of the FileHandle object, which stores
the position of the end of the buffer.
@@ -412,8 +409,7 @@
/*
-=item C<void Parrot_io_set_buffer_end(PARROT_INTERP, PMC *filehandle,
-unsigned char *new_end)>
+=item C<void Parrot_io_set_buffer_end>
Set the C<buffer_end> attribute of the FileHandle object, which stores
the position of the end of the buffer.
@@ -437,7 +433,7 @@
/*
-=item C<INTVAL Parrot_io_get_buffer_flags(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_get_buffer_flags>
Get the C<buffer_flags> attribute of the FileHandle object, which stores
a collection of flags specific to the buffer.
@@ -461,7 +457,7 @@
/*
-=item C<void Parrot_io_set_buffer_flags(PARROT_INTERP, PMC *filehandle, INTVAL new_flags)>
+=item C<void Parrot_io_set_buffer_flags>
Set the C<buffer_flags> attribute of the FileHandle object, which stores
a collection of flags specific to the buffer.
@@ -484,7 +480,7 @@
/*
-=item C<size_t Parrot_io_get_buffer_size(PARROT_INTERP, PMC *filehandle)>
+=item C<size_t Parrot_io_get_buffer_size>
Get the C<buffer_size> attribute of the FileHandle object, which stores
the size of the buffer (in bytes).
@@ -508,7 +504,7 @@
/*
-=item C<void Parrot_io_set_buffer_size(PARROT_INTERP, PMC *filehandle, size_t new_size)>
+=item C<void Parrot_io_set_buffer_size>
Set the C<buffer_size> attribute of the FileHandle object, which stores
the size of the buffer (in bytes).
@@ -531,7 +527,7 @@
/*
-=item C<void Parrot_io_clear_buffer(PARROT_INTERP, PMC *filehandle)>
+=item C<void Parrot_io_clear_buffer>
Clear the filehandle buffer and free the associated memory.
@@ -558,7 +554,7 @@
/*
-=item C<PIOOFF_T Parrot_io_get_file_position(PARROT_INTERP, PMC *filehandle)>
+=item C<PIOOFF_T Parrot_io_get_file_position>
Get the C<file_pos> attribute of the FileHandle object, which stores
the current file position of the filehandle.
@@ -582,7 +578,7 @@
/*
-=item C<PIOOFF_T Parrot_io_get_last_file_position(PARROT_INTERP, PMC *filehandle)>
+=item C<PIOOFF_T Parrot_io_get_last_file_position>
Get the C<file_pos> attribute of the FileHandle object, which stores
the current file position of the filehandle.
@@ -606,7 +602,7 @@
/*
-=item C<void Parrot_io_set_file_position(PARROT_INTERP, PMC *filehandle, PIOOFF_T file_pos)>
+=item C<void Parrot_io_set_file_position>
Get the C<file_pos> attribute of the FileHandle object, which stores the
current file position of the filehandle. Also set the C<last_pos> attribute to
@@ -633,7 +629,7 @@
/*
-=item C<INTVAL Parrot_io_is_encoding(PARROT_INTERP, PMC *filehandle, STRING *value)>
+=item C<INTVAL Parrot_io_is_encoding>
Check whether the encoding attribute of the filehandle matches a passed in
string.
@@ -665,7 +661,7 @@
/*
-=item C<INTVAL Parrot_io_close_filehandle(PARROT_INTERP, PMC *pmc)>
+=item C<INTVAL Parrot_io_close_filehandle>
Flushes and closes the C<FileHandle> PMC C<*pmc>, but leaves the object intact
to be reused or collected.
@@ -695,7 +691,7 @@
/*
-=item C<INTVAL Parrot_io_is_closed_filehandle(PARROT_INTERP, PMC *pmc)>
+=item C<INTVAL Parrot_io_is_closed_filehandle>
Test whether a filehandle is closed.
@@ -713,7 +709,7 @@
/*
-=item C<void Parrot_io_flush_filehandle(PARROT_INTERP, PMC *pmc)>
+=item C<void Parrot_io_flush_filehandle>
Flushes the C<FileHandle> PMC C<*pmc>.
Modified: trunk/src/io/portable.c
==============================================================================
--- trunk/src/io/portable.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/portable.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -44,7 +44,7 @@
/*
-=item C<static const char * convert_flags_to_stdio(INTVAL flags)>
+=item C<static const char * convert_flags_to_stdio>
Returns a C string representation of C<flags> suitable for passing to
C<fopen()> in C<Parrot_io_open_portable()>.
@@ -86,7 +86,7 @@
/*
-=item C<INTVAL Parrot_io_init_portable(PARROT_INTERP)>
+=item C<INTVAL Parrot_io_init_portable>
Sets up standard streams, etc.
@@ -117,8 +117,7 @@
/*
-=item C<PMC * Parrot_io_open_portable(PARROT_INTERP, PMC *filehandle,
-STRING *path, INTVAL flags)>
+=item C<PMC * Parrot_io_open_portable>
Opens a new FileHandle PMC from a given STRING path with the provided modes.
@@ -177,8 +176,7 @@
/*
-=item C<PMC * Parrot_io_fdopen_portable(PARROT_INTERP, PMC *filehandle,
-PIOHANDLE fptr, INTVAL flags)>
+=item C<PMC * Parrot_io_fdopen_portable>
Associates an IO PMC with a file descriptor.
@@ -214,7 +212,7 @@
/*
-=item C<INTVAL Parrot_io_close_portable(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_close_portable>
Closes the underlying filehandle of a given IO PMC.
@@ -242,7 +240,7 @@
/*
-=item C<INTVAL Parrot_io_is_closed_portable(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_is_closed_portable>
Tests whether the filehandle has been closed.
@@ -263,7 +261,7 @@
/*
-=item C<static INTVAL io_is_tty_portable(PIOHANDLE fptr)>
+=item C<static INTVAL io_is_tty_portable>
Tests whether the given file descriptor is attached to a tty.
@@ -284,7 +282,7 @@
/*
-=item C<size_t Parrot_io_peek_portable(PARROT_INTERP, PMC *filehandle, STRING **buf)>
+=item C<size_t Parrot_io_peek_portable>
Retrieves the next character in the stream without modifying the stream.
@@ -318,7 +316,7 @@
/*
-=item C<INTVAL Parrot_io_getblksize_portable(PIOHANDLE fptr)>
+=item C<INTVAL Parrot_io_getblksize_portable>
Returns the block size of the given file descriptor.
@@ -339,7 +337,7 @@
/*
-=item C<INTVAL Parrot_io_flush_portable(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_flush_portable>
Flushes the underlying file descriptor of the given IO PMC.
@@ -357,8 +355,7 @@
/*
-=item C<size_t Parrot_io_read_portable(PARROT_INTERP, PMC *filehandle,
-STRING **buf)>
+=item C<size_t Parrot_io_read_portable>
Reads from the given filehandle into the provided STRING, returning the number
of bytes read.
@@ -392,7 +389,7 @@
/*
-=item C<size_t Parrot_io_write_portable(PARROT_INTERP, PMC *filehandle, STRING *s)>
+=item C<size_t Parrot_io_write_portable>
Writes the given STRING to the provided IO PMC.
@@ -412,8 +409,7 @@
/*
-=item C<PIOOFF_T Parrot_io_seek_portable(PARROT_INTERP, PMC *filehandle,
-PIOOFF_T offset, INTVAL whence)>
+=item C<PIOOFF_T Parrot_io_seek_portable>
Seeks to the given offset and position within the provided IO PMC.
@@ -443,7 +439,7 @@
/*
-=item C<PIOOFF_T Parrot_io_tell_portable(PARROT_INTERP, PMC *filehandle)>
+=item C<PIOOFF_T Parrot_io_tell_portable>
Returns the current position of the given IO PMC.
@@ -461,8 +457,7 @@
/*
-=item C<PMC * Parrot_io_open_pipe_portable(PARROT_INTERP, PMC *filehandle,
-STRING *command, int flags)>
+=item C<PMC * Parrot_io_open_pipe_portable>
Opens a pipe. Not implemented for this platform.
Modified: trunk/src/io/socket_api.c
==============================================================================
--- trunk/src/io/socket_api.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/socket_api.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -28,7 +28,7 @@
/*
-=item C<INTVAL Parrot_io_socket_is_closed(PMC *socket)>
+=item C<INTVAL Parrot_io_socket_is_closed>
=cut
@@ -115,8 +115,7 @@
/*
-=item C<INTVAL Parrot_io_poll(PARROT_INTERP, PMC *pmc, INTVAL which,
-INTVAL sec, INTVAL usec)>
+=item C<INTVAL Parrot_io_poll>
Polls C<*pmc> for the events in C<which> every C<sec> seconds + C<usec>
microseconds.
@@ -139,8 +138,7 @@
/*
-=item C<INTVAL Parrot_io_socket(PARROT_INTERP, PMC * socket, INTVAL fam,
-INTVAL type, INTVAL proto)>
+=item C<INTVAL Parrot_io_socket>
Creates and returns a socket using the specified address family, socket type,
and protocol number. Check the returned PMC with a boolean test to see whether
@@ -185,7 +183,7 @@
/*
-=item C<INTVAL Parrot_io_recv(PARROT_INTERP, PMC *pmc, STRING **buf)>
+=item C<INTVAL Parrot_io_recv>
Receives a message from the connected socket C<*pmc> in C<*buf>. Returns C<-1>
if it fails.
@@ -207,7 +205,7 @@
/*
-=item C<INTVAL Parrot_io_send(PARROT_INTERP, PMC *pmc, STRING *buf)>
+=item C<INTVAL Parrot_io_send>
Sends the message C<*buf> to the connected socket C<*pmc>. Returns
C<-1> if it cannot send the message.
@@ -230,7 +228,7 @@
/*
-=item C<INTVAL Parrot_io_connect(PARROT_INTERP, PMC *pmc, PMC *address)>
+=item C<INTVAL Parrot_io_connect>
Connects C<*pmc> to C<*address>. Returns C<-1> on failure.
@@ -251,7 +249,7 @@
/*
-=item C<INTVAL Parrot_io_bind(PARROT_INTERP, PMC *pmc, PMC *address)>
+=item C<INTVAL Parrot_io_bind>
Binds C<*pmc>'s socket to the local address and port specified by
C<*address>. Returns C<-1> on failure.
@@ -273,7 +271,7 @@
/*
-=item C<INTVAL Parrot_io_listen(PARROT_INTERP, PMC *pmc, INTVAL backlog)>
+=item C<INTVAL Parrot_io_listen>
Listens for new connections on socket C<*pmc>. Returns C<-1> on failure.
@@ -295,7 +293,7 @@
/*
-=item C<PMC * Parrot_io_accept(PARROT_INTERP, PMC *pmc)>
+=item C<PMC * Parrot_io_accept>
Accepts a new connection and returns a newly created C<ParrotIO> socket.
Returns C<NULL> on failure.
@@ -319,7 +317,7 @@
/*
-=item C<PMC * Parrot_io_new_socket_pmc(PARROT_INTERP, INTVAL flags)>
+=item C<PMC * Parrot_io_new_socket_pmc>
Creates a new I/O socket object. The value of C<flags> is set
in the returned PMC.
Modified: trunk/src/io/socket_unix.c
==============================================================================
--- trunk/src/io/socket_unix.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/socket_unix.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -76,7 +76,7 @@
=over 4
-=item C<PMC * Parrot_io_sockaddr_in(PARROT_INTERP, STRING *addr, INTVAL port)>
+=item C<PMC * Parrot_io_sockaddr_in>
C<Parrot_io_sockaddr_in()> is not part of the layer and so must be C<extern>.
@@ -115,8 +115,7 @@
/*
-=item C<INTVAL Parrot_io_socket_unix(PARROT_INTERP, PMC *s, int fam, int type,
-int proto)>
+=item C<INTVAL Parrot_io_socket_unix>
Uses C<socket()> to create a socket with the specified address family,
socket type and protocol number.
@@ -144,7 +143,7 @@
/*
-=item C<INTVAL Parrot_io_connect_unix(PARROT_INTERP, PMC *socket, PMC *r)>
+=item C<INTVAL Parrot_io_connect_unix>
Connects C<*io>'s socket to address C<*r>.
@@ -183,7 +182,7 @@
/*
-=item C<INTVAL Parrot_io_bind_unix(PARROT_INTERP, PMC *socket, PMC *sockaddr)>
+=item C<INTVAL Parrot_io_bind_unix>
Binds C<*io>'s socket to the local address and port specified by C<*l>.
@@ -215,7 +214,7 @@
/*
-=item C<INTVAL Parrot_io_listen_unix(PARROT_INTERP, PMC *socket, INTVAL sec)>
+=item C<INTVAL Parrot_io_listen_unix>
Listen for new connections. This is only applicable to C<STREAM> or
C<SEQ> sockets.
@@ -237,7 +236,7 @@
/*
-=item C<PMC * Parrot_io_accept_unix(PARROT_INTERP, PMC *socket)>
+=item C<PMC * Parrot_io_accept_unix>
Accept a new connection and return a newly created C<ParrotIO> socket.
@@ -281,7 +280,7 @@
/*
-=item C<INTVAL Parrot_io_send_unix(PARROT_INTERP, PMC *socket, STRING *s)>
+=item C<INTVAL Parrot_io_send_unix>
Send the message C<*s> to C<*io>'s connected socket.
@@ -334,7 +333,7 @@
/*
-=item C<INTVAL Parrot_io_recv_unix(PARROT_INTERP, PMC *socket, STRING **s)>
+=item C<INTVAL Parrot_io_recv_unix>
Receives a message in C<**s> from C<*io>'s connected socket.
@@ -386,8 +385,7 @@
/*
-=item C<INTVAL Parrot_io_poll_unix(PARROT_INTERP, PMC *socket, int which,
-int sec, int usec)>
+=item C<INTVAL Parrot_io_poll_unix>
Utility function for polling a single IO stream with a timeout.
@@ -439,8 +437,7 @@
/*
-=item C<static void get_sockaddr_in(PARROT_INTERP, PMC * sockaddr,
-const char* host, int port)>
+=item C<static void get_sockaddr_in>
=cut
Modified: trunk/src/io/socket_win32.c
==============================================================================
--- trunk/src/io/socket_win32.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/socket_win32.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -61,8 +61,7 @@
/*
-=item C<INTVAL Parrot_io_socket_win32(PARROT_INTERP, PMC * s, int fam,
-int type, int proto)>
+=item C<INTVAL Parrot_io_socket_win32>
Uses C<socket()> to create a socket with the specified address family,
socket type and protocol number.
@@ -90,7 +89,7 @@
/*
-=item C<INTVAL Parrot_io_connect_win32(PARROT_INTERP, PMC *socket, PMC *r)>
+=item C<INTVAL Parrot_io_connect_win32>
Connects C<*io>'s socket to address C<*r>.
@@ -129,7 +128,7 @@
/*
-=item C<INTVAL Parrot_io_bind_win32(PARROT_INTERP, PMC *socket, PMC *sockaddr)>
+=item C<INTVAL Parrot_io_bind_win32>
Binds C<*io>'s socket to the local address and port specified by C<*l>.
@@ -161,7 +160,7 @@
/*
-=item C<INTVAL Parrot_io_listen_win32(PARROT_INTERP, PMC *socket, INTVAL sec)>
+=item C<INTVAL Parrot_io_listen_win32>
Listen for new connections. This is only applicable to C<STREAM> or
C<SEQ> sockets.
@@ -183,7 +182,7 @@
/*
-=item C<PMC * Parrot_io_accept_win32(PARROT_INTERP, PMC *socket)>
+=item C<PMC * Parrot_io_accept_win32>
Accept a new connection and return a newly created C<ParrotIO> socket.
@@ -227,7 +226,7 @@
/*
-=item C<INTVAL Parrot_io_send_win32(PARROT_INTERP, PMC *socket, STRING *s)>
+=item C<INTVAL Parrot_io_send_win32>
Send the message C<*s> to C<*io>'s connected socket.
@@ -280,7 +279,7 @@
/*
-=item C<INTVAL Parrot_io_recv_win32(PARROT_INTERP, PMC *socket, STRING **s)>
+=item C<INTVAL Parrot_io_recv_win32>
Receives a message in C<**s> from C<*io>'s connected socket.
@@ -332,8 +331,7 @@
/*
-=item C<INTVAL Parrot_io_poll_win32(PARROT_INTERP, PMC *socket, int which,
-int sec, int usec)>
+=item C<INTVAL Parrot_io_poll_win32>
Utility function for polling a single IO stream with a timeout.
@@ -385,8 +383,7 @@
/*
-=item C<static void get_sockaddr_in(PARROT_INTERP, PMC * sockaddr,
-const char* host, int port)>
+=item C<static void get_sockaddr_in>
=cut
@@ -426,7 +423,7 @@
/*
-=item C<PMC * Parrot_io_sockaddr_in(PARROT_INTERP, STRING *addr, INTVAL port)>
+=item C<PMC * Parrot_io_sockaddr_in>
=cut
Modified: trunk/src/io/unix.c
==============================================================================
--- trunk/src/io/unix.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/unix.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -50,7 +50,7 @@
/*
-=item C<static INTVAL convert_flags_to_unix(INTVAL flags)>
+=item C<static INTVAL convert_flags_to_unix>
Returns a UNIX-specific interpretation of C<flags> suitable for passing
to C<open()> and C<fopen()> in C<Parrot_io_open_unix()> and
@@ -88,7 +88,7 @@
/*
-=item C<INTVAL Parrot_io_init_unix(PARROT_INTERP)>
+=item C<INTVAL Parrot_io_init_unix>
Sets up the interpreter's standard C<std*> IO handles. Returns C<0> on
success and C<-1> on error.
@@ -128,8 +128,7 @@
/*
-=item C<PMC * Parrot_io_open_unix(PARROT_INTERP, PMC *filehandle,
-STRING *path, INTVAL flags)>
+=item C<PMC * Parrot_io_open_unix>
Opens a string C<path>. C<flags> is a bitwise C<or> combination of C<PIO_F_*>
flag values.
@@ -246,7 +245,7 @@
/*
-=item C<INTVAL Parrot_io_async_unix(PARROT_INTERP, PMC *filehandle, INTVAL b)>
+=item C<INTVAL Parrot_io_async_unix>
Experimental asynchronous IO.
@@ -286,8 +285,7 @@
/*
-=item C<PMC * Parrot_io_fdopen_unix(PARROT_INTERP, PMC *filehandle,
-PIOHANDLE fd, INTVAL flags)>
+=item C<PMC * Parrot_io_fdopen_unix>
Returns a new C<FileHandle> PMC with the file descriptor passed in.
@@ -321,7 +319,7 @@
/*
-=item C<INTVAL Parrot_io_close_unix(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_close_unix>
Closes C<*io>'s file descriptor.
@@ -347,7 +345,7 @@
/*
-=item C<INTVAL Parrot_io_is_closed_unix(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_is_closed_unix>
Test whether the filehandle has been closed.
@@ -367,7 +365,7 @@
/*
-=item C<static INTVAL io_is_tty_unix(PIOHANDLE fd)>
+=item C<static INTVAL io_is_tty_unix>
Returns a boolean value indicating whether C<fd> is a console/tty.
@@ -384,7 +382,7 @@
/*
-=item C<INTVAL Parrot_io_getblksize_unix(PIOHANDLE fd)>
+=item C<INTVAL Parrot_io_getblksize_unix>
Various ways of determining block size.
@@ -430,7 +428,7 @@
/*
-=item C<INTVAL Parrot_io_flush_unix(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_flush_unix>
At lowest layer all we can do for C<flush> is to ask the kernel to
C<sync()>.
@@ -451,7 +449,7 @@
/*
-=item C<size_t Parrot_io_read_unix(PARROT_INTERP, PMC *filehandle, STRING **buf)>
+=item C<size_t Parrot_io_read_unix>
Calls C<read()> to return up to C<len> bytes in the memory starting at
C<buffer>.
@@ -499,7 +497,7 @@
/*
-=item C<size_t Parrot_io_write_unix(PARROT_INTERP, PMC *filehandle, STRING *s)>
+=item C<size_t Parrot_io_write_unix>
Calls C<write()> to write C<len> bytes from the memory starting at
C<buffer> to the file descriptor in C<*io>.
@@ -545,8 +543,7 @@
/*
-=item C<PIOOFF_T Parrot_io_seek_unix(PARROT_INTERP, PMC *filehandle,
-PIOOFF_T offset, INTVAL whence)>
+=item C<PIOOFF_T Parrot_io_seek_unix>
Hard seek.
@@ -597,7 +594,7 @@
/*
-=item C<PIOOFF_T Parrot_io_tell_unix(PARROT_INTERP, PMC *filehandle)>
+=item C<PIOOFF_T Parrot_io_tell_unix>
Returns the current read/write position on C<*io>'s file discriptor.
@@ -617,8 +614,7 @@
/*
-=item C<PMC * Parrot_io_open_pipe_unix(PARROT_INTERP, PMC *filehandle,
-STRING *command, int flags)>
+=item C<PMC * Parrot_io_open_pipe_unix>
Very limited C<exec> for now.
@@ -729,7 +725,7 @@
/*
-=item C<size_t Parrot_io_peek_unix(PARROT_INTERP, PMC *filehandle, STRING **buf)>
+=item C<size_t Parrot_io_peek_unix>
Retrieve the next character in the stream without modifying the stream. Not
implemented on this platform.
Modified: trunk/src/io/utf8.c
==============================================================================
--- trunk/src/io/utf8.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/utf8.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -33,7 +33,7 @@
/*
-=item C<size_t Parrot_io_read_utf8(PARROT_INTERP, PMC *filehandle, STRING **buf)>
+=item C<size_t Parrot_io_read_utf8>
Read a string from a filehandle in UTF-8 format and convert it to a Parrot
string.
@@ -99,7 +99,7 @@
/*
-=item C<size_t Parrot_io_write_utf8(PARROT_INTERP, PMC *filehandle, STRING *s)>
+=item C<size_t Parrot_io_write_utf8>
Write a Parrot string to a filehandle in UTF-8 format.
Modified: trunk/src/io/win32.c
==============================================================================
--- trunk/src/io/win32.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/io/win32.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -64,8 +64,7 @@
/*
-=item C<static INTVAL convert_flags_to_win32(INTVAL flags, DWORD * fdwAccess,
-DWORD * fdwShareMode, DWORD * fdwCreate)>
+=item C<static INTVAL convert_flags_to_win32>
Convert to platform-specific bit open flags.
@@ -120,7 +119,7 @@
/*
-=item C<INTVAL Parrot_io_init_win32(PARROT_INTERP)>
+=item C<INTVAL Parrot_io_init_win32>
Sets up the standard C<std*> IO handles.
@@ -172,7 +171,7 @@
/*
-=item C<INTVAL Parrot_io_getblksize_win32(PIOHANDLE fd)>
+=item C<INTVAL Parrot_io_getblksize_win32>
Returns C<PIO_BLKSIZE>.
@@ -190,8 +189,7 @@
/*
-=item C<PMC * Parrot_io_open_win32(PARROT_INTERP, PMC *filehandle,
-STRING *path, INTVAL flags)>
+=item C<PMC * Parrot_io_open_win32>
Calls C<CreateFile()> to open C<*spath> with the Win32 translation of
C<flags>.
@@ -255,8 +253,7 @@
/*
-=item C<PMC * Parrot_io_fdopen_win32(PARROT_INTERP, PMC *filehandle,
-PIOHANDLE fd, INTVAL flags)>
+=item C<PMC * Parrot_io_fdopen_win32>
Returns a new C<PMC> with C<fd> as its file descriptor.
@@ -292,7 +289,7 @@
/*
-=item C<INTVAL Parrot_io_close_win32(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_close_win32>
Calls C<CloseHandle()> to close C<*io>'s file descriptor.
@@ -316,7 +313,7 @@
/*
-=item C<INTVAL Parrot_io_is_closed_win32(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_is_closed_win32>
Test whether the filehandle has been closed.
@@ -336,7 +333,7 @@
/*
-=item C<static INTVAL io_is_tty_win32(PIOHANDLE fd)>
+=item C<static INTVAL io_is_tty_win32>
Returns whether C<fd> is a console/tty.
@@ -355,7 +352,7 @@
/*
-=item C<INTVAL Parrot_io_flush_win32(PARROT_INTERP, PMC *filehandle)>
+=item C<INTVAL Parrot_io_flush_win32>
Calls C<FlushFileBuffers()> to flush C<*io>'s file descriptor.
@@ -384,7 +381,7 @@
/*
-=item C<size_t Parrot_io_read_win32(PARROT_INTERP, PMC *filehandle, STRING **buf)>
+=item C<size_t Parrot_io_read_win32>
Calls C<ReadFile()> to read up to C<len> bytes from C<*io>'s file
descriptor to the memory starting at C<buffer>.
@@ -429,7 +426,7 @@
/*
-=item C<size_t Parrot_io_write_win32(PARROT_INTERP, PMC *filehandle, STRING *s)>
+=item C<size_t Parrot_io_write_win32>
Calls C<WriteFile()> to write C<len> bytes from the memory starting at
C<buffer> to C<*io>'s file descriptor. Returns C<(size_t)-1> on
@@ -472,8 +469,7 @@
/*
-=item C<PIOOFF_T Parrot_io_seek_win32(PARROT_INTERP, PMC *filehandle,
-PIOOFF_T off, INTVAL whence)>
+=item C<PIOOFF_T Parrot_io_seek_win32>
Hard seek.
@@ -506,7 +502,7 @@
/*
-=item C<PIOOFF_T Parrot_io_tell_win32(PARROT_INTERP, PMC *filehandle)>
+=item C<PIOOFF_T Parrot_io_tell_win32>
Returns the current read/write position of C<*io>'s file descriptor.
@@ -531,7 +527,7 @@
/*
-=item C<size_t Parrot_io_peek_win32(PARROT_INTERP, PMC *filehandle, STRING **buf)>
+=item C<size_t Parrot_io_peek_win32>
Retrieve the next character in the stream without modifying the stream. Not
implemented for this platform.
@@ -552,8 +548,7 @@
/*
-=item C<PMC * Parrot_io_open_pipe_win32(PARROT_INTERP, PMC *filehandle,
-STRING *command, int flags)>
+=item C<PMC * Parrot_io_open_pipe_win32>
Open a pipe. Not implemented for this platform.
Modified: trunk/src/library.c
==============================================================================
--- trunk/src/library.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/library.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -126,7 +126,7 @@
/*
-=item C<void parrot_init_library_paths(PARROT_INTERP)>
+=item C<void parrot_init_library_paths>
Create an array of StringArrays with library searchpaths and shared
extension used for loading various files at runtime. The created
@@ -256,7 +256,7 @@
/*
-=item C<static PMC* get_search_paths(PARROT_INTERP, enum_lib_paths which)>
+=item C<static PMC* get_search_paths>
Return lib_paths as array of StringArrays with library searchpaths and shared
extension used for loading various files at runtime.
@@ -296,7 +296,7 @@
/*
-=item C<static int is_abs_path(const STRING *file)>
+=item C<static int is_abs_path>
Determines whether a file name given by a fixed-8 or utf8 C<STRING> is an
absolute file name. Returns C<1> if the filename is absolute, returns C<0>
@@ -337,7 +337,7 @@
/*
-=item C<static void cnv_to_win32_filesep(STRING *path)>
+=item C<static void cnv_to_win32_filesep>
Converts a path with forward slashes to one with backward slashes.
@@ -363,7 +363,7 @@
/*
-=item C<static STRING* path_finalize(PARROT_INTERP, STRING *path)>
+=item C<static STRING* path_finalize>
Ensures the given STRING C<path> has a C-style NULL character at the end. The
length of the string is not increased to account for this NULL, however. In
@@ -401,7 +401,7 @@
/*
-=item C<static STRING* path_guarantee_trailing_separator(PARROT_INTERP, STRING *path)>
+=item C<static STRING* path_guarantee_trailing_separator>
unary path argument. the path string will have a
trailing path-separator appended if it is not
@@ -429,7 +429,7 @@
/*
-=item C<static STRING* path_append(PARROT_INTERP, STRING *l_path, STRING *r_path)>
+=item C<static STRING* path_append>
binary path arguments, the left arg is modified.
a trailing separator is guaranteed for the left
@@ -453,7 +453,7 @@
/*
-=item C<static STRING* path_concat(PARROT_INTERP, STRING *l_path, STRING *r_path)>
+=item C<static STRING* path_concat>
binary path arguments. A new string is created
that is the concatenation of the two path components
@@ -480,7 +480,7 @@
/*
-=item C<static STRING* try_load_path(PARROT_INTERP, STRING* path)>
+=item C<static STRING* try_load_path>
Attempts to load a file with name C<path>. If the file is successfully located,
the finalized name of the file is returned as a STRING. Otherwise, returns
@@ -511,7 +511,7 @@
/*
-=item C<static STRING* try_bytecode_extensions(PARROT_INTERP, STRING* path)>
+=item C<static STRING* try_bytecode_extensions>
Guess extensions, so that the user can drop the extensions
leaving it up to the build process/install whether or not
@@ -591,8 +591,7 @@
/*
-=item C<void Parrot_add_library_path(PARROT_INTERP, STRING *path,
-enum_lib_paths which)>
+=item C<void Parrot_add_library_path>
Add a path to the library searchpath of the given type.
@@ -616,8 +615,7 @@
/*
-=item C<void Parrot_add_library_path_from_cstring(PARROT_INTERP,
-const char *path, enum_lib_paths which)>
+=item C<void Parrot_add_library_path_from_cstring>
Add a path to the library searchpath of the given type (passing in a C string).
@@ -641,8 +639,7 @@
/*
-=item C<STRING* Parrot_locate_runtime_file_str(PARROT_INTERP, STRING *file,
-enum_runtime_ft type)>
+=item C<STRING* Parrot_locate_runtime_file_str>
Locate the full path for C<file_name> and the given file type(s). If
successful, returns a C-string allocated with C<Parrot_str_to_cstring> or
@@ -722,8 +719,7 @@
/*
-=item C<char* Parrot_locate_runtime_file(PARROT_INTERP, const char *file_name,
-enum_runtime_ft type)>
+=item C<char* Parrot_locate_runtime_file>
Locate the full path for C<file_name> and the given file type(s). If
successful, returns a C-string allocated with C<Parrot_str_to_cstring> or
@@ -765,7 +761,7 @@
/*
-=item C<char* Parrot_get_runtime_prefix(PARROT_INTERP)>
+=item C<char* Parrot_get_runtime_prefix>
Return a malloced C-string for the runtime prefix. The calling function
must free it.
@@ -805,7 +801,7 @@
/*
-=item C<STRING * Parrot_get_runtime_path(PARROT_INTERP)>
+=item C<STRING * Parrot_get_runtime_path>
Return a string for the runtime prefix.
@@ -845,8 +841,7 @@
/*
-=item C<STRING * parrot_split_path_ext(PARROT_INTERP, STRING *in,
-STRING **wo_ext, STRING **ext)>
+=item C<STRING * parrot_split_path_ext>
Split the pathstring C<in> into <path><filestem><ext>. Return the
C<filestem> of the pathstring. Set C<wo_ext> to the part without
Modified: trunk/src/longopt.c
==============================================================================
--- trunk/src/longopt.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/longopt.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -65,8 +65,7 @@
/*
-=item C<int longopt_get(PARROT_INTERP, int argc, const char* argv[],
-const struct longopt_opt_decl options[], struct longopt_opt_info* info_buf)>
+=item C<int longopt_get>
Gets long or short options, specified in C<options[]> (see
F<docs/dev/longopt.dev>).
@@ -120,9 +119,7 @@
/*
-=item C<static int longopt_get_longopt(PARROT_INTERP, int argc,
-const char* argv[], const struct longopt_opt_decl options[],
-struct longopt_opt_info* info_buf)>
+=item C<static int longopt_get_longopt>
Find the option identifier of a long option.
@@ -216,9 +213,7 @@
/*
-=item C<static int longopt_get_shortopt(PARROT_INTERP, int argc,
-const char* argv[], const struct longopt_opt_decl options[],
-struct longopt_opt_info* info_buf)>
+=item C<static int longopt_get_shortopt>
Find the option identifier of the next short option.
Modified: trunk/src/misc.c
==============================================================================
--- trunk/src/misc.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/misc.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -46,7 +46,7 @@
/*
-=item C<STRING * Parrot_vsprintf_s(PARROT_INTERP, STRING *pat, va_list args)>
+=item C<STRING * Parrot_vsprintf_s>
Almost all the other sprintf variants in this file are implemented in
terms of this function (see C<Parrot_psprintf()> for the exception). It
@@ -71,7 +71,7 @@
/*
-=item C<STRING * Parrot_vsprintf_c(PARROT_INTERP, const char *pat, va_list args)>
+=item C<STRING * Parrot_vsprintf_c>
C string version of C<Parrot_vsprintf_s()>.
@@ -95,8 +95,7 @@
/*
-=item C<void Parrot_vsnprintf(PARROT_INTERP, char *targ,
-size_t len, const char *pat, va_list args)>
+=item C<void Parrot_vsnprintf>
Similar to C<Parrot_vsprintf()> but with an option to specify the length
(C<len>) of the returned C string.
@@ -130,7 +129,7 @@
/*
-=item C<STRING * Parrot_sprintf_s(PARROT_INTERP, STRING *pat, ...)>
+=item C<STRING * Parrot_sprintf_s>
Calls C<Parrot_vsprintf_s()> with the C<va_list> obtained from C<...>.
@@ -159,7 +158,7 @@
/*
-=item C<STRING * Parrot_sprintf_c(PARROT_INTERP, const char *pat, ...)>
+=item C<STRING * Parrot_sprintf_c>
C string version of C<Parrot_sprintf_s()>.
@@ -188,8 +187,7 @@
/*
-=item C<void Parrot_snprintf(PARROT_INTERP, char *targ, size_t len,
-const char *pat, ...)>
+=item C<void Parrot_snprintf>
Similar to C<Parrot_sprintf()> but with an option to specify the length
(C<len>) of the returned C string.
@@ -215,7 +213,7 @@
/*
-=item C<STRING * Parrot_psprintf(PARROT_INTERP, STRING *pat, PMC *ary)>
+=item C<STRING * Parrot_psprintf>
Calls C<Parrot_sprintf_format()> with the insertion arguments in an
C<Array> PMC.
@@ -239,8 +237,7 @@
/*
-=item C<int Parrot_secret_snprintf(char *buffer, const size_t len,
-const char *format, ...)>
+=item C<int Parrot_secret_snprintf>
A simulation of C<snprintf> for systems that do not support it.
Modified: trunk/src/multidispatch.c
==============================================================================
--- trunk/src/multidispatch.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/multidispatch.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -255,8 +255,7 @@
/*
-=item C<PMC* Parrot_mmd_find_multi_from_sig_obj(PARROT_INTERP, STRING *name,
-PMC *invoke_sig)>
+=item C<PMC* Parrot_mmd_find_multi_from_sig_obj>
Collect a list of possible candidates for a given sub name and call signature.
Rank the possible candidates by Manhattan Distance, and return the best
@@ -286,8 +285,7 @@
/*
-=item C<void Parrot_mmd_multi_dispatch_from_c_args(PARROT_INTERP,
-const char *name, const char *sig, ...)>
+=item C<void Parrot_mmd_multi_dispatch_from_c_args>
Dispatches to a MultiSub from a variable-sized list of C arguments. The
multiple dispatch system will figure out which sub should be called based on
@@ -345,8 +343,7 @@
/*
-=item C<PMC * Parrot_mmd_find_multi_from_long_sig(PARROT_INTERP, STRING *name,
-STRING *long_sig)>
+=item C<PMC * Parrot_mmd_find_multi_from_long_sig>
Find the best candidate multi for a given sub name and signature. The signature
is a string containing a comma-delimited list of type names.
@@ -381,8 +378,7 @@
/*
-=item C<PMC * Parrot_mmd_sort_manhattan_by_sig_pmc(PARROT_INTERP,
-PMC *candidates, PMC *invoke_sig)>
+=item C<PMC * Parrot_mmd_sort_manhattan_by_sig_pmc>
Given an array PMC (usually a MultiSub) and a CallSignature PMC, sorts the mmd
candidates by their manhattan distance to the signature args and returns the
@@ -412,7 +408,7 @@
/*
-=item C<PMC * Parrot_mmd_sort_manhattan(PARROT_INTERP, PMC *candidates)>
+=item C<PMC * Parrot_mmd_sort_manhattan>
Given an array PMC (usually a MultiSub) sorts the mmd candidates by their
manhattan distance to the current args and returns the best one.
@@ -440,7 +436,7 @@
/*
-=item C<static PMC* Parrot_mmd_arg_tuple_func(PARROT_INTERP)>
+=item C<static PMC* Parrot_mmd_arg_tuple_func>
Return a list of argument types. PMC arguments are taken from registers
according to calling conventions.
@@ -548,8 +544,7 @@
/*
-=item C<static void Parrot_mmd_search_classes(PARROT_INTERP, STRING *meth,
-PMC *arg_tuple, PMC *cl, INTVAL start_at_parent)>
+=item C<static void Parrot_mmd_search_classes>
Search all the classes in all MultiSubs of the candidates C<cl> and return
a list of all candidates. C<start_at_parent> is 0 to start at the class itself
@@ -607,7 +602,7 @@
/*
-=item C<static INTVAL distance_cmp(PARROT_INTERP, INTVAL a, INTVAL b)>
+=item C<static INTVAL distance_cmp>
=cut
@@ -637,7 +632,7 @@
/*
-=item C<static PMC* mmd_build_type_tuple_from_type_list(PARROT_INTERP, PMC *type_list)>
+=item C<static PMC* mmd_build_type_tuple_from_type_list>
Construct a FixedIntegerArray of type numbers from an array of
type names. Used for multiple dispatch.
@@ -682,7 +677,7 @@
/*
-=item C<static PMC* mmd_build_type_tuple_from_long_sig(PARROT_INTERP, STRING *long_sig)>
+=item C<static PMC* mmd_build_type_tuple_from_long_sig>
Construct a FixedIntegerArray of type numbers from a comma-delimited string of
type names. Used for multiple dispatch.
@@ -705,7 +700,7 @@
/*
-=item C<PMC* Parrot_mmd_build_type_tuple_from_sig_obj(PARROT_INTERP, PMC *sig_obj)>
+=item C<PMC* Parrot_mmd_build_type_tuple_from_sig_obj>
Construct a FixedIntegerArray of type numbers from the arguments of a Call
Signature object. Used for multiple dispatch.
@@ -798,7 +793,7 @@
/*
-=item C<static PMC* mmd_cvt_to_types(PARROT_INTERP, PMC *multi_sig)>
+=item C<static PMC* mmd_cvt_to_types>
Given a ResizablePMCArray PMC containing some form of type identifier (either
the string name of a class or a PMC representing the type), resolves all type
@@ -862,7 +857,7 @@
/*
-=item C<static PMC * Parrot_mmd_get_cached_multi_sig(PARROT_INTERP, PMC *sub_pmc)>
+=item C<static PMC * Parrot_mmd_get_cached_multi_sig>
=cut
@@ -900,7 +895,7 @@
/*
-=item C<static UINTVAL mmd_distance(PARROT_INTERP, PMC *pmc, PMC *arg_tuple)>
+=item C<static UINTVAL mmd_distance>
Create Manhattan Distance of sub C<pmc> against given argument types.
0xffff is the maximum distance
@@ -1039,7 +1034,7 @@
/*
-=item C<static PMC * Parrot_mmd_sort_candidates(PARROT_INTERP, PMC *arg_tuple, PMC *cl)>
+=item C<static PMC * Parrot_mmd_sort_candidates>
Sort the candidate list C<cl> by Manhattan Distance, returning the best
candidate.
@@ -1073,7 +1068,7 @@
/*
-=item C<static PMC* Parrot_mmd_search_scopes(PARROT_INTERP, STRING *meth)>
+=item C<static PMC* Parrot_mmd_search_scopes>
Search all scopes for MMD candidates matching the arguments given in
C<arg_tuple>.
@@ -1100,7 +1095,7 @@
/*
-=item C<static int Parrot_mmd_maybe_candidate(PARROT_INTERP, PMC *pmc, PMC *cl)>
+=item C<static int Parrot_mmd_maybe_candidate>
If the candidate C<pmc> is a Sub PMC, push it on the candidate list and
return TRUE to stop further search.
@@ -1147,7 +1142,7 @@
/*
-=item C<static int mmd_search_local(PARROT_INTERP, STRING *name, PMC *candidates)>
+=item C<static int mmd_search_local>
Search the current package namespace for matching candidates. Return
TRUE if the MMD search should stop.
@@ -1168,8 +1163,7 @@
/*
-=item C<static void mmd_search_by_sig_obj(PARROT_INTERP, STRING *name,
-PMC *sig_obj, PMC *candidates)>
+=item C<static void mmd_search_by_sig_obj>
Search the namespace of the first argument to the sub call for matching
candidates.
@@ -1205,7 +1199,7 @@
/*
-=item C<static void mmd_search_global(PARROT_INTERP, STRING *name, PMC *cl)>
+=item C<static void mmd_search_global>
Search the builtin namespace for matching candidates.
@@ -1231,7 +1225,7 @@
/*
-=item C<static void mmd_add_multi_global(PARROT_INTERP, STRING *sub_name, PMC *sub_obj)>
+=item C<static void mmd_add_multi_global>
Create a MultiSub, or add a variant to an existing MultiSub. The MultiSub is
stored in the global MULTI namespace.
@@ -1261,8 +1255,7 @@
/*
-=item C<static void mmd_add_multi_to_namespace(PARROT_INTERP, STRING *ns_name,
-STRING *sub_name, PMC *sub_obj)>
+=item C<static void mmd_add_multi_to_namespace>
Create a MultiSub, or add a variant to an existing MultiSub. The MultiSub is
added as a method to a class.
@@ -1293,8 +1286,7 @@
/*
-=item C<void Parrot_mmd_add_multi_from_long_sig(PARROT_INTERP,
-STRING *sub_name, STRING *long_sig, PMC *sub_obj)>
+=item C<void Parrot_mmd_add_multi_from_long_sig>
Create a MultiSub, or add a variant to an existing MultiSub. The MultiSub is
stored in the global MULTI namespace.
@@ -1334,9 +1326,7 @@
/*
-=item C<void Parrot_mmd_add_multi_from_c_args(PARROT_INTERP,
-const char *sub_name, const char *short_sig,
-const char *long_sig, funcptr_t multi_func_ptr)>
+=item C<void Parrot_mmd_add_multi_from_c_args>
Create a MultiSub, or add a variant to an existing MultiSub. The MultiSub is
stored in the specified namespace.
@@ -1376,8 +1366,7 @@
/*
-=item C<void Parrot_mmd_add_multi_list_from_c_args(PARROT_INTERP,
-const multi_func_list *mmd_info, INTVAL elements)>
+=item C<void Parrot_mmd_add_multi_list_from_c_args>
Create a collection of multiple dispatch subs from a C structure of
information. Iterate through the list of details passed in. For each entry
@@ -1413,7 +1402,7 @@
/*
-=item C<MMD_Cache * Parrot_mmd_cache_create(PARROT_INTERP)>
+=item C<MMD_Cache * Parrot_mmd_cache_create>
Creates and returns a new MMD cache.
@@ -1435,8 +1424,7 @@
/*
-=item C<static STRING * mmd_cache_key_from_values(PARROT_INTERP,
-const char *name, PMC *values)>
+=item C<static STRING * mmd_cache_key_from_values>
Generates an MMD cache key from an array of values.
@@ -1481,8 +1469,7 @@
/*
-=item C<PMC * Parrot_mmd_cache_lookup_by_values(PARROT_INTERP, MMD_Cache *cache,
-const char *name, PMC *values)>
+=item C<PMC * Parrot_mmd_cache_lookup_by_values>
Takes an array of values for the call and does a lookup in the MMD cache.
@@ -1508,8 +1495,7 @@
/*
-=item C<void Parrot_mmd_cache_store_by_values(PARROT_INTERP, MMD_Cache *cache,
-const char *name, PMC *values, PMC *chosen)>
+=item C<void Parrot_mmd_cache_store_by_values>
Takes an array of values for the call along with a chosen candidate and puts
it into the cache.
@@ -1533,8 +1519,7 @@
/*
-=item C<static STRING * mmd_cache_key_from_types(PARROT_INTERP,
-const char *name, PMC *types)>
+=item C<static STRING * mmd_cache_key_from_types>
Generates an MMD cache key from an array of types.
@@ -1581,8 +1566,7 @@
/*
-=item C<PMC * Parrot_mmd_cache_lookup_by_types(PARROT_INTERP, MMD_Cache *cache,
-const char *name, PMC *types)>
+=item C<PMC * Parrot_mmd_cache_lookup_by_types>
Takes an array of types for the call and does a lookup in the MMD cache.
@@ -1608,8 +1592,7 @@
/*
-=item C<void Parrot_mmd_cache_store_by_types(PARROT_INTERP, MMD_Cache *cache,
-const char *name, PMC *types, PMC *chosen)>
+=item C<void Parrot_mmd_cache_store_by_types>
Takes an array of types for the call along with a chosen candidate and puts
it into the cache. The name parameter is optional, and if the cache is already
@@ -1634,7 +1617,7 @@
/*
-=item C<void Parrot_mmd_cache_mark(PARROT_INTERP, MMD_Cache *cache)>
+=item C<void Parrot_mmd_cache_mark>
GC-marks an MMD cache.
@@ -1656,7 +1639,7 @@
/*
-=item C<void Parrot_mmd_cache_destroy(PARROT_INTERP, MMD_Cache *cache)>
+=item C<void Parrot_mmd_cache_destroy>
Destroys an MMD cache.
Modified: trunk/src/oo.c
==============================================================================
--- trunk/src/oo.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/oo.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -87,8 +87,7 @@
/*
-=item C<void Parrot_oo_extract_methods_from_namespace(PARROT_INTERP, PMC *self,
-PMC *ns)>
+=item C<void Parrot_oo_extract_methods_from_namespace>
Extract methods and vtable overrides from the given namespace and insert them
into the class.
@@ -150,7 +149,7 @@
/*
-=item C<PMC * Parrot_oo_get_namespace(PARROT_INTERP, const PMC *classobj)>
+=item C<PMC * Parrot_oo_get_namespace>
Lookup a namespace object from a class PMC.
@@ -176,7 +175,7 @@
/*
-=item C<PMC * Parrot_oo_get_class(PARROT_INTERP, PMC *key)>
+=item C<PMC * Parrot_oo_get_class>
Lookup a class object from a namespace, string, or key PMC.
@@ -251,7 +250,7 @@
/*
-=item C<PMC * Parrot_oo_get_class_str(PARROT_INTERP, STRING *name)>
+=item C<PMC * Parrot_oo_get_class_str>
Lookup a class object from a builtin string.
@@ -292,7 +291,7 @@
/*
-=item C<PMC * Parrot_oo_newclass_from_str(PARROT_INTERP, STRING *name)>
+=item C<PMC * Parrot_oo_newclass_from_str>
Create a new class object from a string name.
@@ -322,8 +321,7 @@
/*
-=item C<PMC * Parrot_oo_find_vtable_override_for_class(PARROT_INTERP,
-PMC *classobj, STRING *name)>
+=item C<PMC * Parrot_oo_find_vtable_override_for_class>
Lookup a vtable override in a specific class object.
@@ -348,8 +346,7 @@
/*
-=item C<PMC * Parrot_oo_find_vtable_override(PARROT_INTERP, PMC *classobj,
-STRING *name)>
+=item C<PMC * Parrot_oo_find_vtable_override>
Lookup a vtable override in a class, including any vtable overrides inherited
from parents.
@@ -396,7 +393,7 @@
/*
-=item C<INTVAL Parrot_get_vtable_index(PARROT_INTERP, const STRING *name)>
+=item C<INTVAL Parrot_get_vtable_index>
Return index if C<name> is a valid vtable slot name.
@@ -439,7 +436,7 @@
/*
-=item C<const char * Parrot_get_vtable_name(PARROT_INTERP, INTVAL idx)>
+=item C<const char * Parrot_get_vtable_name>
Return the method name at the specified index in the vtable slot array.
Use this function when you cannot access Parrot_vtable_slot_names directly.
@@ -471,7 +468,7 @@
/*
-=item C<const char* Parrot_MMD_method_name(PARROT_INTERP, INTVAL idx)>
+=item C<const char* Parrot_MMD_method_name>
Return the method name for the given MMD enum.
@@ -498,7 +495,7 @@
/*
-=item C<static INTVAL fail_if_type_exists(PARROT_INTERP, PMC *name)>
+=item C<static INTVAL fail_if_type_exists>
This function throws an exception if a PMC or class with the same name *
already exists in the global type registry. The global type registry
@@ -544,7 +541,7 @@
/*
-=item C<INTVAL Parrot_oo_register_type(PARROT_INTERP, PMC *name, PMC *_namespace)>
+=item C<INTVAL Parrot_oo_register_type>
This function registers a type in the global registry, first checking if it
already exists. The global type registry will go away eventually, but this
@@ -593,7 +590,7 @@
/*
-=item C<void mark_object_cache(PARROT_INTERP)>
+=item C<void mark_object_cache>
Marks all PMCs in the object method cache as live. This shouldn't strictly be
necessary, as they're likely all reachable from namespaces and classes, but
@@ -633,7 +630,7 @@
/*
-=item C<void init_object_cache(PARROT_INTERP)>
+=item C<void init_object_cache>
Allocate memory for object cache.
@@ -652,7 +649,7 @@
/*
-=item C<void destroy_object_cache(PARROT_INTERP)>
+=item C<void destroy_object_cache>
=cut
@@ -678,7 +675,7 @@
/*
-=item C<static void invalidate_type_caches(PARROT_INTERP, UINTVAL type)>
+=item C<static void invalidate_type_caches>
=cut
@@ -714,7 +711,7 @@
/*
-=item C<static void invalidate_all_caches(PARROT_INTERP)>
+=item C<static void invalidate_all_caches>
=cut
@@ -732,7 +729,7 @@
/*
-=item C<void Parrot_invalidate_method_cache(PARROT_INTERP, STRING *_class)>
+=item C<void Parrot_invalidate_method_cache>
Clear method cache for the given class. If class is NULL, caches for
all classes are invalidated.
@@ -779,8 +776,7 @@
/*
-=item C<PMC * Parrot_find_method_direct(PARROT_INTERP, PMC *_class,
-STRING *method_name)>
+=item C<PMC * Parrot_find_method_direct>
Find a method PMC for a named method, given the class PMC, current
interpreter, and name of the method. Don't use a possible method cache.
@@ -811,8 +807,7 @@
/*
-=item C<PMC * Parrot_find_method_with_cache(PARROT_INTERP, PMC *_class,
-STRING *method_name)>
+=item C<PMC * Parrot_find_method_with_cache>
Find a method PMC for a named method, given the class PMC, current
interp, and name of the method.
@@ -897,8 +892,7 @@
/*
-=item C<static void debug_trace_find_meth(PARROT_INTERP, const PMC *_class,
-const STRING *name, const PMC *sub)>
+=item C<static void debug_trace_find_meth>
=cut
@@ -951,8 +945,7 @@
/*
-=item C<static PMC * find_method_direct_1(PARROT_INTERP, PMC *_class,
-STRING *method_name)>
+=item C<static PMC * find_method_direct_1>
=cut
@@ -990,7 +983,7 @@
/*
-=item C<static PMC* C3_merge(PARROT_INTERP, PMC *merge_list)>
+=item C<static PMC* C3_merge>
=cut
@@ -1085,7 +1078,7 @@
/*
-=item C<PMC* Parrot_ComputeMRO_C3(PARROT_INTERP, PMC *_class)>
+=item C<PMC* Parrot_ComputeMRO_C3>
Computes the C3 linearization for the given class.
@@ -1151,8 +1144,7 @@
/*
-=item C<void Parrot_ComposeRole(PARROT_INTERP, PMC *role, PMC *exclude,
-int got_exclude, PMC *alias, int got_alias, PMC *methods_hash, PMC *roles_list)>
+=item C<void Parrot_ComposeRole>
Used by the Class and Object PMCs internally to compose a role into either of
them. The C<role> parameter is the role that we are composing into the class
Modified: trunk/src/pmc.c
==============================================================================
--- trunk/src/pmc.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/pmc.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -71,7 +71,7 @@
/*
-=item C<INTVAL PMC_is_null(PARROT_INTERP, const PMC *pmc)>
+=item C<INTVAL PMC_is_null>
Tests if the given pmc is null.
@@ -93,7 +93,7 @@
/*
-=item C<PMC * pmc_new(PARROT_INTERP, INTVAL base_type)>
+=item C<PMC * pmc_new>
Creates a new PMC of type C<base_type> (which is an index into the list of PMC
types declared in C<vtables> in F<include/parrot/pmc.h>). Once the PMC has been
@@ -127,7 +127,7 @@
/*
-=item C<PMC * pmc_reuse(PARROT_INTERP, PMC *pmc, INTVAL new_type, UINTVAL flags)>
+=item C<PMC * pmc_reuse>
Reuse an existing PMC, turning it into an empty PMC of the new type. Any
required internal structure will be put in place (such as the extension area)
@@ -220,7 +220,7 @@
/*
-=item C<static PMC * get_new_pmc_header(PARROT_INTERP, INTVAL base_type, UINTVAL flags)>
+=item C<static PMC * get_new_pmc_header>
Gets a new PMC header.
@@ -315,7 +315,7 @@
/*
-=item C<PMC * pmc_new_noinit(PARROT_INTERP, INTVAL base_type)>
+=item C<PMC * pmc_new_noinit>
Creates a new PMC of type C<base_type> (which is an index into the list of PMC
types declared in C<vtables> in F<include/parrot/pmc.h>). Unlike C<pmc_new()>,
@@ -343,7 +343,7 @@
/*
-=item C<PMC * constant_pmc_new_noinit(PARROT_INTERP, INTVAL base_type)>
+=item C<PMC * constant_pmc_new_noinit>
Creates a new constant PMC of type C<base_type>.
@@ -363,7 +363,7 @@
/*
-=item C<PMC * constant_pmc_new(PARROT_INTERP, INTVAL base_type)>
+=item C<PMC * constant_pmc_new>
Creates a new constant PMC of type C<base_type>, then calls its C<init>.
@@ -385,7 +385,7 @@
/*
-=item C<PMC * pmc_new_init(PARROT_INTERP, INTVAL base_type, PMC *init)>
+=item C<PMC * pmc_new_init>
As C<pmc_new()>, but passes C<init> to the PMC's C<init_pmc()> vtable entry.
@@ -413,7 +413,7 @@
/*
-=item C<PMC * constant_pmc_new_init(PARROT_INTERP, INTVAL base_type, PMC *init)>
+=item C<PMC * constant_pmc_new_init>
As C<constant_pmc_new>, but passes C<init> to the PMC's C<init_pmc> vtable
entry.
@@ -436,7 +436,7 @@
/*
-=item C<PMC * temporary_pmc_new(PARROT_INTERP, INTVAL base_type)>
+=item C<PMC * temporary_pmc_new>
Creates a new temporary PMC of type C<base_type>, the call C<init>. B<You> are
responsible for freeing this PMC when it goes out of scope with
@@ -470,8 +470,7 @@
/*
-=item C<static void pmc_free_to_pool(PARROT_INTERP, PMC *pmc,
-Small_Object_Pool *pool)>
+=item C<static void pmc_free_to_pool>
=cut
@@ -495,7 +494,7 @@
/*
-=item C<void temporary_pmc_free(PARROT_INTERP, PMC *pmc)>
+=item C<void temporary_pmc_free>
Frees a new temporary PMC created by C<temporary_pmc_new()>. Do not call this
with any other type of PMC. Do not forget to call this (or you'll leak PMCs).
@@ -516,7 +515,7 @@
/*
-=item C<static void pmc_free(PARROT_INTERP, PMC *pmc)>
+=item C<static void pmc_free>
=cut
@@ -533,7 +532,7 @@
/*
-=item C<INTVAL get_new_vtable_index(PARROT_INTERP)>
+=item C<INTVAL get_new_vtable_index>
=cut
@@ -554,7 +553,7 @@
/*
-=item C<INTVAL pmc_register(PARROT_INTERP, STRING *name)>
+=item C<INTVAL pmc_register>
Registers the name of a new PMC type with Parrot, returning the INTVAL
representing that type.
@@ -590,7 +589,7 @@
/*
-=item C<INTVAL pmc_type(PARROT_INTERP, STRING *name)>
+=item C<INTVAL pmc_type>
Returns the PMC type for C<name>.
@@ -626,7 +625,7 @@
/*
-=item C<INTVAL pmc_type_p(PARROT_INTERP, PMC *name)>
+=item C<INTVAL pmc_type_p>
Returns the PMC type for C<name>.
@@ -653,7 +652,7 @@
/*
-=item C<static PMC * create_class_pmc(PARROT_INTERP, INTVAL type)>
+=item C<static PMC * create_class_pmc>
Create a class object for this interpreter. Takes an interpreter name and type
as arguments. Returns a pointer to the class object.
@@ -704,7 +703,7 @@
/*
-=item C<void Parrot_create_mro(PARROT_INTERP, INTVAL type)>
+=item C<void Parrot_create_mro>
Create the MRO (method resolution order) array for this type.
@@ -775,7 +774,7 @@
=over 4
-=item C<void gc_register_pmc(PARROT_INTERP, PMC *pmc)>
+=item C<void gc_register_pmc>
Registers the PMC with the interpreter's GC registry.
@@ -800,7 +799,7 @@
/*
-=item C<void gc_unregister_pmc(PARROT_INTERP, PMC *pmc)>
+=item C<void gc_unregister_pmc>
Unregisters the PMC from the interpreter's GC registry.
Modified: trunk/src/runops_cores.c
==============================================================================
--- trunk/src/runops_cores.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/runops_cores.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -266,7 +266,7 @@
/*
-=item C<opcode_t * runops_fast_core(PARROT_INTERP, opcode_t *pc)>
+=item C<opcode_t * runops_fast_core>
Runs the Parrot operations starting at C<pc> until there are no more
operations. This performs no bounds checking, profiling, or tracing.
@@ -295,7 +295,7 @@
/*
-=item C<opcode_t * runops_cgoto_core(PARROT_INTERP, opcode_t *pc)>
+=item C<opcode_t * runops_cgoto_core>
Runs the Parrot operations starting at C<pc> until there are no more
operations, using the computed C<goto> core, performing no bounds checking,
@@ -341,7 +341,7 @@
/*
-=item C<static opcode_t * runops_trace_core(PARROT_INTERP, opcode_t *pc)>
+=item C<static opcode_t * runops_trace_core>
Runs the Parrot operations starting at C<pc> until there are no more
operations, using the tracing interpreter.
@@ -428,7 +428,7 @@
/*
-=item C<opcode_t * runops_slow_core(PARROT_INTERP, opcode_t *pc)>
+=item C<opcode_t * runops_slow_core>
Runs the Parrot operations starting at C<pc> until there are no more
operations, with tracing and bounds checking enabled.
@@ -467,7 +467,7 @@
/*
-=item C<opcode_t * runops_gc_debug_core(PARROT_INTERP, opcode_t *pc)>
+=item C<opcode_t * runops_gc_debug_core>
Runs the Parrot operations starting at C<pc> until there are no more
operations, performing a full GC run before each op. This is very slow, but
@@ -503,7 +503,7 @@
/*
-=item C<opcode_t * runops_profile_core(PARROT_INTERP, opcode_t *pc)>
+=item C<opcode_t * runops_profile_core>
Runs the Parrot operations starting at C<pc> until there are no more
operations, with tracing, bounds checking, and profiling enabled.
@@ -552,7 +552,7 @@
/*
-=item C<opcode_t * runops_debugger_core(PARROT_INTERP, opcode_t *pc)>
+=item C<opcode_t * runops_debugger_core>
Used by the debugger, under construction
Modified: trunk/src/scheduler.c
==============================================================================
--- trunk/src/scheduler.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/scheduler.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -61,7 +61,7 @@
=over 4
-=item C<void Parrot_cx_init_scheduler(PARROT_INTERP)>
+=item C<void Parrot_cx_init_scheduler>
Initalize the concurrency scheduler for the interpreter.
@@ -88,7 +88,7 @@
/*
-=item C<void Parrot_cx_check_tasks(PARROT_INTERP, PMC *scheduler)>
+=item C<void Parrot_cx_check_tasks>
If a wake request has been received, handle tasks.
@@ -106,7 +106,7 @@
/*
-=item C<void Parrot_cx_handle_tasks(PARROT_INTERP, PMC *scheduler)>
+=item C<void Parrot_cx_handle_tasks>
Handle the pending tasks in the scheduler's task list. Returns when there are
no more pending tasks. Returns 0 to terminate the scheduler runloop, or 1 to
@@ -162,7 +162,7 @@
/*
-=item C<void Parrot_cx_refresh_task_list(PARROT_INTERP, PMC *scheduler)>
+=item C<void Parrot_cx_refresh_task_list>
Tell the scheduler to perform maintenance on its list of active tasks, checking
for completed timers or sleep events, sorting for priority, checking for
@@ -187,7 +187,7 @@
/*
-=item C<void Parrot_cx_runloop_wake(PARROT_INTERP, PMC *scheduler)>
+=item C<void Parrot_cx_runloop_wake>
Wake a sleeping scheduler runloop (generally called when new tasks are added to
the scheduler's task list).
@@ -207,7 +207,7 @@
/*
-=item C<void Parrot_cx_runloop_end(PARROT_INTERP)>
+=item C<void Parrot_cx_runloop_end>
Schedule an event to terminate the scheduler runloop.
@@ -226,7 +226,7 @@
/*
-=item C<void Parrot_cx_schedule_task(PARROT_INTERP, PMC *task)>
+=item C<void Parrot_cx_schedule_task>
Add a task to scheduler's task list. Cannot be called across
interpreters/threads, must be called from within the interpreter's runloop.
@@ -249,7 +249,7 @@
/*
-=item C<PMC * Parrot_cx_peek_task(PARROT_INTERP)>
+=item C<PMC * Parrot_cx_peek_task>
Retrieve the the top task on the scheduler's task list, but don't remove it
from the list.
@@ -273,8 +273,7 @@
/*
-=item C<void Parrot_cx_schedule_timer(PARROT_INTERP, STRING *type,
-FLOATVAL duration, FLOATVAL interval, INTVAL repeat, PMC *sub)>
+=item C<void Parrot_cx_schedule_timer>
Create a new timer event due at C<diff> from now, repeated at C<interval>
and running the passed C<sub>.
@@ -310,7 +309,7 @@
/*
-=item C<void Parrot_cx_schedule_repeat(PARROT_INTERP, PMC *task)>
+=item C<void Parrot_cx_schedule_repeat>
Add a repeat task to scheduler's task list.
@@ -341,7 +340,7 @@
/*
-=item C<void Parrot_cx_schedule_callback(PARROT_INTERP, PMC *user_data, char *ext_data)>
+=item C<void Parrot_cx_schedule_callback>
Create a new callback event, with an argument for the call.
@@ -367,7 +366,7 @@
/*
-=item C<void Parrot_cx_request_suspend_for_gc(PARROT_INTERP)>
+=item C<void Parrot_cx_request_suspend_for_gc>
Tell the scheduler to suspend for GC at the next safe pause.
@@ -388,7 +387,7 @@
/*
-=item C<void Parrot_cx_delete_task(PARROT_INTERP, PMC *task)>
+=item C<void Parrot_cx_delete_task>
Remove a task from the scheduler's task list.
@@ -413,7 +412,7 @@
/*
-=item C<PMC * Parrot_cx_delete_suspend_for_gc(PARROT_INTERP)>
+=item C<PMC * Parrot_cx_delete_suspend_for_gc>
Remove a message that would suspend GC from the message queue. (Provided for
backward compatibility in the threads implementation.)
@@ -468,7 +467,7 @@
/*
-=item C<void Parrot_cx_add_handler_local(PARROT_INTERP, PMC *handler)>
+=item C<void Parrot_cx_add_handler_local>
Add a handler to the current context's list of handlers.
@@ -490,7 +489,7 @@
/*
-=item C<void Parrot_cx_delete_handler_local(PARROT_INTERP, STRING *handler_type)>
+=item C<void Parrot_cx_delete_handler_local>
Remove the top task handler of a particular type from the context's list of
handlers.
@@ -560,7 +559,7 @@
/*
-=item C<INTVAL Parrot_cx_count_handlers_local(PARROT_INTERP, STRING *handler_type)>
+=item C<INTVAL Parrot_cx_count_handlers_local>
Count the number of active handlers of a particular type from the
context's list of handlers.
@@ -627,7 +626,7 @@
/*
-=item C<void Parrot_cx_add_handler(PARROT_INTERP, PMC *handler)>
+=item C<void Parrot_cx_add_handler>
Add a task handler to scheduler's list of handlers.
@@ -650,7 +649,7 @@
/*
-=item C<void Parrot_cx_delete_handler_typed(PARROT_INTERP, STRING *handler_type)>
+=item C<void Parrot_cx_delete_handler_typed>
Remove the top task handler of a particular type from the scheduler's list of
handlers.
@@ -673,7 +672,7 @@
/*
-=item C<INTVAL Parrot_cx_count_handlers_typed(PARROT_INTERP, STRING *handler_type)>
+=item C<INTVAL Parrot_cx_count_handlers_typed>
Count the number of active handlers of a particular type (event, exception) in
the concurrency scheduler.
@@ -709,7 +708,7 @@
=over 4
-=item C<void Parrot_cx_send_message(PARROT_INTERP, STRING *messagetype, PMC *payload)>
+=item C<void Parrot_cx_send_message>
Send a message to a scheduler in a different interpreter/thread.
@@ -749,7 +748,7 @@
/*
-=item C<void Parrot_cx_broadcast_message(PARROT_INTERP, STRING *messagetype, PMC *data)>
+=item C<void Parrot_cx_broadcast_message>
Send a message to the schedulers in all interpreters/threads linked to this
one.
@@ -785,7 +784,7 @@
=over 4
-=item C<PMC * Parrot_cx_find_handler_for_task(PARROT_INTERP, PMC *task)>
+=item C<PMC * Parrot_cx_find_handler_for_task>
Retrieve a handler appropriate to a given task. If the scheduler has no
appropriate handler, returns PMCNULL.
@@ -820,7 +819,7 @@
/*
-=item C<PMC * Parrot_cx_find_handler_local(PARROT_INTERP, PMC *task)>
+=item C<PMC * Parrot_cx_find_handler_local>
Retrieve a handler appropriate to a given task from the local context. If the
context has no appropriate handler, returns PMCNULL.
@@ -924,7 +923,7 @@
/*
-=item C<void Parrot_cx_timer_invoke(PARROT_INTERP, PMC *timer)>
+=item C<void Parrot_cx_timer_invoke>
Run the associated code block for a timer event, when the timer fires.
@@ -950,7 +949,7 @@
/*
-=item C<void Parrot_cx_invoke_callback(PARROT_INTERP, PMC *callback)>
+=item C<void Parrot_cx_invoke_callback>
Run the associated code block for a callback event.
@@ -981,7 +980,7 @@
=over 4
-=item C<opcode_t * Parrot_cx_schedule_sleep(PARROT_INTERP, FLOATVAL time, opcode_t *next)>
+=item C<opcode_t * Parrot_cx_schedule_sleep>
Add a sleep timer to the scheduler. This function is called by the C<sleep>
opcode.
@@ -1041,7 +1040,7 @@
=over 4
-=item C<static void scheduler_process_wait_list(PARROT_INTERP, PMC *scheduler)>
+=item C<static void scheduler_process_wait_list>
Scheduler maintenance, scan the list of waiting tasks to see if any are ready
to become active tasks.
@@ -1087,7 +1086,7 @@
=over 4
-=item C<static void scheduler_process_messages(PARROT_INTERP, PMC *scheduler)>
+=item C<static void scheduler_process_messages>
Scheduler maintenance, scan the list of messages sent from other schedulers and
take appropriate action on any received.
Modified: trunk/src/stacks.c
==============================================================================
--- trunk/src/stacks.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/stacks.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -40,7 +40,7 @@
/*
-=item C<void stack_system_init(PARROT_INTERP)>
+=item C<void stack_system_init>
Called from C<make_interpreter()> to initialize the interpreter's
register stacks.
@@ -58,7 +58,7 @@
/*
-=item C<Stack_Chunk_t * cst_new_stack_chunk(PARROT_INTERP, const Stack_Chunk_t *chunk)>
+=item C<Stack_Chunk_t * cst_new_stack_chunk>
Get a new chunk either from the freelist or allocate one.
@@ -87,7 +87,7 @@
/*
-=item C<Stack_Chunk_t * new_stack(PARROT_INTERP, const char *name)>
+=item C<Stack_Chunk_t * new_stack>
Create a new stack and name it. C<< stack->name >> is used for
debugging/error reporting.
@@ -116,7 +116,7 @@
/*
-=item C<void mark_stack(PARROT_INTERP, Stack_Chunk_t *chunk)>
+=item C<void mark_stack>
Mark entries in a stack structure during GC.
@@ -146,7 +146,7 @@
/*
-=item C<void stack_destroy(Stack_Chunk_t *top)>
+=item C<void stack_destroy>
stack_destroy() doesn't need to do anything, since GC does it all.
@@ -164,7 +164,7 @@
/*
-=item C<size_t stack_height(PARROT_INTERP, const Stack_Chunk_t *chunk)>
+=item C<size_t stack_height>
Returns the height of the stack. The maximum "depth" is height - 1.
@@ -192,7 +192,7 @@
/*
-=item C<Stack_Entry_t * stack_entry(PARROT_INTERP, Stack_Chunk_t *stack, INTVAL depth)>
+=item C<Stack_Entry_t * stack_entry>
If C<< depth >= 0 >>, return the entry at that depth from the top of the
stack, with 0 being the top entry. If C<depth < 0>, then return the
@@ -234,7 +234,7 @@
/*
-=item C<Stack_Entry_t* stack_prepare_push(PARROT_INTERP, Stack_Chunk_t **stack_p)>
+=item C<Stack_Entry_t* stack_prepare_push>
Return a pointer, where new entries go for push.
@@ -260,8 +260,7 @@
/*
-=item C<void stack_push(PARROT_INTERP, Stack_Chunk_t **stack_p,
-void *thing, Stack_entry_type type, Stack_cleanup_method cleanup)>
+=item C<void stack_push>
Push something on the generic stack.
@@ -308,7 +307,7 @@
/*
-=item C<Stack_Entry_t* stack_prepare_pop(PARROT_INTERP, Stack_Chunk_t **stack_p)>
+=item C<Stack_Entry_t* stack_prepare_pop>
Return a pointer, where new entries are popped off.
@@ -337,8 +336,7 @@
/*
-=item C<void * stack_pop(PARROT_INTERP, Stack_Chunk_t **stack_p,
-void *where, Stack_entry_type type)>
+=item C<void * stack_pop>
Pop off an entry and return a pointer to the contents.
@@ -397,7 +395,7 @@
/*
-=item C<void * pop_dest(PARROT_INTERP)>
+=item C<void * pop_dest>
Pop off a destination entry and return a pointer to the contents.
@@ -422,8 +420,7 @@
/*
-=item C<void * stack_peek(PARROT_INTERP, Stack_Chunk_t *stack_base,
-Stack_entry_type *type)>
+=item C<void * stack_peek>
Peek at stack and return pointer to entry and the type of the entry.
@@ -454,7 +451,7 @@
/*
-=item C<Stack_entry_type get_entry_type(const Stack_Entry_t *entry)>
+=item C<Stack_entry_type get_entry_type>
Returns the stack entry type of C<entry>.
@@ -473,7 +470,7 @@
/*
-=item C<void Parrot_dump_dynamic_environment(PARROT_INTERP, Stack_Chunk_t *dynamic_env)>
+=item C<void Parrot_dump_dynamic_environment>
Print a representation of the dynamic stack to the standard error (using
C<Parrot_io_eprintf>). This is used only temporarily for debugging.
@@ -521,7 +518,7 @@
/*
-=item C<static void run_cleanup_action(PARROT_INTERP, Stack_Entry_t *e)>
+=item C<static void run_cleanup_action>
Runs the sub PMC from the Stack_Entry_t pointer with an INTVAL arg of 0. Used
in C<Parrot_push_action>.
@@ -544,7 +541,7 @@
/*
-=item C<void Parrot_push_action(PARROT_INTERP, PMC *sub)>
+=item C<void Parrot_push_action>
Pushes an action handler onto the dynamic environment.
@@ -567,7 +564,7 @@
/*
-=item C<void Parrot_push_mark(PARROT_INTERP, INTVAL mark)>
+=item C<void Parrot_push_mark>
Push a cleanup mark onto the dynamic environment.
@@ -586,7 +583,7 @@
/*
-=item C<void Parrot_pop_mark(PARROT_INTERP, INTVAL mark)>
+=item C<void Parrot_pop_mark>
Pop items off the dynamic environment up to the mark.
Modified: trunk/src/string/api.c
==============================================================================
--- trunk/src/string/api.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/api.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -57,7 +57,7 @@
/*
-=item C<void Parrot_str_write_COW(PARROT_INTERP, STRING *s)>
+=item C<void Parrot_str_write_COW>
If the specified Parrot string is copy-on-write then the memory is
copied over and the copy-on-write flag is cleared.
@@ -109,7 +109,7 @@
/*
-=item C<STRING * Parrot_str_new_COW(PARROT_INTERP, STRING *s)>
+=item C<STRING * Parrot_str_new_COW>
Creates a copy-on-write string, cloning a string header without
allocating a new buffer.
@@ -161,7 +161,7 @@
/*
-=item C<STRING * Parrot_str_reuse_COW(PARROT_INTERP, STRING *s, STRING *d)>
+=item C<STRING * Parrot_str_reuse_COW>
Creates a copy-on-write string by cloning a string header without
allocating a new buffer. Doesn't allocate a new string header, instead
@@ -194,7 +194,7 @@
/*
-=item C<STRING * Parrot_str_set(PARROT_INTERP, STRING *dest, STRING *src)>
+=item C<STRING * Parrot_str_set>
Makes the contents of first Parrot string a copy of the contents of
second.
@@ -228,7 +228,7 @@
/*
-=item C<void Parrot_str_free(PARROT_INTERP, STRING *s)>
+=item C<void Parrot_str_free>
Frees the given STRING's header, accounting for reference counts for the
STRING's buffer &c. Use this only if you I<know> that nothing else has stored
@@ -258,7 +258,7 @@
=over 4
-=item C<void Parrot_str_init(PARROT_INTERP)>
+=item C<void Parrot_str_init>
Initializes the Parrot string subsystem.
@@ -319,7 +319,7 @@
/*
-=item C<void Parrot_str_finish(PARROT_INTERP)>
+=item C<void Parrot_str_finish>
De-Initializes the Parrot string subsystem.
@@ -343,7 +343,7 @@
/*
-=item C<UINTVAL string_capacity(PARROT_INTERP, const STRING *s)>
+=item C<UINTVAL string_capacity>
Returns the capacity of the specified Parrot string in bytes, that
is how many bytes can be appended onto strstart.
@@ -366,8 +366,7 @@
/*
-=item C<STRING * Parrot_str_new_noinit(PARROT_INTERP,
-parrot_string_representation_t representation, UINTVAL capacity)>
+=item C<STRING * Parrot_str_new_noinit>
Creates and returns an empty Parrot string.
@@ -400,8 +399,7 @@
/*
-=item C<const CHARSET * string_rep_compatible(PARROT_INTERP,
-const STRING *a, const STRING *b, const ENCODING **e)>
+=item C<const CHARSET * string_rep_compatible>
Find the "lowest" possible charset and encoding for the given string. E.g.
@@ -468,7 +466,7 @@
/*
-=item C<STRING * Parrot_str_concat(PARROT_INTERP, STRING *a, STRING *b, UINTVAL Uflags)>
+=item C<STRING * Parrot_str_concat>
Concatenates two Parrot strings. If necessary, converts the second
string's encoding and/or type to match those of the first string. If
@@ -517,7 +515,7 @@
/*
-=item C<STRING * Parrot_str_append(PARROT_INTERP, STRING *a, STRING *b)>
+=item C<STRING * Parrot_str_append>
Take in two Parrot strings and append the second to the first. NOTE THAT
RETURN VALUE MAY NOT BE THE FIRST STRING, if the first string is COW'd or
@@ -597,7 +595,7 @@
/*
-=item C<STRING * Parrot_str_new(PARROT_INTERP, const char * const buffer, const UINTVAL len)>
+=item C<STRING * Parrot_str_new>
Make a Parrot string from a specified C string.
@@ -622,8 +620,7 @@
/*
-=item C<const char* string_primary_encoding_for_representation(PARROT_INTERP,
-parrot_string_representation_t representation)>
+=item C<const char* string_primary_encoding_for_representation>
Returns the primary encoding for the specified representation.
@@ -651,7 +648,7 @@
/*
-=item C<STRING * Parrot_str_new_constant(PARROT_INTERP, const char *buffer)>
+=item C<STRING * Parrot_str_new_constant>
Creates and returns a constant Parrot string.
@@ -687,8 +684,7 @@
/*
-=item C<STRING * string_make(PARROT_INTERP, const char *buffer,
-UINTVAL len, const char *charset_name, UINTVAL flags)>
+=item C<STRING * string_make>
Creates and returns a new Parrot string using C<len> bytes of string data read
from C<buffer>.
@@ -740,8 +736,7 @@
/*
-=item C<STRING * Parrot_str_new_init(PARROT_INTERP, const char *buffer,
-UINTVAL len, const ENCODING *encoding, const CHARSET *charset, UINTVAL flags)>
+=item C<STRING * Parrot_str_new_init>
Given a buffer, its length, an encoding, a character set, and STRING flags,
creates and returns a new string. Don't call this directly.
@@ -804,7 +799,7 @@
/*
-=item C<STRING * Parrot_str_resize(PARROT_INTERP, STRING *s, UINTVAL addlen)>
+=item C<STRING * Parrot_str_resize>
Grows the Parrot string's buffer by the specified number of characters.
@@ -835,7 +830,7 @@
=over 4
-=item C<UINTVAL Parrot_str_byte_length(PARROT_INTERP, const STRING *s)>
+=item C<UINTVAL Parrot_str_byte_length>
Returns the number of characters in the specified Parrot string.
@@ -856,7 +851,7 @@
/*
-=item C<INTVAL Parrot_str_indexed(PARROT_INTERP, const STRING *s, UINTVAL idx)>
+=item C<INTVAL Parrot_str_indexed>
Returns the character (or glyph, depending upon the string's encoding). This
abstracts the process of finding the Nth character in a (possibly Unicode or
@@ -882,8 +877,7 @@
/*
-=item C<INTVAL Parrot_str_find_index(PARROT_INTERP, const STRING *s,
-const STRING *s2, INTVAL start)>
+=item C<INTVAL Parrot_str_find_index>
Returns the character position of the second Parrot string in the first at or
after C<start>. The return value is a (0 based) offset in characters, not
@@ -927,7 +921,7 @@
/*
-=item C<INTVAL string_ord(PARROT_INTERP, const STRING *s, INTVAL idx)>
+=item C<INTVAL string_ord>
Returns the codepoint at a given index into a string. Negative indexes are
treated as counting from the end of the string.
@@ -968,7 +962,7 @@
/*
-=item C<STRING * string_chr(PARROT_INTERP, UINTVAL character)>
+=item C<STRING * string_chr>
Returns a single-character Parrot string.
@@ -1001,7 +995,7 @@
/*
-=item C<STRING * Parrot_str_copy(PARROT_INTERP, STRING *s)>
+=item C<STRING * Parrot_str_copy>
Creates and returns a copy of the specified Parrot string.
@@ -1028,7 +1022,7 @@
=over 4
-=item C<INTVAL Parrot_str_length(PARROT_INTERP, STRING *s)>
+=item C<INTVAL Parrot_str_length>
Calculates and returns the number of characters in the specified Parrot string.
@@ -1050,7 +1044,7 @@
/*
-=item C<INTVAL string_max_bytes(PARROT_INTERP, const STRING *s, UINTVAL nchars)>
+=item C<INTVAL string_max_bytes>
Returns the number of bytes required to safely contain the specified number
of characters in the specified Parrot string's representation.
@@ -1071,7 +1065,7 @@
/*
-=item C<STRING * Parrot_str_repeat(PARROT_INTERP, const STRING *s, UINTVAL num)>
+=item C<STRING * Parrot_str_repeat>
Repeats the specified Parrot string I<num> times and returns the result.
@@ -1108,8 +1102,7 @@
/*
-=item C<STRING * Parrot_str_substr(PARROT_INTERP, STRING *src, INTVAL offset,
-INTVAL length, STRING **d, int replace_dest)>
+=item C<STRING * Parrot_str_substr>
Copies the substring of length C<length> from C<offset> from the specified
Parrot string and stores it in C<**d>, allocating memory if necessary. The
@@ -1182,8 +1175,7 @@
/*
-=item C<STRING * Parrot_str_replace(PARROT_INTERP, STRING *src,
-INTVAL offset, INTVAL length, STRING *rep, STRING **d)>
+=item C<STRING * Parrot_str_replace>
Replaces a sequence of C<length> characters from C<offset> in the first
Parrot string with the second Parrot string, returning what was
@@ -1337,7 +1329,7 @@
/*
-=item C<STRING * Parrot_str_chopn(PARROT_INTERP, STRING *s, INTVAL n)>
+=item C<STRING * Parrot_str_chopn>
Removes the last C<n> characters of the specified Parrot string. If C<n> is
negative, cuts the string after C<+n> characters. The returned string is a copy
@@ -1361,7 +1353,7 @@
/*
-=item C<void Parrot_str_chopn_inplace(PARROT_INTERP, STRING *s, INTVAL n)>
+=item C<void Parrot_str_chopn_inplace>
Removes the last C<n> characters of the specified Parrot string. If C<n> is
negative, cuts the string after C<+n> characters. The string passed in is
@@ -1420,7 +1412,7 @@
/*
-=item C<INTVAL Parrot_str_compare(PARROT_INTERP, const STRING *s1, const STRING *s2)>
+=item C<INTVAL Parrot_str_compare>
Compares two strings to each other. If s1 is less than s2, returns -1. If the
strings are equal, returns 0. If s1 is greater than s2, returns 2. This
@@ -1452,7 +1444,7 @@
/*
-=item C<INTVAL Parrot_str_not_equal(PARROT_INTERP, const STRING *s1, const STRING *s2)>
+=item C<INTVAL Parrot_str_not_equal>
Compares two Parrot strings, performing type and encoding conversions if
necessary. Returns 1 if the strings are not equal, and 0 otherwise.
@@ -1472,7 +1464,7 @@
/*
-=item C<INTVAL Parrot_str_equal(PARROT_INTERP, const STRING *s1, const STRING *s2)>
+=item C<INTVAL Parrot_str_equal>
Compares two Parrot strings, performing type and encoding conversions if
necessary.
@@ -1523,8 +1515,7 @@
/*
-=item C<static void make_writable(PARROT_INTERP, STRING **s,
-const size_t len, parrot_string_representation_t representation)>
+=item C<static void make_writable>
Makes the specified Parrot string writable with minimum length C<len>. The
C<representation> argument is required in case a new Parrot string has to be
@@ -1550,8 +1541,7 @@
/*
-=item C<STRING * Parrot_str_bitwise_and(PARROT_INTERP, const STRING *s1,
-const STRING *s2, STRING **dest)>
+=item C<STRING * Parrot_str_bitwise_and>
Performs a bitwise C<AND> on two Parrot string, performing type and encoding
conversions if necessary. If the second string is not C<NULL> then it is
@@ -1702,8 +1692,7 @@
/*
-=item C<STRING * Parrot_str_bitwise_or(PARROT_INTERP, const STRING *s1,
-const STRING *s2, STRING **dest)>
+=item C<STRING * Parrot_str_bitwise_or>
Performs a bitwise C<OR> on two Parrot strings, performing type and encoding
conversions if necessary. If the third string is not C<NULL>, then it is
@@ -1778,8 +1767,7 @@
/*
-=item C<STRING * Parrot_str_bitwise_xor(PARROT_INTERP, const STRING *s1,
-const STRING *s2, STRING **dest)>
+=item C<STRING * Parrot_str_bitwise_xor>
Performs a bitwise C<XOR> on two Parrot strings, performing type and encoding
conversions if necessary. If the second string is not C<NULL>, then it is
@@ -1866,8 +1854,7 @@
/*
-=item C<STRING * Parrot_str_bitwise_not(PARROT_INTERP, const STRING *s,
-STRING **dest)>
+=item C<STRING * Parrot_str_bitwise_not>
Performs a bitwise C<NOT> on a Parrot string. If the second string is
not C<NULL> then it is reused, otherwise a new Parrot string is created.
@@ -1932,7 +1919,7 @@
/*
-=item C<INTVAL Parrot_str_boolean(PARROT_INTERP, const STRING *s)>
+=item C<INTVAL Parrot_str_boolean>
Returns whether the specified Parrot string is true. A string is true if it is
equal to anything other than C<0>, C<""> or C<"0">.
@@ -1969,7 +1956,7 @@
/*
-=item C<STRING * Parrot_str_format_data(PARROT_INTERP, const char *format, ...)>
+=item C<STRING * Parrot_str_format_data>
Writes and returns a Parrot string.
@@ -1996,7 +1983,7 @@
/*
-=item C<INTVAL Parrot_str_to_int(PARROT_INTERP, const STRING *s)>
+=item C<INTVAL Parrot_str_to_int>
Converts a numeric Parrot string to an integer value.
@@ -2069,7 +2056,7 @@
/*
-=item C<FLOATVAL Parrot_str_to_num(PARROT_INTERP, const STRING *s)>
+=item C<FLOATVAL Parrot_str_to_num>
Converts a numeric Parrot STRING to a floating point number.
@@ -2125,7 +2112,7 @@
/*
-=item C<STRING * Parrot_str_from_int(PARROT_INTERP, INTVAL i)>
+=item C<STRING * Parrot_str_from_int>
Returns a Parrot string representation of the specified integer value.
@@ -2147,7 +2134,7 @@
/*
-=item C<STRING * Parrot_str_from_num(PARROT_INTERP, FLOATVAL f)>
+=item C<STRING * Parrot_str_from_num>
Returns a Parrot string representation of the specified floating-point value.
@@ -2171,7 +2158,7 @@
/*
-=item C<char * Parrot_str_to_cstring(PARROT_INTERP, const STRING *s)>
+=item C<char * Parrot_str_to_cstring>
Returns a C string for the specified Parrot string. Use
C<Parrot_str_free_cstring()> to free the string. Failure to do this will result in
@@ -2199,7 +2186,7 @@
/*
-=item C<char * string_to_cstring_nullable(PARROT_INTERP, const STRING *s)>
+=item C<char * string_to_cstring_nullable>
Returns a C string for the specified Parrot string. Use
C<Parrot_str_free_cstring()> to free the string. Failure to do this will result in
@@ -2229,7 +2216,7 @@
/*
-=item C<void Parrot_str_free_cstring(char *p)>
+=item C<void Parrot_str_free_cstring>
Free a string created by C<Parrot_str_to_cstring()>.
@@ -2251,7 +2238,7 @@
/*
-=item C<void Parrot_str_pin(PARROT_INTERP, STRING *s)>
+=item C<void Parrot_str_pin>
Replaces the specified Parrot string's managed buffer memory by system memory.
@@ -2287,7 +2274,7 @@
/*
-=item C<void Parrot_str_unpin(PARROT_INTERP, STRING *s)>
+=item C<void Parrot_str_unpin>
Undoes a C<Parrot_str_pin()> so that the string once again uses managed memory.
@@ -2336,7 +2323,7 @@
/*
-=item C<size_t Parrot_str_to_hashval(PARROT_INTERP, STRING *s)>
+=item C<size_t Parrot_str_to_hashval>
Returns the hash value for the specified Parrot string, caching it in
C<< s->hashval >>.
@@ -2369,7 +2356,7 @@
/*
-=item C<STRING * Parrot_str_escape(PARROT_INTERP, const STRING *src)>
+=item C<STRING * Parrot_str_escape>
Escapes all non-ASCII chars to backslash sequences. Control chars that
C<Parrot_str_unescape> can handle are escaped as I<\x>, as well as a double
@@ -2393,8 +2380,7 @@
/*
-=item C<STRING * Parrot_str_escape_truncate(PARROT_INTERP,
-const STRING *src, UINTVAL limit)>
+=item C<STRING * Parrot_str_escape_truncate>
Escapes all non-ASCII characters in the given string with backslashed versions,
but limits the length of the output (used for trace output of strings).
@@ -2521,8 +2507,7 @@
/*
-=item C<STRING * Parrot_str_unescape(PARROT_INTERP, const char *cstring,
-char delimiter, const char *enc_char)>
+=item C<STRING * Parrot_str_unescape>
Unescapes the specified C string. These sequences are covered:
@@ -2632,7 +2617,7 @@
/*
-=item C<STRING * Parrot_str_upcase(PARROT_INTERP, const STRING *s)>
+=item C<STRING * Parrot_str_upcase>
Returns a copy of the specified Parrot string converted to upper case.
Non-caseable characters are left unchanged.
@@ -2663,7 +2648,7 @@
/*
-=item C<void Parrot_str_upcase_inplace(PARROT_INTERP, STRING *s)>
+=item C<void Parrot_str_upcase_inplace>
Converts the specified Parrot string to upper case.
@@ -2689,7 +2674,7 @@
/*
-=item C<STRING * Parrot_str_downcase(PARROT_INTERP, const STRING *s)>
+=item C<STRING * Parrot_str_downcase>
Returns a copy of the specified Parrot string converted to lower case.
Non-caseable characters are left unchanged.
@@ -2714,7 +2699,7 @@
/*
-=item C<void Parrot_str_downcase_inplace(PARROT_INTERP, STRING *s)>
+=item C<void Parrot_str_downcase_inplace>
Converts the specified Parrot string to lower case.
@@ -2740,7 +2725,7 @@
/*
-=item C<STRING * Parrot_str_titlecase(PARROT_INTERP, const STRING *s)>
+=item C<STRING * Parrot_str_titlecase>
Returns a copy of the specified Parrot string converted to title case.
Non-caseable characters are left unchanged.
@@ -2765,7 +2750,7 @@
/*
-=item C<void Parrot_str_titlecase_inplace(PARROT_INTERP, STRING *s)>
+=item C<void Parrot_str_titlecase_inplace>
Converts the specified Parrot string to title case.
@@ -2785,7 +2770,7 @@
/*
-=item C<STRING * string_increment(PARROT_INTERP, const STRING *s)>
+=item C<STRING * string_increment>
Increments the string in the Perl 5 fashion, where incrementing aa gives you bb
and so on. Currently single char only.
@@ -2822,7 +2807,7 @@
/*
-=item C<const char * Parrot_string_cstring(PARROT_INTERP, const STRING *str)>
+=item C<const char * Parrot_string_cstring>
Returns a C string from a Parrot string. Both sides are treated
as constants -- i.e. do not resize the result.
@@ -2845,8 +2830,7 @@
/*
-=item C<INTVAL Parrot_str_is_cclass(PARROT_INTERP, INTVAL flags,
-const STRING *s, UINTVAL offset)>
+=item C<INTVAL Parrot_str_is_cclass>
Returns 1 if the codepoint of string C<s> at given offset is in the given
character class C<flags>. See also F<include/parrot/cclass.h> for possible
@@ -2872,8 +2856,7 @@
/*
-=item C<INTVAL Parrot_str_find_cclass(PARROT_INTERP, INTVAL flags, STRING *s,
-UINTVAL offset, UINTVAL count)>
+=item C<INTVAL Parrot_str_find_cclass>
Finds the first occurrence of the given character class in C<flags> in the
string, and returns its glyph-wise index.
@@ -2897,8 +2880,7 @@
/*
-=item C<INTVAL Parrot_str_find_not_cclass(PARROT_INTERP, INTVAL flags,
-STRING *s, UINTVAL offset, UINTVAL count)>
+=item C<INTVAL Parrot_str_find_not_cclass>
Finds the first occurrence of the a character I<not> in the given character
class in C<flags> in the string starting from C<offset> and looking at C<count>
@@ -2925,8 +2907,7 @@
/*
-=item C<STRING* Parrot_str_change_charset(PARROT_INTERP, STRING *src,
-INTVAL charset_nr, STRING *dest)>
+=item C<STRING* Parrot_str_change_charset>
If C<dest> == NULL, converts C<src> to the given charset or encoding inplace.
Otherwise returns a copy of C<src> with the charset/encoding in C<dest>.
@@ -2984,8 +2965,7 @@
/*
-=item C<STRING* Parrot_str_change_encoding(PARROT_INTERP, STRING *src,
-INTVAL encoding_nr, STRING *dest)>
+=item C<STRING* Parrot_str_change_encoding>
If C<dest> == NULL, converts C<src> to the given charset or encoding in place.
Otherwise returns a copy of C<src> with the charset/encoding in C<dest>
@@ -3037,7 +3017,7 @@
/*
-=item C<STRING * Parrot_str_compose(PARROT_INTERP, STRING *src)>
+=item C<STRING * Parrot_str_compose>
Normalizes the string.
@@ -3064,7 +3044,7 @@
/*
-=item C<STRING* Parrot_str_join(PARROT_INTERP, STRING *j, PMC *ar)>
+=item C<STRING* Parrot_str_join>
Joins the elements of the array C<ar> as strings with the string C<j> between
them, returning the result.
@@ -3104,7 +3084,7 @@
/*
-=item C<PMC* Parrot_str_split(PARROT_INTERP, STRING *delim, STRING *str)>
+=item C<PMC* Parrot_str_split>
Splits the string C<str> at the delimiter C<delim>, returning a
C<ResizableStringArray> of results. Returns PMCNULL if the string or the
@@ -3179,8 +3159,7 @@
/*
-=item C<STRING* Parrot_str_from_uint(PARROT_INTERP, char *tc, UHUGEINTVAL num,
-unsigned int base, int minus)>
+=item C<STRING* Parrot_str_from_uint>
Returns C<num> converted to a Parrot C<STRING>.
@@ -3226,8 +3205,7 @@
/*
-=item C<STRING * Parrot_str_from_int_base(PARROT_INTERP, char *tc,
-HUGEINTVAL num, unsigned int base)>
+=item C<STRING * Parrot_str_from_int_base>
Returns C<num> converted to a Parrot C<STRING>.
Modified: trunk/src/string/charset.c
==============================================================================
--- trunk/src/string/charset.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/charset.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -90,7 +90,7 @@
/*
-=item C<CHARSET * Parrot_new_charset(PARROT_INTERP)>
+=item C<CHARSET * Parrot_new_charset>
Allocates a new C<CHARSET> structure from the system.
@@ -110,7 +110,7 @@
/*
-=item C<void Parrot_charsets_encodings_deinit(PARROT_INTERP)>
+=item C<void Parrot_charsets_encodings_deinit>
Deinitializes (unloads) the charset system. Frees all charsets and the array
that holds the charsets back to the system.
@@ -140,7 +140,7 @@
/*
-=item C<const CHARSET * Parrot_find_charset(PARROT_INTERP, const char *charsetname)>
+=item C<const CHARSET * Parrot_find_charset>
Searches through the list of charsets for the charset given by C<charsetname>.
Returns the charset if it is found, NULL otherwise.
@@ -169,7 +169,7 @@
/*
-=item C<CHARSET * Parrot_load_charset(PARROT_INTERP, const char *charsetname)>
+=item C<CHARSET * Parrot_load_charset>
Throws an exception (Can't load charsets dynamically yet. RT#58184).
@@ -192,7 +192,7 @@
/*
-=item C<INTVAL Parrot_charset_number(PARROT_INTERP, const STRING *charsetname)>
+=item C<INTVAL Parrot_charset_number>
Return the number of the charset or -1 if not found.
@@ -218,7 +218,7 @@
/*
-=item C<INTVAL Parrot_charset_number_of_str(PARROT_INTERP, const STRING *src)>
+=item C<INTVAL Parrot_charset_number_of_str>
Return the number of the charset of the given string or -1 if not found.
@@ -244,7 +244,7 @@
/*
-=item C<STRING* Parrot_charset_name(PARROT_INTERP, INTVAL number_of_charset)>
+=item C<STRING* Parrot_charset_name>
Returns the name of the charset given by the INTVAL index
C<number_of_charset>.
@@ -267,7 +267,7 @@
/*
-=item C<const CHARSET * Parrot_get_charset(PARROT_INTERP, INTVAL number_of_charset)>
+=item C<const CHARSET * Parrot_get_charset>
Returns the charset given by the INTVAL index C<number_of_charset>.
@@ -289,7 +289,7 @@
/*
-=item C<const char * Parrot_charset_c_name(PARROT_INTERP, INTVAL number_of_charset)>
+=item C<const char * Parrot_charset_c_name>
Returns a NULL-terminated C string with the name of the charset given by
INTVAL index C<number_of_charset>.
@@ -312,8 +312,7 @@
/*
-=item C<static INTVAL register_charset(PARROT_INTERP, const char *charsetname,
-CHARSET *charset)>
+=item C<static INTVAL register_charset>
Adds a new charset C<charset> with name <charsetname> to the list of
all charsets. Returns 0 and does nothing if a charset with that name
@@ -354,7 +353,7 @@
/*
-=item C<static void Parrot_str_internal_register_charset_names(PARROT_INTERP)>
+=item C<static void Parrot_str_internal_register_charset_names>
Helper function for initializing characterset names. We can't create the
STRING names until the default encodings and charsets are already initted,
@@ -376,7 +375,7 @@
/*
-=item C<static void register_static_converters(PARROT_INTERP)>
+=item C<static void register_static_converters>
Registers several standard converters between common charsets, including:
@@ -410,8 +409,7 @@
/*
-=item C<INTVAL Parrot_register_charset(PARROT_INTERP, const char *charsetname,
-CHARSET *charset)>
+=item C<INTVAL Parrot_register_charset>
Register a new charset C<charset> with name C<charsetname>. Charset may only
be one of the 4 following names:
@@ -463,7 +461,7 @@
/*
-=item C<void Parrot_charsets_encodings_init(PARROT_INTERP)>
+=item C<void Parrot_charsets_encodings_init>
Creates the initial charsets and encodings, and registers the initial
charset converters.
@@ -505,8 +503,7 @@
/*
-=item C<INTVAL Parrot_make_default_charset(PARROT_INTERP,
-const char *charsetname, CHARSET *charset)>
+=item C<INTVAL Parrot_make_default_charset>
Sets the current default charset to C<charset> with name C<charsetname>.
@@ -526,7 +523,7 @@
/*
-=item C<const CHARSET * Parrot_default_charset(PARROT_INTERP)>
+=item C<const CHARSET * Parrot_default_charset>
Returns the default charset.
@@ -546,8 +543,7 @@
/*
-=item C<charset_converter_t Parrot_find_charset_converter(PARROT_INTERP,
-const CHARSET *lhs, const CHARSET *rhs)>
+=item C<charset_converter_t Parrot_find_charset_converter>
Finds a converter from charset C<lhs> to charset C<rhs>.
@@ -583,8 +579,7 @@
/*
-=item C<void Parrot_register_charset_converter(PARROT_INTERP,
-const CHARSET *lhs, CHARSET *rhs, charset_converter_t func)>
+=item C<void Parrot_register_charset_converter>
Registers a converter C<func> from charset C<lhs> to C<rhs>.
Modified: trunk/src/string/charset/ascii.c
==============================================================================
--- trunk/src/string/charset/ascii.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/charset/ascii.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -180,8 +180,7 @@
/*
-=item C<STRING * ascii_get_graphemes(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL count)>
+=item C<STRING * ascii_get_graphemes>
Retrieves the graphemes for the STRING C<source_string>, starting at
C<offset> and ending at C<offset + count>.
@@ -202,8 +201,7 @@
/*
-=item C<static void set_graphemes(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL replace_count, STRING *insert_string)>
+=item C<static void set_graphemes>
Sets the graphemes for C<source_string>, starting at C<offset>. Replace
C<replace_count> graphemes with those from STRING C<insert_string>.
@@ -224,8 +222,7 @@
/*
-=item C<STRING * ascii_get_graphemes_inplace(PARROT_INTERP,
-STRING *source_string, UINTVAL offset, UINTVAL count, STRING *dest_string)>
+=item C<STRING * ascii_get_graphemes_inplace>
Retrieves the graphemes in place for ascii STRING C<source_string>,
starting at C<offset>. Retrieves C<count> graphemes and puts them
@@ -248,7 +245,7 @@
/*
-=item C<static STRING * to_ascii(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING * to_ascii>
Attempts to convert STRING C<src> to ASCII in STRING C<dest>. Throws
an exception if unconvertable UNICODE characters are involved.
@@ -292,7 +289,7 @@
/*
-=item C<static STRING * to_unicode(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING * to_unicode>
Converts the ASCII STRING C<src> to UNICODE STRING C<dest>.
@@ -320,7 +317,7 @@
/*
-=item C<static STRING * to_charset(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING * to_charset>
Converts STRING C<src> to ASCII charset STRING C<dest>.
@@ -347,7 +344,7 @@
/* A noop. can't compose ascii */
/*
-=item C<static STRING* compose(PARROT_INTERP, STRING *src)>
+=item C<static STRING* compose>
Can't compose ASCII strings, so performs a string copy on it and
returns the new string.
@@ -367,7 +364,7 @@
/* A noop. can't decompose ascii */
/*
-=item C<static STRING* decompose(PARROT_INTERP, STRING *src)>
+=item C<static STRING* decompose>
Can't decompose ASCII, so we perform a string copy instead and return
a pointer to the new string.
@@ -386,7 +383,7 @@
/*
-=item C<static void upcase(PARROT_INTERP, STRING *source_string)>
+=item C<static void upcase>
Converts the STRING C<source_string> to all uppercase.
@@ -412,7 +409,7 @@
/*
-=item C<static void downcase(PARROT_INTERP, STRING *source_string)>
+=item C<static void downcase>
Converts the STRING C<source_string> to all lower-case.
@@ -438,7 +435,7 @@
/*
-=item C<static void titlecase(PARROT_INTERP, STRING *source_string)>
+=item C<static void titlecase>
Converts the STRING given by C<source_string> to title case, where
the first character is upper case and all the rest of the characters
@@ -467,7 +464,7 @@
/*
-=item C<static void upcase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void upcase_first>
Sets the first character in the STRING C<source_string> to upper case,
but doesn't modify the rest of the string.
@@ -488,7 +485,7 @@
/*
-=item C<static void downcase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void downcase_first>
Sets the first character of the STRING C<source_string> to lowercase,
but doesn't modify the rest of the characters.
@@ -509,7 +506,7 @@
/*
-=item C<static void titlecase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void titlecase_first>
Converts the first letter of STRING C<source_string> to upper case,
but doesn't modify the rest of the string.
@@ -530,7 +527,7 @@
/*
-=item C<INTVAL ascii_compare(PARROT_INTERP, const STRING *lhs, const STRING *rhs)>
+=item C<INTVAL ascii_compare>
Compares two strings as ASCII strings. If STRING C<lhs> > C<rhs>, returns
1. If C<lhs> == C<rhs> returns 0. If STRING C<lhs> < C<rhs>, returns -1.
@@ -576,8 +573,7 @@
/*
-=item C<INTVAL mixed_cs_index(PARROT_INTERP, STRING *src, STRING *search,
-UINTVAL offs)>
+=item C<INTVAL mixed_cs_index>
Searches for the first instance of STRING C<search> in STRING C<src>.
returns the position where the substring is found if it is indeed found.
@@ -625,8 +621,7 @@
/*
-=item C<INTVAL ascii_cs_index(PARROT_INTERP, STRING *source_string,
-STRING *search_string, UINTVAL offset)>
+=item C<INTVAL ascii_cs_index>
Searches for the first instance of STRING C<search> in STRING C<src>.
returns the position where the substring is found if it is indeed found.
@@ -655,8 +650,7 @@
/*
-=item C<INTVAL ascii_cs_rindex(PARROT_INTERP, STRING *source_string,
-STRING *search_string, UINTVAL offset)>
+=item C<INTVAL ascii_cs_rindex>
Searches for the last instance of STRING C<search_string> in STRING
C<source_string>. Starts searching at C<offset>.
@@ -685,7 +679,7 @@
/*
-=item C<static UINTVAL validate(PARROT_INTERP, STRING *src)>
+=item C<static UINTVAL validate>
Verifies that the given string is valid ASCII. Returns 1 if it is ASCII,
returns 0 otherwise.
@@ -713,7 +707,7 @@
/*
-=item C<static STRING * string_from_codepoint(PARROT_INTERP, UINTVAL codepoint)>
+=item C<static STRING * string_from_codepoint>
Creates a new STRING object from a single codepoint C<codepoint>. Returns
the new STRING.
@@ -735,8 +729,7 @@
/*
-=item C<static INTVAL is_cclass(PARROT_INTERP, INTVAL flags,
-const STRING *source_string, UINTVAL offset)>
+=item C<static INTVAL is_cclass>
=cut
@@ -762,8 +755,7 @@
/*
-=item C<static INTVAL find_cclass(PARROT_INTERP, INTVAL flags,
-STRING *source_string, UINTVAL offset, UINTVAL count)>
+=item C<static INTVAL find_cclass>
=cut
@@ -790,8 +782,7 @@
/*
-=item C<static INTVAL find_not_cclass(PARROT_INTERP, INTVAL flags,
-STRING *source_string, UINTVAL offset, UINTVAL count)>
+=item C<static INTVAL find_not_cclass>
=cut
@@ -817,7 +808,7 @@
/*
-=item C<size_t ascii_compute_hash(PARROT_INTERP, const STRING *source_string, size_t seed)>
+=item C<size_t ascii_compute_hash>
Computes the hash of STRING C<source_string> starting with seed value
C<seed>.
@@ -845,7 +836,7 @@
/*
-=item C<const CHARSET * Parrot_charset_ascii_init(PARROT_INTERP)>
+=item C<const CHARSET * Parrot_charset_ascii_init>
Initialize the ASCII charset but registering all the necessary
function pointers and settings.
@@ -894,7 +885,7 @@
/*
-=item C<STRING * charset_cvt_ascii_to_binary(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<STRING * charset_cvt_ascii_to_binary>
Converts an ASCII STRING C<src> to a binary STRING C<dest>.
@@ -925,8 +916,7 @@
/*
-=item C<STRING * charset_cvt_ascii_to_iso_8859_1(PARROT_INTERP, STRING *src,
-STRING *dest)>
+=item C<STRING * charset_cvt_ascii_to_iso_8859_1>
Converts ASCII STRING C<src> to ISO8859-1 STRING C<dest>.
Modified: trunk/src/string/charset/binary.c
==============================================================================
--- trunk/src/string/charset/binary.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/charset/binary.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -154,8 +154,7 @@
/*
-=item C<static void set_graphemes(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL replace_count, STRING *insert_string)>
+=item C<static void set_graphemes>
Sets the graphemes for STRING C<source_string>, starting at offset
C<offset>. Replaces C<replace_count> graphemes from STRING
@@ -176,7 +175,7 @@
/*
-=item C<static STRING* to_charset(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING* to_charset>
Converts the STRING C<src> to STRING C<dest> in binary mode. Throws
an exception if a suitable conversion function is not found.
@@ -202,7 +201,7 @@
/*
-=item C<static STRING* compose(PARROT_INTERP, STRING *source_string)>
+=item C<static STRING* compose>
Throws an exception because we cannot compose a binary string.
@@ -221,7 +220,7 @@
/*
-=item C<static STRING* decompose(PARROT_INTERP, STRING *source_string)>
+=item C<static STRING* decompose>
Throws an exception because we cannot decompose a binary string.
@@ -240,7 +239,7 @@
/*
-=item C<static void upcase(PARROT_INTERP, STRING *source_string)>
+=item C<static void upcase>
Throws an exception because we cannot convert a binary string to
upper case.
@@ -258,7 +257,7 @@
/*
-=item C<static void downcase(PARROT_INTERP, STRING *source_string)>
+=item C<static void downcase>
Throws an exception because we cannot convert a binary string to
lower-case.
@@ -276,7 +275,7 @@
/*
-=item C<static void titlecase(PARROT_INTERP, STRING *source_string)>
+=item C<static void titlecase>
Throws an exception because we cannot convert a binary string to
title case.
@@ -294,7 +293,7 @@
/*
-=item C<static void upcase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void upcase_first>
Throws an exception because we cannot set the first "character" of the
binary string to uppercase.
@@ -312,7 +311,7 @@
/*
-=item C<static void downcase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void downcase_first>
Throws an exception because we cannot set the first "character"
of the binary string to lowercase.
@@ -330,7 +329,7 @@
/*
-=item C<static void titlecase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void titlecase_first>
Throws an exception because we can't convert the first "character"
of binary data to title case.
@@ -348,7 +347,7 @@
/*
-=item C<static INTVAL compare(PARROT_INTERP, const STRING *lhs, const STRING *rhs)>
+=item C<static INTVAL compare>
Compare the two buffers, first by size, then with memcmp.
@@ -370,8 +369,7 @@
/*
-=item C<static INTVAL cs_index(PARROT_INTERP, STRING *source_string,
-STRING *search_string, UINTVAL offset)>
+=item C<static INTVAL cs_index>
Returns -1. It makes no sense to try and search for a substring in
raw binary data.
@@ -390,8 +388,7 @@
/*
-=item C<static INTVAL cs_rindex(PARROT_INTERP, STRING *source_string,
-STRING *search_string, UINTVAL offset)>
+=item C<static INTVAL cs_rindex>
Returns -1. It makes no sense to search for the last substring match
in raw binary data.
@@ -410,7 +407,7 @@
/*
-=item C<static UINTVAL validate(PARROT_INTERP, STRING *source_string)>
+=item C<static UINTVAL validate>
Returns 1. All sequential data is valid binary data.
@@ -428,8 +425,7 @@
/*
-=item C<static INTVAL is_cclass(PARROT_INTERP, INTVAL flags,
-const STRING *source_string, UINTVAL offset)>
+=item C<static INTVAL is_cclass>
=cut
@@ -445,8 +441,7 @@
/*
-=item C<static INTVAL find_cclass(PARROT_INTERP, INTVAL flags,
-STRING *source_string, UINTVAL offset, UINTVAL count)>
+=item C<static INTVAL find_cclass>
=cut
@@ -462,8 +457,7 @@
/*
-=item C<static INTVAL find_not_cclass(PARROT_INTERP, INTVAL flags,
-STRING *source_string, UINTVAL offset, UINTVAL count)>
+=item C<static INTVAL find_not_cclass>
=cut
@@ -479,7 +473,7 @@
/*
-=item C<static STRING * string_from_codepoint(PARROT_INTERP, UINTVAL codepoint)>
+=item C<static STRING * string_from_codepoint>
=cut
@@ -499,7 +493,7 @@
/*
-=item C<const CHARSET * Parrot_charset_binary_init(PARROT_INTERP)>
+=item C<const CHARSET * Parrot_charset_binary_init>
Initialize the binary charset, including function pointers and
settings.
Modified: trunk/src/string/charset/iso-8859-1.c
==============================================================================
--- trunk/src/string/charset/iso-8859-1.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/charset/iso-8859-1.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -181,8 +181,7 @@
/*
-=item C<static void set_graphemes(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL replace_count, STRING *insert_string)>
+=item C<static void set_graphemes>
Sets C<replace_count> graphemes in STRING C<source_string> starting at offset C<offset>.
Gets the replacement graphemes from STRING C<insert_string>.
@@ -202,7 +201,7 @@
/*
-=item C<static STRING * to_iso_8859_1(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING * to_iso_8859_1>
Converts STRING C<src> to iso-8859-1 in STRING C<dest>.
@@ -244,7 +243,7 @@
/*
-=item C<static STRING * to_unicode(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING * to_unicode>
Converts STRING C<src> to unicode STRING C<dest>.
@@ -287,7 +286,7 @@
/*
-=item C<static STRING * to_charset(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING * to_charset>
Converts the STRING C<src> to an ISO-8859-1 STRING C<dest>.
@@ -313,7 +312,7 @@
/*
-=item C<static STRING* compose(PARROT_INTERP, STRING *src)>
+=item C<static STRING* compose>
ISO-8859-1 does not support composing, so we just copy the STRING C<src> and return the
copy.
@@ -334,7 +333,7 @@
/*
-=item C<static STRING* decompose(PARROT_INTERP, STRING *src)>
+=item C<static STRING* decompose>
SO-8859-1 does not support decomposing, so we throw an exception.
@@ -353,7 +352,7 @@
/*
-=item C<static void upcase(PARROT_INTERP, STRING *source_string)>
+=item C<static void upcase>
Convert all graphemes in the STRING C<source_string> to upper case, for those
graphemes that support cases.
@@ -386,7 +385,7 @@
/*
-=item C<static void downcase(PARROT_INTERP, STRING *source_string)>
+=item C<static void downcase>
Converts all graphemes in STRING C<source_string> to lower-case, for those graphemes
that support cases.
@@ -418,7 +417,7 @@
/*
-=item C<static void titlecase(PARROT_INTERP, STRING *source_string)>
+=item C<static void titlecase>
Converts the graphemes in STRING C<source_string> to title case, for those graphemes
that support cases.
@@ -459,7 +458,7 @@
/*
-=item C<static void upcase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void upcase_first>
Converts the first grapheme in STRING C<source_string> to upper case, if it
supports cases.
@@ -489,7 +488,7 @@
/*
-=item C<static void downcase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void downcase_first>
Converts the first character of the STRING C<source_string> to lower case, if the
grapheme supports lower case.
@@ -519,7 +518,7 @@
/*
-=item C<static void titlecase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void titlecase_first>
Converts the first grapheme in STRING C<source_string> to title case, if the grapheme
supports case.
@@ -538,7 +537,7 @@
/*
-=item C<static UINTVAL validate(PARROT_INTERP, STRING *src)>
+=item C<static UINTVAL validate>
Returns 1 if the STRING C<src> is a valid ISO-8859-1 STRING. Returns 0 otherwise.
@@ -562,8 +561,7 @@
/*
-=item C<static INTVAL is_cclass(PARROT_INTERP, INTVAL flags,
-const STRING *source_string, UINTVAL offset)>
+=item C<static INTVAL is_cclass>
=cut
@@ -588,8 +586,7 @@
/*
-=item C<static INTVAL find_cclass(PARROT_INTERP, INTVAL flags,
-STRING *source_string, UINTVAL offset, UINTVAL count)>
+=item C<static INTVAL find_cclass>
=cut
@@ -616,8 +613,7 @@
/*
-=item C<static INTVAL find_not_cclass(PARROT_INTERP, INTVAL flags,
-STRING *source_string, UINTVAL offset, UINTVAL count)>
+=item C<static INTVAL find_not_cclass>
=cut
@@ -644,7 +640,7 @@
/*
-=item C<static STRING * string_from_codepoint(PARROT_INTERP, UINTVAL codepoint)>
+=item C<static STRING * string_from_codepoint>
Creates a new STRING from the single codepoint C<codepoint>.
@@ -665,7 +661,7 @@
/*
-=item C<const CHARSET * Parrot_charset_iso_8859_1_init(PARROT_INTERP)>
+=item C<const CHARSET * Parrot_charset_iso_8859_1_init>
Initializes the ISO-8859-1 charset by installing all the necessary function pointers.
@@ -713,7 +709,7 @@
/*
-=item C<STRING * charset_cvt_iso_8859_1_to_ascii(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<STRING * charset_cvt_iso_8859_1_to_ascii>
Converts STRING C<src> in ISO-8859-1 to ASCII STRING C<dest>.
Modified: trunk/src/string/charset/unicode.c
==============================================================================
--- trunk/src/string/charset/unicode.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/charset/unicode.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -225,8 +225,7 @@
/*
-=item C<static void set_graphemes(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL replace_count, STRING *insert_string)>
+=item C<static void set_graphemes>
Sets C<replace_count> graphemes in STRING C<source_string> starting at offset
C<offset>. Gets the graphemes to be replaced from STRING C<insert_string>.
@@ -247,8 +246,7 @@
/*
-=item C<static STRING * get_graphemes(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL count)>
+=item C<static STRING * get_graphemes>
Gets the graphemes from STRING C<source_string> starting at C<offset>. Gets
C<count> graphemes total.
@@ -269,8 +267,7 @@
/*
-=item C<static STRING * get_graphemes_inplace(PARROT_INTERP,
-STRING *source_string, UINTVAL offset, UINTVAL count, STRING *dest_string)>
+=item C<static STRING * get_graphemes_inplace>
Gets C<count> graphemes in place from STRING C<source_string> starting at
offset C<offset>. Puts them into STRING C<dest_string>.
@@ -292,7 +289,7 @@
/*
-=item C<static STRING* to_charset(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING* to_charset>
Converts input STRING C<src> to unicode STRING C<dest>.
@@ -318,7 +315,7 @@
/*
-=item C<static STRING* compose(PARROT_INTERP, STRING *src)>
+=item C<static STRING* compose>
If Parrot is built with ICU, composes the STRING C<src>. Attempts to
denormalize the STRING into the ICU default, NFC.
@@ -381,7 +378,7 @@
/*
-=item C<static STRING* decompose(PARROT_INTERP, STRING *src)>
+=item C<static STRING* decompose>
Decompose function for unicode charset. This function is not yet implemented.
@@ -401,7 +398,7 @@
/*
-=item C<static void upcase(PARROT_INTERP, STRING *src)>
+=item C<static void upcase>
Converts the STRING C<src> to all upper-case graphemes, for those characters
which support upper-case versions.
@@ -496,7 +493,7 @@
/*
-=item C<static void downcase(PARROT_INTERP, STRING *src)>
+=item C<static void downcase>
Converts all graphemes to lower-case, for those graphemes which have cases.
@@ -560,7 +557,7 @@
/*
-=item C<static void titlecase(PARROT_INTERP, STRING *src)>
+=item C<static void titlecase>
Converts the string to title case, for those characters which support cases.
@@ -628,7 +625,7 @@
/*
-=item C<static void upcase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void upcase_first>
Converts the first grapheme in the STRING C<source_string> to uppercase, if the
grapheme supports it. Not implemented.
@@ -648,7 +645,7 @@
/*
-=item C<static void downcase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void downcase_first>
Converts the first grapheme in the STRING C<source_string> to lower-case, if
the grapheme supports it. Not implemented
@@ -668,7 +665,7 @@
/*
-=item C<static void titlecase_first(PARROT_INTERP, STRING *source_string)>
+=item C<static void titlecase_first>
Converts the first grapheme in STRING C<source_string> to title case, if the
string supports it. Not implemented.
@@ -688,7 +685,7 @@
/*
-=item C<static INTVAL compare(PARROT_INTERP, const STRING *lhs, const STRING *rhs)>
+=item C<static INTVAL compare>
Compares two STRINGs, C<lhs> and C<rhs>. Returns -1 if C<lhs> < C<rhs>. Returns
0 if C<lhs> = C<rhs>. Returns 1 if C<lhs> > C<rhs>.
@@ -733,8 +730,7 @@
/*
-=item C<static INTVAL cs_rindex(PARROT_INTERP, STRING *source_string,
-STRING *search_string, UINTVAL offset)>
+=item C<static INTVAL cs_rindex>
Finds the last index of substring C<search_string> in STRING C<source_string>,
starting from C<offset>. Not implemented.
@@ -755,7 +751,7 @@
/*
-=item C<static UINTVAL validate(PARROT_INTERP, STRING *src)>
+=item C<static UINTVAL validate>
Returns 1 if the STRING C<src> is a valid unicode string, returns 0 otherwise.
@@ -786,7 +782,7 @@
/*
-=item C<static int u_iscclass(PARROT_INTERP, UINTVAL codepoint, INTVAL flags)>
+=item C<static int u_iscclass>
=cut
@@ -880,8 +876,7 @@
/*
-=item C<static INTVAL is_cclass(PARROT_INTERP, INTVAL flags,
-const STRING *source_string, UINTVAL offset)>
+=item C<static INTVAL is_cclass>
=cut
@@ -908,8 +903,7 @@
/*
-=item C<static INTVAL find_cclass(PARROT_INTERP, INTVAL flags,
-STRING *source_string, UINTVAL offset, UINTVAL count)>
+=item C<static INTVAL find_cclass>
=cut
@@ -949,8 +943,7 @@
/*
-=item C<static INTVAL find_not_cclass(PARROT_INTERP, INTVAL flags,
-STRING *source_string, UINTVAL offset, UINTVAL count)>
+=item C<static INTVAL find_not_cclass>
=cut
@@ -998,7 +991,7 @@
/*
-=item C<static STRING * string_from_codepoint(PARROT_INTERP, UINTVAL codepoint)>
+=item C<static STRING * string_from_codepoint>
Returns a one-codepoint string for the given codepoint.
@@ -1026,7 +1019,7 @@
/*
-=item C<static size_t compute_hash(PARROT_INTERP, const STRING *src, size_t seed)>
+=item C<static size_t compute_hash>
Computes the hash of the given STRING C<src> with starting seed value C<seed>.
@@ -1056,7 +1049,7 @@
/*
-=item C<const CHARSET * Parrot_charset_unicode_init(PARROT_INTERP)>
+=item C<const CHARSET * Parrot_charset_unicode_init>
Initializes the Unicode charset by installing all the necessary function
pointers.
Modified: trunk/src/string/encoding.c
==============================================================================
--- trunk/src/string/encoding.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/encoding.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -58,7 +58,7 @@
/*
-=item C<void parrot_deinit_encodings(void)>
+=item C<void parrot_deinit_encodings>
Deinitialize encodings and free all memory used by them.
@@ -83,7 +83,7 @@
/*
-=item C<ENCODING * Parrot_new_encoding(PARROT_INTERP)>
+=item C<ENCODING * Parrot_new_encoding>
Allocates the memory for a new C<ENCODING> from the system.
@@ -103,7 +103,7 @@
/*
-=item C<const ENCODING * Parrot_find_encoding(PARROT_INTERP, const char *encodingname)>
+=item C<const ENCODING * Parrot_find_encoding>
Finds an encoding with the name C<encodingname>. Returns the encoding
if it is successfully found, returns NULL otherwise.
@@ -130,7 +130,7 @@
/*
-=item C<const ENCODING * Parrot_load_encoding(PARROT_INTERP, const char *encodingname)>
+=item C<const ENCODING * Parrot_load_encoding>
Loads an encoding. Currently throws an exception because we cannot load
encodings. See RT #58186.
@@ -161,7 +161,7 @@
/*
-=item C<INTVAL Parrot_encoding_number(PARROT_INTERP, const STRING *encodingname)>
+=item C<INTVAL Parrot_encoding_number>
Return the number of the encoding or -1 if not found.
@@ -187,7 +187,7 @@
/*
-=item C<INTVAL Parrot_encoding_number_of_str(PARROT_INTERP, const STRING *src)>
+=item C<INTVAL Parrot_encoding_number_of_str>
Return the number of the encoding of the given string or -1 if not found.
@@ -213,7 +213,7 @@
/*
-=item C<STRING* Parrot_encoding_name(PARROT_INTERP, INTVAL number_of_encoding)>
+=item C<STRING* Parrot_encoding_name>
Returns the name of a character encoding based on the INTVAL index
C<number_of_encoding> to the All_encodings array.
@@ -237,7 +237,7 @@
/*
-=item C<const ENCODING* Parrot_get_encoding(PARROT_INTERP, INTVAL number_of_encoding)>
+=item C<const ENCODING* Parrot_get_encoding>
Returns the encoding given by the INTVAL index C<number_of_encoding>.
@@ -260,7 +260,7 @@
/*
-=item C<const char * Parrot_encoding_c_name(PARROT_INTERP, INTVAL number_of_encoding)>
+=item C<const char * Parrot_encoding_c_name>
Returns the NULL-terminated C string representation of the encodings name
given by the C<number_of_encoding>.
@@ -284,8 +284,7 @@
/*
-=item C<static INTVAL register_encoding(PARROT_INTERP, const char *encodingname,
-ENCODING *encoding)>
+=item C<static INTVAL register_encoding>
Registers a new character encoding C<encoding> with the given name
C<encodingname>. Returns 1 if successful, returns 0 otherwise.
@@ -324,7 +323,7 @@
/*
-=item C<void Parrot_str_internal_register_encoding_names(PARROT_INTERP)>
+=item C<void Parrot_str_internal_register_encoding_names>
Helper function for initializing characterset encoding names. We can't create
the STRING names until the default encodings and charsets are already initted,
@@ -347,8 +346,7 @@
/*
-=item C<INTVAL Parrot_register_encoding(PARROT_INTERP, const char *encodingname,
-ENCODING *encoding)>
+=item C<INTVAL Parrot_register_encoding>
Registers a character encoding C<encoding> with name C<encodingname>.
Only allows one of 4 possibilities: fixed_8, utf8, utf16, and ucs2.
@@ -393,8 +391,7 @@
/*
-=item C<INTVAL Parrot_make_default_encoding(PARROT_INTERP,
-const char *encodingname, ENCODING *encoding)>
+=item C<INTVAL Parrot_make_default_encoding>
Sets the default encoding to C<encoding> with name C<encodingname>.
@@ -414,7 +411,7 @@
/*
-=item C<const ENCODING * Parrot_default_encoding(PARROT_INTERP)>
+=item C<const ENCODING * Parrot_default_encoding>
Gets the default encoding.
@@ -434,8 +431,7 @@
/*
-=item C<encoding_converter_t Parrot_find_encoding_converter(PARROT_INTERP,
-ENCODING *lhs, ENCODING *rhs)>
+=item C<encoding_converter_t Parrot_find_encoding_converter>
Finds a converter from encoding C<rhs> to C<lhs>. Not yet implemented, so
throws an exception.
Modified: trunk/src/string/encoding/fixed_8.c
==============================================================================
--- trunk/src/string/encoding/fixed_8.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/encoding/fixed_8.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -218,7 +218,7 @@
/*
-=item C<static STRING * to_encoding(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING * to_encoding>
Converts the string C<src> to this particular encoding. If C<dest> is
provided, it will contain the result. Otherwise this function operates in
@@ -241,8 +241,7 @@
/*
-=item C<static UINTVAL get_codepoint(PARROT_INTERP, const STRING *source_string,
-UINTVAL offset)>
+=item C<static UINTVAL get_codepoint>
codepoints are bytes, so delegate
@@ -261,8 +260,7 @@
/*
-=item C<static void set_codepoint(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL codepoint)>
+=item C<static void set_codepoint>
This is the same as set byte
@@ -280,7 +278,7 @@
/*
-=item C<static UINTVAL get_byte(PARROT_INTERP, const STRING *source_string, UINTVAL offset)>
+=item C<static UINTVAL get_byte>
Returns the byte in string C<src> at position C<offset>.
@@ -307,8 +305,7 @@
/*
-=item C<static void set_byte(PARROT_INTERP, const STRING *source_string,
-UINTVAL offset, UINTVAL byte)>
+=item C<static void set_byte>
Sets, in string C<src> at position C<offset>, the byte C<byte>.
@@ -333,8 +330,7 @@
/*
-=item C<static STRING * get_codepoints(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL count)>
+=item C<static STRING * get_codepoints>
Returns the codepoints in string C<src> at position C<offset> and length
C<count>. (Delegates to C<get_bytes>.)
@@ -358,8 +354,7 @@
/*
-=item C<static STRING * get_bytes(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL count)>
+=item C<static STRING * get_bytes>
Returns the bytes in string C<src> at position C<offset> and length C<count>.
@@ -390,8 +385,7 @@
/*
-=item C<static STRING * get_codepoints_inplace(PARROT_INTERP,
-STRING *source_string, UINTVAL offset, UINTVAL count, STRING *dest_string)>
+=item C<static STRING * get_codepoints_inplace>
Gets from string C<src> at position C<offset> C<count> codepoints and returns
them in C<return_string>. (Delegates to C<get_bytes>.)
@@ -413,8 +407,7 @@
/*
-=item C<static STRING * get_bytes_inplace(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL count, STRING *return_string)>
+=item C<static STRING * get_bytes_inplace>
Gets from string C<src> at position C<offset> C<count> bytes and returns them
in C<return_string>.
@@ -443,8 +436,7 @@
/*
-=item C<static void set_codepoints(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL count, STRING *new_codepoints)>
+=item C<static void set_codepoints>
Delegate to set_bytes
@@ -462,8 +454,7 @@
/*
-=item C<static void set_bytes(PARROT_INTERP, STRING *source_string,
-UINTVAL offset, UINTVAL count, STRING *new_bytes)>
+=item C<static void set_bytes>
Replaces in string C<src> at position C<offset> for C<count> bytes with the
contents of string C<new_bytes>.
@@ -482,7 +473,7 @@
/*
-=item C<static void become_encoding(PARROT_INTERP, STRING *source_string)>
+=item C<static void become_encoding>
Unconditionally makes the string be in this encoding, if that's valid
@@ -500,7 +491,7 @@
/*
-=item C<static UINTVAL codepoints(PARROT_INTERP, STRING *source_string)>
+=item C<static UINTVAL codepoints>
Returns the number of codepoints in string C<src>.
@@ -517,7 +508,7 @@
/*
-=item C<static UINTVAL bytes(PARROT_INTERP, STRING *source_string)>
+=item C<static UINTVAL bytes>
Returns the number of bytes in string C<src>.
@@ -538,7 +529,7 @@
/*
-=item C<static UINTVAL fixed8_get_next(PARROT_INTERP, String_iter *iter)>
+=item C<static UINTVAL fixed8_get_next>
Moves the string iterator C<i> to the next codepoint.
@@ -557,7 +548,7 @@
/*
-=item C<static void fixed8_set_next(PARROT_INTERP, String_iter *iter, UINTVAL c)>
+=item C<static void fixed8_set_next>
With the string iterator C<i>, appends the codepoint C<c> and advances to the
next position in the string.
@@ -576,7 +567,7 @@
/*
-=item C<static void fixed8_set_position(PARROT_INTERP, String_iter *iter, UINTVAL pos)>
+=item C<static void fixed8_set_position>
Moves the string iterator C<i> to the position C<n> in the string.
@@ -595,7 +586,7 @@
/*
-=item C<static void iter_init(PARROT_INTERP, const STRING *src, String_iter *iter)>
+=item C<static void iter_init>
Initializes for string C<src> the string iterator C<iter>.
@@ -616,7 +607,7 @@
/*
-=item C<ENCODING * Parrot_encoding_fixed_8_init(PARROT_INTERP)>
+=item C<ENCODING * Parrot_encoding_fixed_8_init>
Initializes the fixed-8 encoding.
Modified: trunk/src/string/encoding/ucs2.c
==============================================================================
--- trunk/src/string/encoding/ucs2.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/encoding/ucs2.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -210,7 +210,7 @@
/*
-=item C<static STRING * to_encoding(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING * to_encoding>
Converts the string C<src> to this particular encoding. If C<dest> is
provided, it will contain the result. Otherwise this function operates in
@@ -239,7 +239,7 @@
/*
-=item C<static UINTVAL get_codepoint(PARROT_INTERP, const STRING *src, UINTVAL offset)>
+=item C<static UINTVAL get_codepoint>
Returns the codepoint in string C<src> at position C<offset>.
@@ -262,7 +262,7 @@
/*
-=item C<static void set_codepoint(PARROT_INTERP, STRING *src, UINTVAL offset, UINTVAL codepoint)>
+=item C<static void set_codepoint>
Sets, in string C<src> at position C<offset>, the codepoint C<codepoint>.
@@ -286,7 +286,7 @@
/*
-=item C<static UINTVAL get_byte(PARROT_INTERP, const STRING *src, UINTVAL offset)>
+=item C<static UINTVAL get_byte>
Returns the byte in string C<src> at position C<offset>.
@@ -303,7 +303,7 @@
/*
-=item C<static void set_byte(PARROT_INTERP, const STRING *src, UINTVAL offset, UINTVAL byte)>
+=item C<static void set_byte>
Sets, in string C<src> at position C<offset>, the byte C<byte>.
@@ -320,7 +320,7 @@
/*
-=item C<static STRING * get_codepoints(PARROT_INTERP, STRING *src, UINTVAL offset, UINTVAL count)>
+=item C<static STRING * get_codepoints>
Returns the codepoints in string C<src> at position C<offset> and length
C<count>.
@@ -359,7 +359,7 @@
/*
-=item C<static STRING * get_bytes(PARROT_INTERP, STRING *src, UINTVAL offset, UINTVAL count)>
+=item C<static STRING * get_bytes>
Returns the bytes in string C<src> at position C<offset> and length C<count>.
@@ -379,8 +379,7 @@
/*
-=item C<static STRING * get_codepoints_inplace(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *dest_string)>
+=item C<static STRING * get_codepoints_inplace>
Gets from string C<src> at position C<offset> C<count> codepoints and returns
them in C<return_string>.
@@ -401,8 +400,7 @@
/*
-=item C<static STRING * get_bytes_inplace(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *return_string)>
+=item C<static STRING * get_bytes_inplace>
Gets from string C<src> at position C<offset> C<count> bytes and returns them
in C<return_string>.
@@ -423,8 +421,7 @@
/*
-=item C<static void set_codepoints(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *new_codepoints)>
+=item C<static void set_codepoints>
Replaces in string C<src> at position C<offset> for C<count> codepoints with
the contents of string C<new_codepoints>.
@@ -443,8 +440,7 @@
/*
-=item C<static void set_bytes(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *new_bytes)>
+=item C<static void set_bytes>
Replaces in string C<src> at position C<offset> for C<count> bytes with the
contents of string C<new_bytes>.
@@ -463,7 +459,7 @@
/*
-=item C<static void become_encoding(PARROT_INTERP, STRING *src)>
+=item C<static void become_encoding>
Unconditionally makes the string be in this encoding, if that's valid
@@ -481,7 +477,7 @@
/*
-=item C<static UINTVAL codepoints(PARROT_INTERP, STRING *src)>
+=item C<static UINTVAL codepoints>
Returns the number of codepoints in string C<src>.
@@ -504,7 +500,7 @@
/*
-=item C<static UINTVAL bytes(PARROT_INTERP, STRING *src)>
+=item C<static UINTVAL bytes>
Returns the number of bytes in string C<src>.
@@ -522,7 +518,7 @@
/*
-=item C<static UINTVAL ucs2_decode_and_advance(PARROT_INTERP, String_iter *i)>
+=item C<static UINTVAL ucs2_decode_and_advance>
Moves the string iterator C<i> to the next UCS-2 codepoint.
@@ -549,7 +545,7 @@
/*
-=item C<static void ucs2_encode_and_advance(PARROT_INTERP, String_iter *i, UINTVAL c)>
+=item C<static void ucs2_encode_and_advance>
With the string iterator C<i>, appends the codepoint C<c> and advances to the
next position in the string.
@@ -571,7 +567,7 @@
/*
-=item C<static void ucs2_set_position(PARROT_INTERP, String_iter *i, UINTVAL n)>
+=item C<static void ucs2_set_position>
Moves the string iterator C<i> to the position C<n> in the string.
@@ -591,7 +587,7 @@
/*
-=item C<static void iter_init(PARROT_INTERP, const STRING *src, String_iter *iter)>
+=item C<static void iter_init>
Initializes for string C<src> the string iterator C<iter>.
@@ -618,7 +614,7 @@
/*
-=item C<ENCODING * Parrot_encoding_ucs2_init(PARROT_INTERP)>
+=item C<ENCODING * Parrot_encoding_ucs2_init>
Initializes the UCS-2 encoding.
Modified: trunk/src/string/encoding/utf16.c
==============================================================================
--- trunk/src/string/encoding/utf16.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/encoding/utf16.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -227,7 +227,7 @@
/*
-=item C<static STRING * to_encoding(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING * to_encoding>
Converts the string C<src> to this particular encoding. If C<dest> is
provided, it will contain the result. Otherwise this function operates in
@@ -338,7 +338,7 @@
/*
-=item C<static UINTVAL get_codepoint(PARROT_INTERP, const STRING *src, UINTVAL offset)>
+=item C<static UINTVAL get_codepoint>
Returns the codepoint in string C<src> at position C<offset>.
@@ -369,7 +369,7 @@
/*
-=item C<static void set_codepoint(PARROT_INTERP, STRING *src, UINTVAL offset, UINTVAL codepoint)>
+=item C<static void set_codepoint>
Sets, in string C<src> at position C<offset>, the codepoint C<codepoint>.
@@ -390,7 +390,7 @@
/*
-=item C<static UINTVAL get_byte(PARROT_INTERP, const STRING *src, UINTVAL offset)>
+=item C<static UINTVAL get_byte>
Returns the byte in string C<src> at position C<offset>.
@@ -414,7 +414,7 @@
/*
-=item C<static void set_byte(PARROT_INTERP, const STRING *src, UINTVAL offset, UINTVAL byte)>
+=item C<static void set_byte>
Sets, in string C<src> at position C<offset>, the byte C<byte>.
@@ -438,7 +438,7 @@
/*
-=item C<static STRING * get_codepoints(PARROT_INTERP, STRING *src, UINTVAL offset, UINTVAL count)>
+=item C<static STRING * get_codepoints>
Returns the codepoints in string C<src> at position C<offset> and length
C<count>.
@@ -471,8 +471,7 @@
/*
-=item C<static STRING * get_codepoints_inplace(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *return_string)>
+=item C<static STRING * get_codepoints_inplace>
Gets from string C<src> at position C<offset> C<count> codepoints and returns
them in C<return_string>.
@@ -504,7 +503,7 @@
/*
-=item C<static STRING * get_bytes(PARROT_INTERP, STRING *src, UINTVAL offset, UINTVAL count)>
+=item C<static STRING * get_bytes>
Returns the bytes in string C<src> at position C<offset> and length C<count>.
@@ -527,8 +526,7 @@
/*
-=item C<static STRING * get_bytes_inplace(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *return_string)>
+=item C<static STRING * get_bytes_inplace>
Gets from string C<src> at position C<offset> C<count> bytes and returns them
in C<return_string>.
@@ -554,8 +552,7 @@
/*
-=item C<static void set_codepoints(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *new_codepoints)>
+=item C<static void set_codepoints>
Replaces in string C<src> at position C<offset> for C<count> codepoints with
the contents of string C<new_codepoints>.
@@ -579,8 +576,7 @@
/*
-=item C<static void set_bytes(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *new_bytes)>
+=item C<static void set_bytes>
Replaces in string C<src> at position C<offset> for C<count> bytes with the
contents of string C<new_bytes>.
@@ -602,7 +598,7 @@
/*
-=item C<static void become_encoding(PARROT_INTERP, STRING *src)>
+=item C<static void become_encoding>
Unconditionally makes the string be in this encoding, if that's valid
@@ -620,7 +616,7 @@
/*
-=item C<static UINTVAL codepoints(PARROT_INTERP, STRING *src)>
+=item C<static UINTVAL codepoints>
Returns the number of codepoints in string C<src>.
@@ -646,7 +642,7 @@
/*
-=item C<static UINTVAL bytes(PARROT_INTERP, STRING *src)>
+=item C<static UINTVAL bytes>
Returns the number of bytes in string C<src>.
@@ -665,7 +661,7 @@
#if PARROT_HAS_ICU
/*
-=item C<static UINTVAL utf16_decode_and_advance(PARROT_INTERP, String_iter *i)>
+=item C<static UINTVAL utf16_decode_and_advance>
Moves the string iterator C<i> to the next UTF-16 codepoint.
@@ -692,7 +688,7 @@
/*
-=item C<static void utf16_encode_and_advance(PARROT_INTERP, String_iter *i, UINTVAL c)>
+=item C<static void utf16_encode_and_advance>
With the string iterator C<i>, appends the codepoint C<c> and advances to the
next position in the string.
@@ -715,7 +711,7 @@
/*
-=item C<static void utf16_set_position(PARROT_INTERP, String_iter *i, UINTVAL n)>
+=item C<static void utf16_set_position>
Moves the string iterator C<i> to the position C<n> in the string.
@@ -739,7 +735,7 @@
/*
-=item C<static void iter_init(PARROT_INTERP, const STRING *src, String_iter *iter)>
+=item C<static void iter_init>
Initializes for string C<src> the string iterator C<iter>.
@@ -765,7 +761,7 @@
/*
-=item C<ENCODING * Parrot_encoding_utf16_init(PARROT_INTERP)>
+=item C<ENCODING * Parrot_encoding_utf16_init>
Initializes the UTF-16 encoding.
Modified: trunk/src/string/encoding/utf8.c
==============================================================================
--- trunk/src/string/encoding/utf8.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/encoding/utf8.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -266,8 +266,7 @@
/*
-=item C<static UINTVAL utf8_characters(PARROT_INTERP, const utf8_t *ptr,
-UINTVAL byte_len)>
+=item C<static UINTVAL utf8_characters>
Returns the number of characters in the C<byte_len> bytes from C<*ptr>.
@@ -297,7 +296,7 @@
/*
-=item C<static UINTVAL utf8_decode(PARROT_INTERP, const utf8_t *ptr)>
+=item C<static UINTVAL utf8_decode>
Returns the integer for the UTF-8 character found at C<*ptr>.
@@ -341,7 +340,7 @@
/*
-=item C<static void * utf8_encode(PARROT_INTERP, void *ptr, UINTVAL c)>
+=item C<static void * utf8_encode>
Returns the UTF-8 encoding of integer C<c>.
@@ -378,7 +377,7 @@
/*
-=item C<static const void * utf8_skip_forward(const void *ptr, UINTVAL n)>
+=item C<static const void * utf8_skip_forward>
Moves C<ptr> C<n> characters forward.
@@ -402,7 +401,7 @@
/*
-=item C<static const void * utf8_skip_backward(const void *ptr, UINTVAL n)>
+=item C<static const void * utf8_skip_backward>
Moves C<ptr> C<n> characters back.
@@ -441,7 +440,7 @@
/*
-=item C<static UINTVAL utf8_decode_and_advance(PARROT_INTERP, String_iter *i)>
+=item C<static UINTVAL utf8_decode_and_advance>
The UTF-8 implementation of the string iterator's C<get_and_advance>
function.
@@ -490,8 +489,7 @@
/*
-=item C<static void utf8_encode_and_advance(PARROT_INTERP, String_iter *i,
-UINTVAL c)>
+=item C<static void utf8_encode_and_advance>
The UTF-8 implementation of the string iterator's C<set_and_advance>
function.
@@ -516,7 +514,7 @@
/*
-=item C<static void utf8_set_position(PARROT_INTERP, String_iter *i, UINTVAL pos)>
+=item C<static void utf8_set_position>
The UTF-8 implementation of the string iterator's C<set_position>
function.
@@ -550,7 +548,7 @@
/*
-=item C<static STRING * to_encoding(PARROT_INTERP, STRING *src, STRING *dest)>
+=item C<static STRING * to_encoding>
Converts the string C<src> to this particular encoding. If C<dest> is
provided, it will contain the result. Otherwise this function operates in
@@ -639,7 +637,7 @@
/*
-=item C<static UINTVAL get_codepoint(PARROT_INTERP, const STRING *src, UINTVAL offset)>
+=item C<static UINTVAL get_codepoint>
Returns the codepoint in string C<src> at position C<offset>.
@@ -657,7 +655,7 @@
/*
-=item C<static void set_codepoint(PARROT_INTERP, STRING *src, UINTVAL offset, UINTVAL codepoint)>
+=item C<static void set_codepoint>
Sets, in string C<src> at position C<offset>, the codepoint C<codepoint>.
@@ -680,7 +678,7 @@
/*
-=item C<static UINTVAL get_byte(PARROT_INTERP, const STRING *src, UINTVAL offset)>
+=item C<static UINTVAL get_byte>
Returns the byte in string C<src> at position C<offset>.
@@ -704,8 +702,7 @@
/*
-=item C<static void set_byte(PARROT_INTERP, const STRING *src,
-UINTVAL offset, UINTVAL byte)>
+=item C<static void set_byte>
Sets, in string C<src> at position C<offset>, the byte C<byte>.
@@ -730,7 +727,7 @@
/*
-=item C<static STRING * get_codepoints(PARROT_INTERP, STRING *src, UINTVAL offset, UINTVAL count)>
+=item C<static STRING * get_codepoints>
Returns the codepoints in string C<src> at position C<offset> and length
C<count>.
@@ -769,7 +766,7 @@
/*
-=item C<static STRING * get_bytes(PARROT_INTERP, STRING *src, UINTVAL offset, UINTVAL count)>
+=item C<static STRING * get_bytes>
Returns the bytes in string C<src> at position C<offset> and length C<count>.
@@ -798,8 +795,7 @@
/*
-=item C<static STRING * get_codepoints_inplace(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *return_string)>
+=item C<static STRING * get_codepoints_inplace>
Gets from string C<src> at position C<offset> C<count> codepoints and returns
them in C<return_string>.
@@ -835,8 +831,7 @@
/*
-=item C<static STRING * get_bytes_inplace(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *return_string)>
+=item C<static STRING * get_bytes_inplace>
Gets from string C<src> at position C<offset> C<count> bytes and returns them
in C<return_string>.
@@ -856,8 +851,7 @@
/*
-=item C<static void set_codepoints(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *new_codepoints)>
+=item C<static void set_codepoints>
Replaces in string C<src> at position C<offset> for C<count> codepoints with
the contents of string C<new_codepoints>.
@@ -876,8 +870,7 @@
/*
-=item C<static void set_bytes(PARROT_INTERP, STRING *src,
-UINTVAL offset, UINTVAL count, STRING *new_bytes)>
+=item C<static void set_bytes>
Replaces in string C<src> at position C<offset> for C<count> bytes with the
contents of string C<new_bytes>.
@@ -896,7 +889,7 @@
/*
-=item C<static void become_encoding(PARROT_INTERP, STRING *src)>
+=item C<static void become_encoding>
Unconditionally makes the string be in this encoding, if that's valid
@@ -914,7 +907,7 @@
/*
-=item C<static UINTVAL codepoints(PARROT_INTERP, STRING *src)>
+=item C<static UINTVAL codepoints>
Returns the number of codepoints in string C<src>.
@@ -939,7 +932,7 @@
/*
-=item C<static UINTVAL bytes(PARROT_INTERP, STRING *src)>
+=item C<static UINTVAL bytes>
Returns the number of bytes in string C<src>.
@@ -957,7 +950,7 @@
/*
-=item C<static void iter_init(PARROT_INTERP, const STRING *src, String_iter *iter)>
+=item C<static void iter_init>
Initializes for string C<src> the string iterator C<iter>.
@@ -979,7 +972,7 @@
/*
-=item C<ENCODING * Parrot_encoding_utf8_init(PARROT_INTERP)>
+=item C<ENCODING * Parrot_encoding_utf8_init>
Initializes the UTF-8 encoding.
Modified: trunk/src/string/primitives.c
==============================================================================
--- trunk/src/string/primitives.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/string/primitives.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -33,7 +33,7 @@
/*
-=item C<void string_set_data_directory(PARROT_INTERP, const char *dir)>
+=item C<void string_set_data_directory>
Set the directory where ICU finds its data files (encodings, locales,
etc.).
@@ -70,8 +70,7 @@
/*
-=item C<Parrot_UInt4 string_unescape_one(PARROT_INTERP, UINTVAL *offset,
-STRING *string)>
+=item C<Parrot_UInt4 string_unescape_one>
Unescape a single character. We assume that we're at the start of a
sequence, right after the \.
@@ -307,7 +306,7 @@
=over 4
-=item C<INTVAL Parrot_char_digit_value(PARROT_INTERP, UINTVAL character)>
+=item C<INTVAL Parrot_char_digit_value>
Returns the decimal digit value of the specified character if it is a decimal
digit character. If not, then -1 is returned.
@@ -337,7 +336,7 @@
/*
-=item C<char * str_dup(const char *old)>
+=item C<char * str_dup>
Duplicate a C string. Just like strdup(), except it dies if it runs
out of memory.
@@ -364,7 +363,7 @@
/*
-=item C<char * str_dup_remove_quotes(const char *old)>
+=item C<char * str_dup_remove_quotes>
Duplicates a C string (minus the wrapping quotes). Similar to strdup(),
except it dies if it runs out of memory.
Modified: trunk/src/sub.c
==============================================================================
--- trunk/src/sub.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/sub.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -29,7 +29,7 @@
/*
-=item C<void mark_context_start(void)>
+=item C<void mark_context_start>
Indicate that a new round of context marking is about to take place.
@@ -49,7 +49,7 @@
/*
-=item C<void mark_context(PARROT_INTERP, Parrot_Context* ctx)>
+=item C<void mark_context>
Marks the context C<*ctx>.
@@ -132,7 +132,7 @@
/*
-=item C<Parrot_sub * new_sub(PARROT_INTERP)>
+=item C<Parrot_sub * new_sub>
Returns a new C<Parrot_sub>.
@@ -154,7 +154,7 @@
/*
-=item C<Parrot_sub * new_closure(PARROT_INTERP)>
+=item C<Parrot_sub * new_closure>
Returns a new C<Parrot_sub> with its own scratchpad.
@@ -176,7 +176,7 @@
/*
-=item C<Parrot_cont * new_continuation(PARROT_INTERP, const Parrot_cont *to)>
+=item C<Parrot_cont * new_continuation>
Returns a new C<Parrot_cont> to the context of C<to> with its own copy of the
current interpreter context. If C<to> is C<NULL>, then the C<to_ctx> is set
@@ -214,7 +214,7 @@
/*
-=item C<Parrot_cont * new_ret_continuation(PARROT_INTERP)>
+=item C<Parrot_cont * new_ret_continuation>
Returns a new C<Parrot_cont> pointing to the current context.
@@ -242,7 +242,7 @@
/*
-=item C<Parrot_coro * new_coroutine(PARROT_INTERP)>
+=item C<Parrot_coro * new_coroutine>
Returns a new C<Parrot_coro>.
@@ -269,7 +269,7 @@
/*
-=item C<PMC * new_ret_continuation_pmc(PARROT_INTERP, opcode_t *address)>
+=item C<PMC * new_ret_continuation_pmc>
Returns a new C<RetContinuation> PMC. Uses one from the cache,
if possible; otherwise, creates a new one.
@@ -292,7 +292,7 @@
/*
-=item C<void invalidate_retc_context(PARROT_INTERP, PMC *cont)>
+=item C<void invalidate_retc_context>
Make true Continuations from all RetContinuations up the call chain.
@@ -326,7 +326,7 @@
/*
-=item C<STRING* Parrot_full_sub_name(PARROT_INTERP, PMC* sub_pmc)>
+=item C<STRING* Parrot_full_sub_name>
Return namespace, name, and location of subroutine.
@@ -394,8 +394,7 @@
/*
-=item C<int Parrot_Context_get_info(PARROT_INTERP, const Parrot_Context *ctx,
-Parrot_Context_info *info)>
+=item C<int Parrot_Context_get_info>
Takes pointers to a context and its information table.
Populates the table and returns 0 or 1. XXX needs explanation
@@ -487,7 +486,7 @@
/*
-=item C<STRING* Parrot_Context_infostr(PARROT_INTERP, const Parrot_Context *ctx)>
+=item C<STRING* Parrot_Context_infostr>
Formats context information for display. Takes a context pointer and
returns a pointer to the text. Used in debug.c and warnings.c
@@ -524,7 +523,7 @@
/*
-=item C<PMC* Parrot_find_pad(PARROT_INTERP, STRING *lex_name, const Parrot_Context *ctx)>
+=item C<PMC* Parrot_find_pad>
Locate the LexPad containing the given name. Return NULL on failure.
@@ -567,7 +566,7 @@
/*
-=item C<void Parrot_capture_lex(PARROT_INTERP, PMC *sub_pmc)>
+=item C<void Parrot_capture_lex>
Capture the current lexical environment of a sub.
@@ -639,7 +638,7 @@
/*
-=item C<PMC* parrot_new_closure(PARROT_INTERP, PMC *sub_pmc)>
+=item C<PMC* parrot_new_closure>
Used where? XXX
@@ -667,8 +666,7 @@
/*
-=item C<void Parrot_continuation_check(PARROT_INTERP, const PMC *pmc,
-const Parrot_cont *cc)>
+=item C<void Parrot_continuation_check>
Verifies that the provided continuation is sane.
@@ -698,8 +696,7 @@
/*
-=item C<void Parrot_continuation_rewind_environment(PARROT_INTERP, PMC *pmc,
-Parrot_cont *cc)>
+=item C<void Parrot_continuation_rewind_environment>
Restores the appropriate context for the continuation.
@@ -732,7 +729,7 @@
/*
-=item C<Parrot_sub * Parrot_get_sub_pmc_from_subclass(PARROT_INTERP, PMC *subclass)>
+=item C<Parrot_sub * Parrot_get_sub_pmc_from_subclass>
Gets a Parrot_sub structure from something that isn't a Sub PMC, but rather a
subclass.
Modified: trunk/src/trace.c
==============================================================================
--- trunk/src/trace.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/trace.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -46,7 +46,7 @@
/*
-=item C<static STRING* trace_class_name(PARROT_INTERP, const PMC* pmc)>
+=item C<static STRING* trace_class_name>
Obtains the class name of the PMC.
@@ -74,7 +74,7 @@
/*
-=item C<void trace_pmc_dump(PARROT_INTERP, PMC *pmc)>
+=item C<void trace_pmc_dump>
Prints a PMC to C<stderr>.
@@ -162,7 +162,7 @@
/*
-=item C<int trace_key_dump(PARROT_INTERP, PMC *key)>
+=item C<int trace_key_dump>
Prints a key to C<stderr>, returns the length of the output.
@@ -241,8 +241,7 @@
/*
-=item C<void trace_op_dump(PARROT_INTERP, const opcode_t *code_start,
-const opcode_t *pc)>
+=item C<void trace_op_dump>
Prints the PC, OP and ARGS. Used by C<trace_op()>.
@@ -477,8 +476,7 @@
/*
-=item C<void trace_op(PARROT_INTERP, const opcode_t *code_start,
-const opcode_t *code_end, const opcode_t *pc)>
+=item C<void trace_op>
Prints the PC, OP and ARGS. Used by C<runops_trace()>. With bounds
checking.
Modified: trunk/src/tsq.c
==============================================================================
--- trunk/src/tsq.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/tsq.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -24,7 +24,7 @@
/*
-=item C<QUEUE_ENTRY * pop_entry(QUEUE *queue)>
+=item C<QUEUE_ENTRY * pop_entry>
Does a synchronized removal of the head entry off the queue and returns it.
@@ -46,7 +46,7 @@
/*
-=item C<QUEUE_ENTRY * peek_entry(const QUEUE *queue)>
+=item C<QUEUE_ENTRY * peek_entry>
This does no locking, so the result might have changed by the time you
get the entry, but a synchronized C<pop_entry()> will check again and
@@ -67,7 +67,7 @@
/*
-=item C<QUEUE_ENTRY * nosync_pop_entry(QUEUE *queue)>
+=item C<QUEUE_ENTRY * nosync_pop_entry>
Grab an entry off the queue with no synchronization. Internal only,
because it's darned evil and shouldn't be used outside the module. It's
@@ -100,7 +100,7 @@
/*
-=item C<QUEUE_ENTRY * wait_for_entry(QUEUE *queue)>
+=item C<QUEUE_ENTRY * wait_for_entry>
Does a synchronized removal of the head entry off the queue, waiting if
necessary until there is an entry, and then returns it.
@@ -128,7 +128,7 @@
/*
-=item C<void push_entry(QUEUE *queue, QUEUE_ENTRY *entry)>
+=item C<void push_entry>
Does a synchronized insertion of C<entry> onto the tail of the queue.
@@ -156,7 +156,7 @@
/*
-=item C<void unshift_entry(QUEUE *queue, QUEUE_ENTRY *entry)>
+=item C<void unshift_entry>
Does a synchronized insertion of C<entry> into the head of the queue.
@@ -187,7 +187,7 @@
/*
-=item C<void nosync_insert_entry(QUEUE *queue, QUEUE_ENTRY *entry)>
+=item C<void nosync_insert_entry>
Inserts a timed event according to C<abstime>. The caller has to hold the
queue mutex.
@@ -240,7 +240,7 @@
/*
-=item C<void insert_entry(QUEUE *queue, QUEUE_ENTRY *entry)>
+=item C<void insert_entry>
Does a synchronized insert of C<entry>.
@@ -260,7 +260,7 @@
/*
-=item C<void queue_lock(QUEUE *queue)>
+=item C<void queue_lock>
Locks the queue's mutex.
@@ -277,7 +277,7 @@
/*
-=item C<void queue_unlock(QUEUE *queue)>
+=item C<void queue_unlock>
Unlocks the queue's mutex.
@@ -294,7 +294,7 @@
/*
-=item C<void queue_broadcast(QUEUE *queue)>
+=item C<void queue_broadcast>
This function wakes up I<every> thread waiting on the queue.
@@ -311,7 +311,7 @@
/*
-=item C<void queue_signal(QUEUE *queue)>
+=item C<void queue_signal>
=cut
@@ -326,7 +326,7 @@
/*
-=item C<void queue_wait(QUEUE *queue)>
+=item C<void queue_wait>
Instructs the queue to wait.
@@ -343,7 +343,7 @@
/*
-=item C<void queue_timedwait(QUEUE *queue, const struct timespec *abs_time)>
+=item C<void queue_timedwait>
Instructs the queue to wait for C<abs_time> seconds (?).
@@ -360,7 +360,7 @@
/*
-=item C<QUEUE* queue_init(UINTVAL prio)>
+=item C<QUEUE* queue_init>
Initializes the queue, setting C<prio> as the queue's priority.
@@ -385,7 +385,7 @@
/*
-=item C<void queue_destroy(QUEUE *queue)>
+=item C<void queue_destroy>
Destroys the queue, raising an exception if it is not empty.
Modified: trunk/src/vtables.c
==============================================================================
--- trunk/src/vtables.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/vtables.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -23,7 +23,7 @@
/*
-=item C<VTABLE * Parrot_new_vtable(PARROT_INTERP)>
+=item C<VTABLE * Parrot_new_vtable>
Creates and returns a pointer to the new C<VTABLE>.
@@ -43,7 +43,7 @@
/*
-=item C<VTABLE * Parrot_clone_vtable(PARROT_INTERP, const VTABLE *base_vtable)>
+=item C<VTABLE * Parrot_clone_vtable>
Clones C<*base_vtable> and returns a pointer to the new C<VTABLE>.
@@ -76,7 +76,7 @@
/*
-=item C<void Parrot_destroy_vtable(PARROT_INTERP, VTABLE *vtable)>
+=item C<void Parrot_destroy_vtable>
Destroys C<*vtable>.
@@ -117,7 +117,7 @@
/*
-=item C<void parrot_alloc_vtables(PARROT_INTERP)>
+=item C<void parrot_alloc_vtables>
Allocate memory for the vtables for all known classes (PMC types).
@@ -136,7 +136,7 @@
/*
-=item C<void parrot_realloc_vtables(PARROT_INTERP)>
+=item C<void parrot_realloc_vtables>
Reallocate memory for vtables, increasing the number of vtables by 16.
@@ -163,7 +163,7 @@
/*
-=item C<void parrot_free_vtables(PARROT_INTERP)>
+=item C<void parrot_free_vtables>
Free memory allocated for the vtables. Each vtable is destroyed
through its destructor Parrot_destroy_vtable, after which the list
@@ -187,7 +187,7 @@
/*
-=item C<void mark_vtables(PARROT_INTERP)>
+=item C<void mark_vtables>
Mark all vtables as being alive for the garbage collector.
Modified: trunk/src/warnings.c
==============================================================================
--- trunk/src/warnings.c Wed Apr 1 18:19:56 2009 (r37845)
+++ trunk/src/warnings.c Wed Apr 1 18:24:31 2009 (r37846)
@@ -36,7 +36,7 @@
/*
-=item C<void print_pbc_location(PARROT_INTERP)>
+=item C<void print_pbc_location>
Prints the bytecode location of the warning or error to C<Parrot_io_STDERR>.
@@ -59,7 +59,7 @@
/*
-=item C<static INTVAL print_warning(PARROT_INTERP, STRING *msg)>
+=item C<static INTVAL print_warning>
Prints the warning message and the bytecode location.
@@ -90,8 +90,7 @@
=over 4
-=item C<INTVAL Parrot_warn(PARROT_INTERP, INTVAL warnclass,
-const char *message, ...)>
+=item C<INTVAL Parrot_warn>
The Parrot C string warning/error reporter.
More information about the parrot-commits
mailing list