[svn:parrot] r41347 - in branches/kill_jit: include/parrot src src/runcore

[darbelo at svn.parrot.org]

Author: darbelo
Date: Sat Sep 19 00:32:02 2009
New Revision: 41347
URL: https://trac.parrot.org/parrot/changeset/41347

Log:
Kill some more leftover jit functions.

Modified:
   branches/kill_jit/include/parrot/interpreter.h
   branches/kill_jit/src/frame_builder.h
   branches/kill_jit/src/runcore/main.c

Modified: branches/kill_jit/include/parrot/interpreter.h
==============================================================================
--- branches/kill_jit/include/parrot/interpreter.h	Fri Sep 18 23:51:32 2009	(r41346)
+++ branches/kill_jit/include/parrot/interpreter.h	Sat Sep 19 00:32:02 2009	(r41347)
@@ -580,7 +580,6 @@
 void exec_init_prederef(PARROT_INTERP,
     void *prederef_arena);
 void prepare_for_run(PARROT_INTERP);
-void *init_jit(PARROT_INTERP, opcode_t *pc);
 PARROT_EXPORT void dynop_register(PARROT_INTERP, PMC *op_lib);
 
 /* interpreter.pmc */

Modified: branches/kill_jit/src/frame_builder.h
==============================================================================
--- branches/kill_jit/src/frame_builder.h	Fri Sep 18 23:51:32 2009	(r41346)
+++ branches/kill_jit/src/frame_builder.h	Sat Sep 19 00:32:02 2009	(r41347)
@@ -3,7 +3,7 @@
  */
 
 /*
- * jit_emit.h
+ * frame_builder.h
  *
  * i386
  *
@@ -252,20 +252,6 @@
                           PARROT_INTERP);
 
 /*
- * interface functions for the register save/restore code
- * with offsets relative to the base register (obtained by
- * Parrot_jit_emit_get_base_reg_no)
- */
-void Parrot_jit_emit_mov_mr_n_offs(
-    Interp *, int base_reg, size_t offs, int src_reg);
-void Parrot_jit_emit_mov_mr_offs(
-    Interp *,  int base_reg, size_t offs, int src_reg);
-void Parrot_jit_emit_mov_rm_n_offs(
-    Interp *, int dst_reg, int base_reg, size_t offs);
-void Parrot_jit_emit_mov_rm_offs(
-    Interp *, int dst_reg, int base_reg, size_t offs);
-
-/*
  * interface to architecture specific details
  */
 typedef void (*jit_arch_f)(Parrot_jit_info_t *, Interp *);

Modified: branches/kill_jit/src/runcore/main.c
==============================================================================
--- branches/kill_jit/src/runcore/main.c	Fri Sep 18 23:51:32 2009	(r41346)
+++ branches/kill_jit/src/runcore/main.c	Sat Sep 19 00:32:02 2009	(r41347)
@@ -494,56 +494,6 @@
 
 /*
 
-=item C<void * init_jit(PARROT_INTERP, opcode_t *pc)>
-
-Initializes JIT function for the specified opcode and returns it.
-
-=cut
-
-*/
-
-PARROT_WARN_UNUSED_RESULT
-PARROT_CAN_RETURN_NULL
-void *
-init_jit(PARROT_INTERP, SHIM(opcode_t *pc))
-{
-    ASSERT_ARGS(init_jit)
-#if JIT_CAPABLE
-    opcode_t          *code_start;
-    UINTVAL            code_size;          /* in opcodes */
-    opcode_t          *code_end;
-    Parrot_jit_info_t *jit_info;
-
-    if (interp->code->jit_info)
-        return ((Parrot_jit_info_t *)interp->code->jit_info)->arena.start;
-
-    code_start = interp->code->base.data;
-    code_size  = interp->code->base.size;
-    code_end   = code_start + code_size;
-
-#  if defined HAVE_COMPUTED_GOTO && PARROT_I386_JIT_CGP
-#    ifdef __GNUC__
-#      ifdef PARROT_I386
-    init_prederef(interp, PARROT_CGP_CORE);
-#      endif
-#    endif
-#  endif
-
-    interp->code->jit_info =
-        jit_info = parrot_build_asm(interp, code_start, code_end,
-            NULL, JIT_CODE_FILE);
-
-    return jit_info->arena.start;
-#else
-    UNUSED(interp);
-    return NULL;
-#endif
-
-}
-
-
-/*
-
 =item C<void prepare_for_run(PARROT_INTERP)>
 
 Prepares to run the interpreter's run core.