gh-mirror/mikepaul-LuaJIT
1
0
Fork 0
mirror of https://github.com/LuaJIT/LuaJIT.git synced 2025-02-07 23:24:09 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

PPC: Add move and constant instructions.

Browse Source
This commit is contained in:
Mike Pall 2010-09-01 00:19:27 +02:00
parent 8876704e05
commit d71bd78b8f
1 changed files with 35 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

41
src/buildvm_ppc.dasc
View File

@ -912,7 +912,10 @@ static void build_ins(BuildCtx *ctx, BCOp op, int defop)
/* -- Unary ops --------------------------------------------------------- */ /* -- Unary ops --------------------------------------------------------- */
case BC_MOV: case BC_MOV:
| NYI | // RA = dst*8, RD = src*8
| evlddx TMP0, BASE, RD
| evstddx TMP0, BASE, RA
| ins_next_
break; break;
case BC_NOT: case BC_NOT:
| NYI | NYI
@ -955,19 +958,45 @@ static void build_ins(BuildCtx *ctx, BCOp op, int defop)
/* -- Constant ops ------------------------------------------------------ */ /* -- Constant ops ------------------------------------------------------ */
case BC_KSTR: case BC_KSTR:
| NYI | // RA = dst*8, RD = str_const*8 (~)
| srwi TMP1, RD, 1
| subfic TMP1, TMP1, -4
| lwzx TMP0, KBASE, TMP1 // KBASE-4-str_const*4
| evmergelo TMP0, TISSTR, TMP0
| evstddx TMP0, BASE, RA
| ins_next
break; break;
case BC_KSHORT: case BC_KSHORT:
| NYI | // RA = dst*8, RD = int16_literal*8
| srwi TMP1, RD, 3
| extsh TMP1, TMP1
| efdcfsi TMP0, TMP1
| evstddx TMP0, BASE, RA
| ins_next
break; break;
case BC_KNUM: case BC_KNUM:
| NYI | // RA = dst*8, RD = num_const*8
| evlddx TMP0, KBASE, RD
| evstddx TMP0, BASE, RA
| ins_next
break; break;
case BC_KPRI: case BC_KPRI:
| NYI | // RA = dst*8, RD = primitive_type*8 (~)
| srwi TMP1, RD, 3
| not TMP0, TMP1
| stwx TMP0, BASE, RA
| ins_next
break; break;
case BC_KNIL: case BC_KNIL:
| NYI | // RA = base*8, RD = end*8
| evstddx TISNIL, BASE, RA
| addi RA, RA, 8
|1:
| evstddx TISNIL, BASE, RA
| cmpw RA, RD
| addi RA, RA, 8
| blt <1
| ins_next
break; break;
/* -- Upvalue and function ops ------------------------------------------ */ /* -- Upvalue and function ops ------------------------------------------ */