/*
Copyright (C) 2001-2006, The Perl Foundation.
$Id: compiler.pmc 16275 2006-12-28 01:20:44Z particle $

=head1 NAME

src/pmc/compiler.pmc - Compiler PMC

=head1 DESCRIPTION

C<Compiler> extends C<NCI> to provide an interface for implementing
assembler/compilers.

=head2 Methods

=over 4

=cut

*/

#include "parrot/parrot.h"

pmclass Compiler extends NCI need_ext {

/*

=item C<void *invoke(void *code_ptr)>

Compiles the source code starting at C<code_ptr> and returns a new
C<Eval> PMC with a new PackFile attached.

=cut

*/

    void* invoke(void * code_ptr) {
        return SUPER(code_ptr);
    }
}

/*

=back

=head1 SEE ALSO

F<docs/pdds/pdd06_pasm.pod>.

=head1 HISTORY

Initial revision by leo 2003/01/16

=cut

*/

/*
 * Local variables:
 *   c-file-style: "parrot"
 * End:
 * vim: expandtab shiftwidth=4:
 */
