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

Fix type() implementation for x64 lightuserdata.

Browse Source
This commit is contained in:
Mike Pall 2010-02-24 01:23:52 +01:00
parent 857f538eac
commit 47da0d8018
1 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/buildvm_x86.dasc
View File

@ -1263,6 +1263,12 @@ static void build_subroutines(BuildCtx *ctx, int cmov, int sse)
| |
|.ffunc_1 type |.ffunc_1 type
| mov RB, [BASE+4] | mov RB, [BASE+4]
|.if X64
| mov RA, RB
| sar RA, 15
| cmp RA, -2
| je >3
|.endif
| mov RC, ~LJ_TNUMX | mov RC, ~LJ_TNUMX
| not RB | not RB
| cmp RC, RB | cmp RC, RB
@ -1271,12 +1277,18 @@ static void build_subroutines(BuildCtx *ctx, int cmov, int sse)
||} else { ||} else {
| jbe >1; mov RC, RB; 1: | jbe >1; mov RC, RB; 1:
||} ||}
|2:
| mov CFUNC:RB, [BASE-8] | mov CFUNC:RB, [BASE-8]
| mov STR:RC, [CFUNC:RB+RC*8+((char *)(&((GCfuncC *)0)->upvalue))] | mov STR:RC, [CFUNC:RB+RC*8+((char *)(&((GCfuncC *)0)->upvalue))]
| mov PC, [BASE-4] | mov PC, [BASE-4]
| mov dword [BASE-4], LJ_TSTR | mov dword [BASE-4], LJ_TSTR
| mov [BASE-8], STR:RC | mov [BASE-8], STR:RC
| jmp ->fff_res1 | jmp ->fff_res1
|.if X64
|3:
| mov RC, ~LJ_TLIGHTUD
| jmp <2
|.endif
| |
|//-- Base library: getters and setters --------------------------------- |//-- Base library: getters and setters ---------------------------------
| |