NAME

src/pmc/parrotinterpreter.pmc - Parrot Interpreter

DESCRIPTION

These are the vtable functions for the ParrotInterpreter base class

   getinterp P0
   set P1, P0[.IGLOBALS_*]  # access interpreter globals
   set I0, P0[x]            # interpinfo I0, x
   set I0, P0[-1]           # get interpreter flags
   set P0[-1], x            # set flags on interpreter
                            # NOTE: this doesn't restart

Functions

void clone_interpreter(Parrot_Interp dest, const Parrot_Interp source, INTVAL flags)

Clones the interpreter as specified by the flags.

static void create_interp(PMC *self, Parrot_Interp parent)

Creates a new child interpreter of parent.

Methods

void class_init()

Class initialization.

void init()

Initializes the interpreter.

void init_pmc(PMC *parent)

Initializes a child interpreter with *parent if parent is a ParrotInterpreter instance. Otherwise takes the thread ID from parent and uses that thread.

void set_pointer(void *value)

Sets struct_val to *value.

void *get_pointer()

Returns struct_val.

INTVAL get_integer()

Returns the thread id of the interpreter.

opcode_t *invoke(void *next)

Runs the interpreter's byte code.

PMC *get_pmc_keyed_int(INTVAL key)

Returns the PMC global value for key.

PMC *get_pmc_keyed(PMC *key)

Introspection interface. key can be:

  "sub"                     ... return Sub object of this subroutine
  "continuation"            ... return Continuation PMC
  "lexpad"                  ... return lexpad PMC for this sub
  "namespace"               ... return namespace PMC for this sub
  "outer"                   ... return outer sub of this closure
  "<item>"; level           ... same for caller <level>
  "annotations"; level > 0  ... annotations at point of call <level>s down
  "outer"; "<item>"         ... same for outer level 1
  "outer"; "<item>"; level  ... same for outer <level>
  "globals"                 ... return global stash

INTVAL get_integer_keyed_int(INTVAL key)

Returns the interpreter info for key.

void set_integer_keyed_int(INTVAL key, INTVAL val)

Sets the interpreter info for key to val.

PMC *clone()

First attempt to make things running, and to see, where problems may arise. Only minimal items are done yet.XXX this should of course call Parrot_clone() and use freeze/thaw.

INTVAL is_equal(PMC *val)

Returns whether the interpreter is equal to *val.Two interpreters (threads) are equal if both are non-threaded or they have the same thread id.

void visit(visit_info *info)

This is used by freeze/thaw to visit the contents of the interpreter.*info is the visit info, (see include/parrot/pmc_freeze.h).

void freeze(visit_info *info)

Used to archive the interpreter. Actually not the whole interpreter is frozen but the state of the interpreter, which includes everything that has changes since creating an empty interpreter.

void thaw(visit_info *info)

Used to unarchive the interpreter. This merges the changes into this interpreter instance.

void thawfinish(visit_info *info)

Finish thawing.

METHOD hll_map(PMC core_type,PMC hll_type)

Map core_type to hll_type.

METHOD stdhandle(INTVAL fileno, PMC *newhandle :optional)

Returns the standard parrot handler asscoiated with the interpreter. The valid values for fileno are listed in include/stdio.pasmOptionally sets the parrot handler passed as second argument as the specified standard handler.This method is experimental.