pike.git / src / code / sparc.c

version» Context lines:

pike.git/src/code/sparc.c:1:   /* -  * $Id: sparc.c,v 1.10 2002/05/10 14:04:37 mast Exp $ +  * $Id: sparc.c,v 1.11 2002/08/15 14:50:24 marcus Exp $    *    * Machine code generator for sparc.    *    * Henrik Grubbström 20010720    */      #include "operators.h"      #define ADD_CALL(X, DELAY_OK) do { \    INT32 delta_; \
pike.git/src/code/sparc.c:109:      void sparc_encode_program(struct program *p, struct dynamic_buffer_s *buf)   {    size_t prev = 0, rel;    /* De-relocate the program... */    for (rel = 0; rel < p->num_relocations; rel++) {    size_t off = p->relocations[rel];    INT32 opcode;   #ifdef PIKE_DEBUG    if (off < prev) { -  fatal("Relocations in bad order!\n"); +  Pike_fatal("Relocations in bad order!\n");    }   #endif /* PIKE_DEBUG */    adddata2(p->program + prev, off - prev);      #ifdef PIKE_DEBUG    if ((p->program[off] & 0xc0000000) != 0x40000000) { -  fatal("Bad relocation!\n"); +  Pike_fatal("Bad relocation!\n");    }   #endif /* PIKE_DEBUG */    /* Relocate to being relative to NULL */    opcode = 0x40000000 |    ((p->program[off] + (((INT32)(p->program)>>2))) & 0x3fffffff);    adddata2(&opcode, 1);    prev = off+1;    }    adddata2(p->program + prev, p->num_program - prev);   }