cvs commit: parrot interpreter.c

[dan]

cvsuser     01/12/31 12:22:12

  Modified:    .        interpreter.c
  Log:
  Tweak so we can build on non-JIT platforms
  
  Revision  Changes    Path
  1.48      +4 -2      parrot/interpreter.c
  
  Index: interpreter.c
  ===================================================================
  RCS file: /home/perlcvs/parrot/interpreter.c,v
  retrieving revision 1.47
  retrieving revision 1.48
  diff -u -w -r1.47 -r1.48
  --- interpreter.c     31 Dec 2001 19:37:53 -0000      1.47
  +++ interpreter.c     31 Dec 2001 20:22:12 -0000      1.48
  @@ -1,7 +1,7 @@
   /* interpreter.c
    *  Copyright: (When this is determined...it will go here)
    *  CVS Info
  - *     $Id: interpreter.c,v 1.47 2001/12/31 19:37:53 gregor Exp $
  + *     $Id: interpreter.c,v 1.48 2001/12/31 20:22:12 dan Exp $
    *  Overview:
    *     The interpreter api handles running the operations
    *  Data Structure and Algorithms:
  @@ -271,6 +271,7 @@
    */
   static void
   runops_jit (struct Parrot_Interp *interpreter, opcode_t * pc) {
  +#ifdef HAS_JIT
       opcode_t * code_start;
       INTVAL     code_size;
       opcode_t * code_end;
  @@ -282,9 +283,10 @@
       code_size  = interpreter->code->byte_code_size;
       code_end   = (opcode_t *)(interpreter->code->byte_code + code_size);
   
  -#ifdef HAS_JIT
       jit_code = build_asm(interpreter, pc, code_start, code_end);
       (jit_code)();
  +#else
  +    return;
   #endif
   }