/[pcre]/code/trunk/sljit/sljitNativePPC_64.c
ViewVC logotype

Diff of /code/trunk/sljit/sljitNativePPC_64.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1182 by zherczeg, Sun Oct 28 05:22:32 2012 UTC revision 1195 by zherczeg, Thu Nov 1 15:21:27 2012 UTC
# Line 41  Line 41 
41  #define PUSH_RLDICR(reg, shift) \  #define PUSH_RLDICR(reg, shift) \
42          push_inst(compiler, RLDI(reg, reg, 63 - shift, shift, 1))          push_inst(compiler, RLDI(reg, reg, 63 - shift, shift, 1))
43    
44  static int load_immediate(struct sljit_compiler *compiler, int reg, sljit_w imm)  static sljit_si load_immediate(struct sljit_compiler *compiler, sljit_si reg, sljit_sw imm)
45  {  {
46          sljit_uw tmp;          sljit_uw tmp;
47          sljit_uw shift;          sljit_uw shift;
# Line 145  static int load_immediate(struct sljit_c Line 145  static int load_immediate(struct sljit_c
145                  src1 = TMP_REG1; \                  src1 = TMP_REG1; \
146          }          }
147    
148  static SLJIT_INLINE int emit_single_op(struct sljit_compiler *compiler, int op, int flags,  static SLJIT_INLINE sljit_si emit_single_op(struct sljit_compiler *compiler, sljit_si op, sljit_si flags,
149          int dst, int src1, int src2)          sljit_si dst, sljit_si src1, sljit_si src2)
150  {  {
151          switch (op) {          switch (op) {
152          case SLJIT_MOV:          case SLJIT_MOV:
# Line 241  static SLJIT_INLINE int emit_single_op(s Line 241  static SLJIT_INLINE int emit_single_op(s
241    
242          case SLJIT_ADDC:          case SLJIT_ADDC:
243                  if (flags & ALT_FORM1) {                  if (flags & ALT_FORM1) {
244                          FAIL_IF(push_inst(compiler, MFXER | S(0)));                          FAIL_IF(push_inst(compiler, MFXER | D(0)));
245                          FAIL_IF(push_inst(compiler, ADDE | D(dst) | A(src1) | B(src2)));                          FAIL_IF(push_inst(compiler, ADDE | D(dst) | A(src1) | B(src2)));
246                          return push_inst(compiler, MTXER | S(0));                          return push_inst(compiler, MTXER | S(0));
247                  }                  }
# Line 278  static SLJIT_INLINE int emit_single_op(s Line 278  static SLJIT_INLINE int emit_single_op(s
278    
279          case SLJIT_SUBC:          case SLJIT_SUBC:
280                  if (flags & ALT_FORM1) {                  if (flags & ALT_FORM1) {
281                          FAIL_IF(push_inst(compiler, MFXER | S(0)));                          FAIL_IF(push_inst(compiler, MFXER | D(0)));
282                          FAIL_IF(push_inst(compiler, SUBFE | D(dst) | A(src2) | B(src1)));                          FAIL_IF(push_inst(compiler, SUBFE | D(dst) | A(src2) | B(src1)));
283                          return push_inst(compiler, MTXER | S(0));                          return push_inst(compiler, MTXER | S(0));
284                  }                  }
# Line 350  static SLJIT_INLINE int emit_single_op(s Line 350  static SLJIT_INLINE int emit_single_op(s
350                                  return push_inst(compiler, RLDI(dst, src1, compiler->imm, 63 - compiler->imm, 1) | RC(flags));                                  return push_inst(compiler, RLDI(dst, src1, compiler->imm, 63 - compiler->imm, 1) | RC(flags));
351                          }                          }
352                  }                  }
353                  if (flags & ALT_FORM2)                  return push_inst(compiler, ((flags & ALT_FORM2) ? SLW : SLD) | RC(flags) | S(src1) | A(dst) | B(src2));
                         return push_inst(compiler, SLW | RC(flags) | S(src1) | A(dst) | B(src2));  
                 return push_inst(compiler, SLD | RC(flags) | S(src1) | A(dst) | B(src2));  
354    
355          case SLJIT_LSHR:          case SLJIT_LSHR:
356                  if (flags & ALT_FORM1) {                  if (flags & ALT_FORM1) {
# Line 366  static SLJIT_INLINE int emit_single_op(s Line 364  static SLJIT_INLINE int emit_single_op(s
364                                  return push_inst(compiler, RLDI(dst, src1, 64 - compiler->imm, compiler->imm, 0) | RC(flags));                                  return push_inst(compiler, RLDI(dst, src1, 64 - compiler->imm, compiler->imm, 0) | RC(flags));
365                          }                          }
366                  }                  }
367                  if (flags & ALT_FORM2)                  return push_inst(compiler, ((flags & ALT_FORM2) ? SRW : SRD) | RC(flags) | S(src1) | A(dst) | B(src2));
                         return push_inst(compiler, SRW | RC(flags) | S(src1) | A(dst) | B(src2));  
                 return push_inst(compiler, SRD | RC(flags) | S(src1) | A(dst) | B(src2));  
368    
369          case SLJIT_ASHR:          case SLJIT_ASHR:
370                    if (flags & ALT_FORM3)
371                            FAIL_IF(push_inst(compiler, MFXER | D(0)));
372                  if (flags & ALT_FORM1) {                  if (flags & ALT_FORM1) {
373                          SLJIT_ASSERT(src2 == TMP_REG2);                          SLJIT_ASSERT(src2 == TMP_REG2);
374                          if (flags & ALT_FORM2) {                          if (flags & ALT_FORM2) {
375                                  compiler->imm &= 0x1f;                                  compiler->imm &= 0x1f;
376                                  return push_inst(compiler, SRAWI | RC(flags) | S(src1) | A(dst) | (compiler->imm << 11));                                  FAIL_IF(push_inst(compiler, SRAWI | RC(flags) | S(src1) | A(dst) | (compiler->imm << 11)));
377                          }                          }
378                          else {                          else {
379                                  compiler->imm &= 0x3f;                                  compiler->imm &= 0x3f;
380                                  return push_inst(compiler, SRADI | RC(flags) | S(src1) | A(dst) | ((compiler->imm & 0x1f) << 11) | ((compiler->imm & 0x20) >> 4));                                  FAIL_IF(push_inst(compiler, SRADI | RC(flags) | S(src1) | A(dst) | ((compiler->imm & 0x1f) << 11) | ((compiler->imm & 0x20) >> 4)));
381                          }                          }
382                  }                  }
383                  if (flags & ALT_FORM2)                  else
384                          return push_inst(compiler, SRAW | RC(flags) | S(src1) | A(dst) | B(src2));                          FAIL_IF(push_inst(compiler, ((flags & ALT_FORM2) ? SRAW : SRAD) | RC(flags) | S(src1) | A(dst) | B(src2)));
385                  return push_inst(compiler, SRAD | RC(flags) | S(src1) | A(dst) | B(src2));                  return (flags & ALT_FORM3) ? push_inst(compiler, MTXER | S(0)) : SLJIT_SUCCESS;
386          }          }
387    
388          SLJIT_ASSERT_STOP();          SLJIT_ASSERT_STOP();
389          return SLJIT_SUCCESS;          return SLJIT_SUCCESS;
390  }  }
391    
392  static SLJIT_INLINE int emit_const(struct sljit_compiler *compiler, int reg, sljit_w init_value)  static SLJIT_INLINE sljit_si emit_const(struct sljit_compiler *compiler, sljit_si reg, sljit_sw init_value)
393  {  {
394          FAIL_IF(push_inst(compiler, ADDIS | D(reg) | A(0) | IMM(init_value >> 48)));          FAIL_IF(push_inst(compiler, ADDIS | D(reg) | A(0) | IMM(init_value >> 48)));
395          FAIL_IF(push_inst(compiler, ORI | S(reg) | A(reg) | IMM(init_value >> 32)));          FAIL_IF(push_inst(compiler, ORI | S(reg) | A(reg) | IMM(init_value >> 32)));
# Line 411  SLJIT_API_FUNC_ATTRIBUTE void sljit_set_ Line 409  SLJIT_API_FUNC_ATTRIBUTE void sljit_set_
409          SLJIT_CACHE_FLUSH(inst, inst + 5);          SLJIT_CACHE_FLUSH(inst, inst + 5);
410  }  }
411    
412  SLJIT_API_FUNC_ATTRIBUTE void sljit_set_const(sljit_uw addr, sljit_w new_constant)  SLJIT_API_FUNC_ATTRIBUTE void sljit_set_const(sljit_uw addr, sljit_sw new_constant)
413  {  {
414          sljit_ins *inst = (sljit_ins*)addr;          sljit_ins *inst = (sljit_ins*)addr;
415    

Legend:
Removed from v.1182  
changed lines
  Added in v.1195

  ViewVC Help
Powered by ViewVC 1.1.5