projects/ldc: gen/asm-x86-32.h annotate

annotate gen/asm-x86-32.h @ 945:03d7c4aac654

SWITCHED TO LLVM 2.5 ! Applied patch from ticket #129 to compile against latest LLVM. Thanks Frits van Bommel. Fixed implicit return by asm block at the end of a function on x86-32. Other architectures will produce an error at the moment. Adding support for new targets is fairly simple. Fixed return calling convention for complex numbers, ST and ST(1) were switched around. Added some testcases. I've run a dstress test and there are no regressions. However, the runtime does not seem to compile with symbolic debug information. -O3 -release -inline works well and is what I used for the dstress run. Tango does not compile, a small workaround is needed in tango.io.digest.Digest.Digest.hexDigest. See ticket #206 .

author	Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
date	Sun, 08 Feb 2009 05:26:54 +0100
parents	eb310635d80e
children	5066ba0c9783 cc723604da95

rev	line source
304 3ebc136702dd [svn r325] Removed dead code. ChristianK parents: 302 diff changeset	1 // Taken from GDC source tree. Original by David Friedman.
3ebc136702dd [svn r325] Removed dead code. ChristianK parents: 302 diff changeset	2 // Released under the Artistic License found in dmd/artistic.txt
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	3
751 dc8b8b7ea0c1 Fix compile-time warnings. Adjust include in d-asm-i386. Christian Kamm <kamm incasoftware de> parents: 468 diff changeset	4 #include "id.h"
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	5
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	6 namespace AsmParserx8632
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	7 {
756 a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	8
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	9 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	10 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	11 Reg_Invalid = -1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	12 Reg_EAX = 0,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	13 Reg_EBX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	14 Reg_ECX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	15 Reg_EDX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	16 Reg_ESI,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	17 Reg_EDI,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	18 Reg_EBP,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	19 Reg_ESP,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	20 Reg_ST,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	21 Reg_ST1, Reg_ST2, Reg_ST3, Reg_ST4, Reg_ST5, Reg_ST6, Reg_ST7,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	22 Reg_MM0, Reg_MM1, Reg_MM2, Reg_MM3, Reg_MM4, Reg_MM5, Reg_MM6, Reg_MM7,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	23 Reg_XMM0, Reg_XMM1, Reg_XMM2, Reg_XMM3, Reg_XMM4, Reg_XMM5, Reg_XMM6, Reg_XMM7,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	24 // xmm8-15?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	25 Reg_EFLAGS,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	26 Reg_CS,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	27 Reg_DS,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	28 Reg_SS,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	29 Reg_ES,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	30 Reg_FS,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	31 Reg_GS,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	32 Reg_AX, Reg_BX, Reg_CX, Reg_DX, Reg_SI, Reg_DI, Reg_BP, Reg_SP,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	33 Reg_AL, Reg_AH, Reg_BL, Reg_BH, Reg_CL, Reg_CH, Reg_DL, Reg_DH,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	34 Reg_CR0, Reg_CR2, Reg_CR3, Reg_CR4,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	35 Reg_DR0, Reg_DR1, Reg_DR2, Reg_DR3, Reg_DR6, Reg_DR7,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	36 Reg_TR3, Reg_TR4, Reg_TR5, Reg_TR6, Reg_TR7
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	37 } Reg;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	38
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	39 static const int N_Regs = /gp/ 8 + /fp/ 8 + /mmx/ 8 + /sse/ 8 +
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	40 /seg/ 6 + /16bit/ 8 + /8bit/ 8 + /sys/ 4+6+5 + /flags/ + 1;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	41
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	42 #define NULL_TREE ""
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	43
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	44 static struct
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	45 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	46 const char * name;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	47 std::string gccName; // GAS will take upper case, but GCC won't (needed for the clobber list)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	48 Identifier * ident;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	49 char size;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	50 char baseReg; // %% todo: Reg, Reg_XX
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	51 } regInfo[N_Regs] =
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	52 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	53 { "EAX", NULL_TREE, NULL, 4, Reg_EAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	54 { "EBX", NULL_TREE, NULL, 4, Reg_EBX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	55 { "ECX", NULL_TREE, NULL, 4, Reg_ECX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	56 { "EDX", NULL_TREE, NULL, 4, Reg_EDX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	57 { "ESI", NULL_TREE, NULL, 4, Reg_ESI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	58 { "EDI", NULL_TREE, NULL, 4, Reg_EDI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	59 { "EBP", NULL_TREE, NULL, 4, Reg_EBP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	60 { "ESP", NULL_TREE, NULL, 4, Reg_ESP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	61 { "ST", NULL_TREE, NULL, 10, Reg_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	62 { "ST(1)", NULL_TREE, NULL,10, Reg_ST1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	63 { "ST(2)", NULL_TREE, NULL,10, Reg_ST2 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	64 { "ST(3)", NULL_TREE, NULL,10, Reg_ST3 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	65 { "ST(4)", NULL_TREE, NULL,10, Reg_ST4 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	66 { "ST(5)", NULL_TREE, NULL,10, Reg_ST5 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	67 { "ST(6)", NULL_TREE, NULL,10, Reg_ST6 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	68 { "ST(7)", NULL_TREE, NULL,10, Reg_ST7 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	69 { "MM0", NULL_TREE, NULL, 8, Reg_MM0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	70 { "MM1", NULL_TREE, NULL, 8, Reg_MM1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	71 { "MM2", NULL_TREE, NULL, 8, Reg_MM2 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	72 { "MM3", NULL_TREE, NULL, 8, Reg_MM3 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	73 { "MM4", NULL_TREE, NULL, 8, Reg_MM4 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	74 { "MM5", NULL_TREE, NULL, 8, Reg_MM5 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	75 { "MM6", NULL_TREE, NULL, 8, Reg_MM6 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	76 { "MM7", NULL_TREE, NULL, 8, Reg_MM7 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	77 { "XMM0", NULL_TREE, NULL, 16, Reg_XMM0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	78 { "XMM1", NULL_TREE, NULL, 16, Reg_XMM1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	79 { "XMM2", NULL_TREE, NULL, 16, Reg_XMM2 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	80 { "XMM3", NULL_TREE, NULL, 16, Reg_XMM3 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	81 { "XMM4", NULL_TREE, NULL, 16, Reg_XMM4 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	82 { "XMM5", NULL_TREE, NULL, 16, Reg_XMM5 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	83 { "XMM6", NULL_TREE, NULL, 16, Reg_XMM6 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	84 { "XMM7", NULL_TREE, NULL, 16, Reg_XMM7 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	85 { "FLAGS", NULL_TREE, NULL, 0, Reg_EFLAGS }, // the gcc name is "flags"; not used in assembler input
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	86 { "CS", NULL_TREE, NULL, 2, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	87 { "DS", NULL_TREE, NULL, 2, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	88 { "SS", NULL_TREE, NULL, 2, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	89 { "ES", NULL_TREE, NULL, 2, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	90 { "FS", NULL_TREE, NULL, 2, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	91 { "GS", NULL_TREE, NULL, 2, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	92 { "AX", NULL_TREE, NULL, 2, Reg_EAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	93 { "BX", NULL_TREE, NULL, 2, Reg_EBX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	94 { "CX", NULL_TREE, NULL, 2, Reg_ECX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	95 { "DX", NULL_TREE, NULL, 2, Reg_EDX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	96 { "SI", NULL_TREE, NULL, 2, Reg_ESI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	97 { "DI", NULL_TREE, NULL, 2, Reg_EDI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	98 { "BP", NULL_TREE, NULL, 2, Reg_EBP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	99 { "SP", NULL_TREE, NULL, 2, Reg_ESP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	100 { "AL", NULL_TREE, NULL, 1, Reg_EAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	101 { "AH", NULL_TREE, NULL, 1, Reg_EAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	102 { "BL", NULL_TREE, NULL, 1, Reg_EBX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	103 { "BH", NULL_TREE, NULL, 1, Reg_EBX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	104 { "CL", NULL_TREE, NULL, 1, Reg_ECX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	105 { "CH", NULL_TREE, NULL, 1, Reg_ECX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	106 { "DL", NULL_TREE, NULL, 1, Reg_EDX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	107 { "DH", NULL_TREE, NULL, 1, Reg_EDX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	108 { "CR0", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	109 { "CR2", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	110 { "CR3", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	111 { "CR4", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	112 { "DR0", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	113 { "DR1", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	114 { "DR2", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	115 { "DR3", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	116 { "DR6", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	117 { "DR7", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	118 { "TR3", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	119 { "TR4", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	120 { "TR5", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	121 { "TR6", NULL_TREE, NULL, 0, -1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	122 { "TR7", NULL_TREE, NULL, 0, -1 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	123 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	124
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	125 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	126 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	127 No_Type_Needed,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	128 Int_Types,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	129 Word_Types, // same as Int_Types, but byte is not allowed
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	130 FP_Types,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	131 FPInt_Types,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	132 Byte_NoType, // byte only, but no type suffix
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	133 } TypeNeeded;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	134
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	135 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	136 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	137 No_Link,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	138 Out_Mnemonic,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	139 Next_Form
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	140 } OpLink;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	141
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	142 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	143 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	144 Clb_SizeAX = 0x01,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	145 Clb_SizeDXAX = 0x02,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	146 Clb_EAX = 0x03,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	147 Clb_DXAX_Mask = 0x03,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	148
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	149 Clb_Flags = 0x04,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	150 Clb_DI = 0x08,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	151 Clb_SI = 0x10,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	152 Clb_CX = 0x20,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	153 Clb_ST = 0x40,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	154 Clb_SP = 0x80 // Doesn't actually let GCC know the frame pointer is modified
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	155 } ImplicitClober;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	156
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	157 // "^ +/..$[A-Za-z_0-9]+$.*" -> " \1,"
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	158 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	159 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	160 Op_Invalid,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	161 Op_Adjust,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	162 Op_Dst,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	163 Op_Upd,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	164 Op_DstW,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	165 Op_DstF,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	166 Op_UpdF,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	167 Op_DstSrc,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	168 Op_DstSrcF,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	169 Op_UpdSrcF,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	170 Op_DstSrcFW,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	171 Op_UpdSrcFW,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	172 Op_DstSrcSSE,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	173 Op_DstSrcMMX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	174 Op_DstSrcImmS,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	175 Op_DstSrcImmM,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	176 Op_UpdSrcShft,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	177 Op_DstSrcNT,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	178 Op_UpdSrcNT,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	179 Op_DstMemNT,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	180 Op_DstRMBNT,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	181 Op_DstRMWNT,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	182 Op_UpdUpd,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	183 Op_UpdUpdF,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	184 Op_Src,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	185 Op_SrcRMWNT,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	186 Op_SrcW,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	187 Op_SrcImm,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	188 Op_Src_DXAXF,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	189 Op_SrcMemNT,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	190 Op_SrcMemNTF,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	191 Op_SrcSrc,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	192 Op_SrcSrcF,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	193 Op_SrcSrcFW,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	194 Op_SrcSrcSSEF,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	195 Op_SrcSrcMMX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	196 Op_Shift,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	197 Op_Branch,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	198 Op_CBranch,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	199 Op_0,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	200 Op_0_AX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	201 Op_0_DXAX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	202 Op_Loop,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	203 Op_Flags,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	204 Op_F0_ST,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	205 Op_F0_P,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	206 Op_Fs_P,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	207 Op_Fis,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	208 Op_Fis_ST,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	209 Op_Fis_P,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	210 Op_Fid,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	211 Op_Fid_P,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	212 Op_Ffd,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	213 Op_FfdR,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	214 Op_Ffd_P,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	215 Op_FfdR_P,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	216 Op_Fd_P,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	217 Op_FdST,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	218 Op_FMath,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	219 Op_FdSTiSTi,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	220 Op_FPMath,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	221 Op_FCmp,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	222 Op_FCmp1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	223 Op_FCmpP,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	224 Op_FCmpP1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	225 Op_FCmpFlg,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	226 Op_FCmpFlgP,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	227 Op_fld,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	228 Op_fldR,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	229 Op_fxch,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	230 Op_fxch1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	231 Op_fxch0,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	232 Op_SizedStack,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	233 Op_bound,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	234 Op_bswap,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	235 Op_cmps,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	236 Op_cmpsd,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	237 Op_cmpsX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	238 Op_cmpxchg8b,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	239 Op_cmpxchg,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	240 Op_cpuid,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	241 Op_enter,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	242 Op_fdisi,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	243 Op_feni,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	244 Op_fsetpm,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	245 Op_fXstsw,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	246 Op_imul,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	247 Op_imul2,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	248 Op_imul1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	249 Op_in,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	250 Op_ins,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	251 Op_insX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	252 Op_iret,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	253 Op_iretd,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	254 Op_lods,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	255 Op_lodsX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	256 Op_movs,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	257 Op_movsd,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	258 Op_movsX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	259 Op_movsx,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	260 Op_movzx,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	261 Op_mul,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	262 Op_out,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	263 Op_outs,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	264 Op_outsX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	265 Op_push,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	266 Op_ret,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	267 Op_retf,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	268 Op_scas,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	269 Op_scasX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	270 Op_stos,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	271 Op_stosX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	272 Op_xlat,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	273 N_AsmOpInfo,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	274 Op_Align,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	275 Op_Even,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	276 Op_Naked,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	277 Op_db,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	278 Op_ds,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	279 Op_di,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	280 Op_dl,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	281 Op_df,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	282 Op_dd,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	283 Op_de
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	284 } AsmOp;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	285
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	286 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	287 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	288 Opr_None = 0,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	289 OprC_MRI = 1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	290 OprC_MR = 2,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	291 OprC_Mem = 3,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	292 OprC_Reg = 4,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	293 OprC_Imm = 5,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	294 OprC_SSE = 6,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	295 OprC_SSE_Mem = 7,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	296 OprC_R32 = 8,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	297 OprC_RWord = 9,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	298 OprC_RFP = 10,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	299 OprC_AbsRel = 11,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	300 OprC_Relative = 12,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	301 OprC_Port = 13, // DX or imm
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	302 OprC_AX = 14, // AL,AX,EAX
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	303 OprC_DX = 15, // only DX
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	304 OprC_MMX = 16,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	305 OprC_MMX_Mem = 17,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	306 OprC_Shift = 18, // imm or CL
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	307
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	308 Opr_ClassMask = 0x1f,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	309
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	310 Opr_Dest = 0x20,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	311 Opr_Update = 0x60,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	312
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	313 Opr_NoType = 0x80,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	314 } OprVals;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	315
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	316
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	317 typedef struct
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	318 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	319 } AsmOprInfo;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	320
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	321 typedef unsigned char Opr;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	322
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	323 typedef struct
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	324 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	325 Opr operands[3];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	326 unsigned char
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	327 needsType : 3,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	328 implicitClobbers : 8,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	329 linkType : 2;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	330 unsigned link;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	331
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	332 /*
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	333 bool takesLabel() {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	334 return operands[0] & Opr_Label;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	335 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	336 */
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	337
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	338 unsigned nOperands()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	339 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	340 if ( !operands[0] )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	341 return 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	342 else if ( !operands[1] )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	343 return 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	344 else if ( !operands[2] )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	345 return 2;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	346 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	347 return 3;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	348 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	349 } AsmOpInfo;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	350
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	351 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	352 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	353 Mn_fdisi,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	354 Mn_feni,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	355 Mn_fsetpm,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	356 Mn_iretw,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	357 Mn_iret,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	358 Mn_lret,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	359 Mn_cmpxchg8b,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	360 N_AltMn
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	361 } Alternate_Mnemonics;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	362
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	363 static const char * alternateMnemonics[N_AltMn] =
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	364 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	365 ".byte 0xdb, 0xe1",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	366 ".byte 0xdb, 0xe0",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	367 ".byte 0xdb, 0xe4",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	368 "iretw",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	369 "iret",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	370 "lret",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	371 "cmpxchg8b"
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	372 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	373
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	374 #define mri OprC_MRI
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	375 #define mr OprC_MR
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	376 #define mem OprC_Mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	377 // for now mfp=mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	378 #define mfp OprC_Mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	379 #define reg OprC_Reg
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	380 #define imm OprC_Imm
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	381 #define sse OprC_SSE
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	382 #define ssem OprC_SSE_Mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	383 #define mmx OprC_MMX
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	384 #define mmxm OprC_MMX_Mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	385 #define r32 OprC_R32
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	386 #define rw OprC_RWord
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	387 #define rfp OprC_RFP
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	388 #define port OprC_Port
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	389 #define ax OprC_AX
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	390 #define dx OprC_DX
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	391 #define shft OprC_Shift
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	392 #define D Opr_Dest
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	393 #define U Opr_Update
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	394 #define N Opr_NoType
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	395 //#define L Opr_Label
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	396
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	397 // D=dest, N=notype
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	398 static AsmOpInfo asmOpInfo[N_AsmOpInfo] =
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	399 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	400 /* Op_Invalid */ {},
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	401 /* Op_Adjust / { 0,0,0, 0, Clb_EAX /just AX*/ },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	402 /* Op_Dst */ { D\|mr, 0, 0, 1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	403 /* Op_Upd */ { U\|mr, 0, 0, 1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	404 /* Op_DstW */ { D\|mr, 0, 0, Word_Types },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	405 /* Op_DstF */ { D\|mr, 0, 0, 1, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	406 /* Op_UpdF */ { U\|mr, 0, 0, 1, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	407 /* Op_DstSrc / { D\|mr, mri, 0,/*/1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	408 /* Op_DstSrcF / { D\|mr, mri, 0,/*/1, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	409 /* Op_UpdSrcF / { U\|mr, mri, 0,/*/1, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	410 /* Op_DstSrcFW / { D\|mr, mri, 0,/*/Word_Types, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	411 /* Op_UpdSrcFW / { U\|mr, mri, 0,/*/Word_Types, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	412 /* Op_DstSrcSSE */ { U\|sse, ssem, 0 }, // some may not be update %%
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	413 /* Op_DstSrcMMX */ { U\|mmx, mmxm, 0 }, // some may not be update %%
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	414 /* Op_DstSrcImmS*/ { U\|sse, ssem, N\|imm }, // some may not be update %%
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	415 /* Op_DstSrcImmM*/ { U\|mmx, mmxm, N\|imm }, // some may not be update %%
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	416 /* Op_UpdSrcShft*/ { U\|mr, reg, N\|shft, 1, Clb_Flags }, // 16/32 only
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	417 /* Op_DstSrcNT */ { D\|mr, mr, 0, 0 }, // used for movd .. operands can be rm32,sse,mmx
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	418 /* Op_UpdSrcNT */ { U\|mr, mr, 0, 0 }, // used for movd .. operands can be rm32,sse,mmx
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	419 /* Op_DstMemNT */ { D\|mem, 0, 0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	420 /* Op_DstRMBNT */ { D\|mr, 0, 0, Byte_NoType },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	421 /* Op_DstRMWNT */ { D\|mr, 0, 0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	422 /* Op_UpdUpd / { U\|mr,U\|mr, 0,/*/1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	423 /* Op_UpdUpdF / { U\|mr,U\|mr, 0,/*/1, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	424 /* Op_Src */ { mri, 0, 0, 1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	425 /* Op_SrcRMWNT */ { mr, 0, 0, 0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	426 /* Op_SrcW */ { mri, 0, 0, Word_Types },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	427 /* Op_SrcImm */ { imm },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	428 /* Op_Src_DXAXF */ { mr, 0, 0, 1, Clb_SizeDXAX\|Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	429 /* Op_SrcMemNT */ { mem, 0, 0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	430 /* Op_SrcMemNTF */ { mem, 0, 0, 0, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	431 /* Op_SrcSrc */ { mr, mri, 0, 1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	432 /* Op_SrcSrcF */ { mr, mri, 0, 1, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	433 /* Op_SrcSrcFW */ { mr, mri, 0, Word_Types, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	434 /* Op_SrcSrcSSEF*/ { sse, ssem, 0, 0, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	435 /* Op_SrcSrcMMX */ { mmx, mmx, 0, },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	436 /* Op_Shift / { D\|mr,N\|shft, 0,/*/1, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	437 /* Op_Branch */ { mri },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	438 /* Op_CBranch */ { imm },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	439 /* Op_0 */ { 0,0,0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	440 /* Op_0_AX */ { 0,0,0, 0, Clb_SizeAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	441 /* Op_0_DXAX */ { 0,0,0, 0, Clb_SizeDXAX }, // but for cwd/cdq -- how do know the size..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	442 /* Op_Loop */ { imm, 0, 0, 0, Clb_CX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	443 /* Op_Flags */ { 0,0,0, 0, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	444 /* Op_F0_ST */ { 0,0,0, 0, Clb_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	445 /* Op_F0_P */ { 0,0,0, 0, Clb_ST }, // push, pops, etc. not sure how to inform gcc..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	446 /* Op_Fs_P */ { mem, 0, 0, 0, Clb_ST }, // "
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	447 /* Op_Fis */ { mem, 0, 0, FPInt_Types }, // only 16bit and 32bit, DMD defaults to 16bit
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	448 /* Op_Fis_ST */ { mem, 0, 0, FPInt_Types, Clb_ST }, // "
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	449 /* Op_Fis_P */ { mem, 0, 0, FPInt_Types, Clb_ST }, // push and pop, fild so also 64 bit
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	450 /* Op_Fid */ { D\|mem, 0, 0, FPInt_Types }, // only 16bit and 32bit, DMD defaults to 16bit
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	451 /* Op_Fid_P */ { D\|mem, 0, 0, FPInt_Types, Clb_ST }, // push and pop, fild so also 64 bit
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	452 /* Op_Ffd */ { D\|mfp, 0, 0, FP_Types, 0, Next_Form, Op_FfdR }, // only 16bit and 32bit, DMD defaults to 16bit, reg form doesn't need type
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	453 /* Op_FfdR */ { D\|rfp, 0, 0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	454 /* Op_Ffd_P */ { D\|mfp, 0, 0, FP_Types, Clb_ST, Next_Form, Op_FfdR_P, }, // pop, fld so also 80 bit, "
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	455 /* Op_FfdR_P */ { D\|rfp, 0, 0, 0, Clb_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	456 /* Op_Fd_P */ { D\|mem, 0, 0, 0, Clb_ST }, // "
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	457 /* Op_FdST */ { D\|rfp, 0, 0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	458 /* Op_FMath */ { mfp, 0, 0, FP_Types, Clb_ST, Next_Form, Op_FdSTiSTi }, // and only single or double prec
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	459 /* Op_FdSTiSTi */ { D\|rfp, rfp, 0, },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	460 /* Op_FPMath */ { D\|rfp, rfp, 0, 0, Clb_ST, Next_Form, Op_F0_P }, // pops
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	461 /* Op_FCmp */ { mfp, 0, 0, FP_Types, 0, Next_Form, Op_FCmp1 }, // DMD defaults to float ptr
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	462 /* Op_FCmp1 */ { rfp, 0, 0, 0, 0, Next_Form, Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	463 /* Op_FCmpP */ { mfp, 0, 0, FP_Types, 0, Next_Form, Op_FCmpP1 }, // pops
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	464 /* Op_FCmpP1 */ { rfp, 0, 0, 0, 0, Next_Form, Op_F0_P }, // pops
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	465 /* Op_FCmpFlg */ { rfp, rfp, 0, 0, Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	466 /* Op_FCmpFlgP */ { rfp, rfp, 0, 0, Clb_Flags }, // pops
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	467 /* Op_fld */ { mfp, 0, 0, FP_Types, Clb_ST, Next_Form, Op_fldR },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	468 /* Op_fldR */ { rfp, 0, 0, 0, Clb_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	469 /* Op_fxch */ { D\|rfp,D\|rfp, 0, 0, Clb_ST, Next_Form, Op_fxch1 }, // not in intel manual?, but DMD allows it (gas won't), second arg must be ST
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	470 /* Op_fxch1 */ { D\|rfp, 0, 0, 0, Clb_ST, Next_Form, Op_fxch0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	471 /* Op_fxch0 */ { 0, 0, 0, 0, Clb_ST }, // Also clobbers ST(1)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	472 /* Op_SizedStack*/ { 0, 0, 0, 0, Clb_SP }, // type suffix special case
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	473 /* Op_bound / { mr, mri, 0, Word_Types }, // operands not* reversed for gas
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	474 /* Op_bswap */ { D\|r32 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	475 /* Op_cmps */ { mem, mem, 0, 1, Clb_DI\|Clb_SI\|Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	476 /* Op_cmpsd */ { 0, 0, 0, 0, Clb_DI\|Clb_SI\|Clb_Flags, Next_Form, Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	477 /* Op_cmpsX */ { 0, 0, 0, 0, Clb_DI\|Clb_SI\|Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	478 /* Op_cmpxchg8b / { D\|mem/64/,0,0, 0, Clb_SizeDXAX/32*/\|Clb_Flags, Out_Mnemonic, Mn_cmpxchg8b },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	479 /* Op_cmpxchg */ { D\|mr, reg, 0, 1, Clb_SizeAX\|Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	480 /* Op_cpuid */ { 0,0,0 }, // Clobbers eax, ebx, ecx, and edx. Handled specially below.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	481 /* Op_enter / { imm, imm }, // operands not* reversed for gas, %% inform gcc of EBP clobber?,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	482 /* Op_fdisi */ { 0,0,0, 0, 0, Out_Mnemonic, Mn_fdisi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	483 /* Op_feni */ { 0,0,0, 0, 0, Out_Mnemonic, Mn_feni },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	484 /* Op_fsetpm */ { 0,0,0, 0, 0, Out_Mnemonic, Mn_fsetpm },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	485 /* Op_fXstsw */ { D\|mr, 0, 0, }, // ax is the only allowed register
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	486 /* Op_imul */ { D\|reg, mr, imm, 1, Clb_Flags, Next_Form, Op_imul2 }, // 16/32 only
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	487 /* Op_imul2 */ { D\|reg, mri, 0, 1, Clb_Flags, Next_Form, Op_imul1 }, // 16/32 only
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	488 /* Op_imul1 */ { mr, 0, 0, 1, Clb_Flags\|Clb_SizeDXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	489 /* Op_in */ { D\|ax,N\|port,0, 1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	490 /* Op_ins */ { mem,N\|dx, 0, 1, Clb_DI }, // can't override ES segment for this one
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	491 /* Op_insX */ { 0, 0, 0, 0, Clb_DI }, // output segment overrides %% needs work
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	492 /* Op_iret */ { 0,0,0, 0, 0, Out_Mnemonic, Mn_iretw },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	493 /* Op_iretd */ { 0,0,0, 0, 0, Out_Mnemonic, Mn_iret },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	494 /* Op_lods */ { mem, 0, 0, 1, Clb_SI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	495 /* Op_lodsX */ { 0, 0, 0, 0, Clb_SI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	496 /* Op_movs */ { mem, mem, 0, 1, Clb_DI\|Clb_SI }, // only src/DS can be overridden
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	497 /* Op_movsd */ { 0, 0, 0, 0, Clb_DI\|Clb_SI, Next_Form, Op_DstSrcSSE }, // %% gas doesn't accept movsd .. has to movsl
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	498 /* Op_movsX */ { 0, 0, 0, 0, Clb_DI\|Clb_SI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	499 /* Op_movsx */ { D\|reg, mr, 0, 1 }, // type suffix is special case
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	500 /* Op_movzx */ { D\|reg, mr, 0, 1 }, // type suffix is special case
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	501 /* Op_mul */ { U\|ax, mr, 0, 1, Clb_SizeDXAX\|Clb_Flags, Next_Form, Op_Src_DXAXF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	502 /* Op_out */ { N\|port,ax, 0, 1 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	503 /* Op_outs */ { N\|dx, mem, 0, 1, Clb_SI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	504 /* Op_outsX */ { 0, 0, 0, 0, Clb_SI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	505 /* Op_push */ { mri, 0, 0, Word_Types, Clb_SP }, // would be Op_SrcW, but DMD defaults to 32-bit for immediate form
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	506 /* Op_ret */ { imm, 0, 0, 0, 0, Next_Form, Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	507 /* Op_retf */ { 0, 0, 0, 0, 0, Out_Mnemonic, Mn_lret },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	508 /* Op_scas */ { mem, 0, 0, 1, Clb_DI\|Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	509 /* Op_scasX */ { 0, 0, 0, 0, Clb_DI\|Clb_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	510 /* Op_stos */ { mem, 0, 0, 1, Clb_DI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	511 /* Op_stosX */ { 0, 0, 0, 0, Clb_DI },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	512 /* Op_xlat */ { mem, 0, 0, 0, Clb_SizeAX }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	513
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	514 /// * Op_arpl */ { D\|mr, reg }, // 16 only -> DstSrc
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	515 /// * Op_bsX */ { rw, mrw, 0, 1, Clb_Flags },//->srcsrcf
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	516 /// * Op_bt */ { mrw, riw, 0, 1, Clb_Flags },//->srcsrcf
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	517 /// * Op_btX */ { D\|mrw, riw, 0, 1, Clb_Flags },//->dstsrcf .. immediate does not contribute to size
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	518 /// * Op_cmovCC */ { D\|rw, mrw, 0, 1 } // ->dstsrc
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	519 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	520
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	521 #undef mri
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	522 #undef mr
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	523 #undef mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	524 #undef mfp
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	525 #undef reg
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	526 #undef imm
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	527 #undef sse
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	528 #undef ssem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	529 #undef mmx
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	530 #undef mmxm
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	531 #undef r32
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	532 #undef rw
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	533 #undef rfp
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	534 #undef port
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	535 #undef ax
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	536 #undef dx
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	537 #undef shft
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	538 #undef D
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	539 #undef U
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	540 #undef N
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	541 //#undef L
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	542
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	543 typedef struct
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	544 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	545 const char * inMnemonic;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	546 AsmOp asmOp;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	547 } AsmOpEnt;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	548
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	549 /* Some opcodes which have data size restrictions, but we don't check
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	550
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	551 cmov, l<segreg> ?, lea, lsl, shld
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	552
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	553 todo: push <immediate> is always the 32-bit form, even tho push <mem> is 16-bit
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	554 */
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	555
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	556 static AsmOpEnt opData[] =
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	557 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	558 { "aaa", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	559 { "aad", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	560 { "aam", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	561 { "aas", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	562 { "adc", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	563 { "add", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	564 { "addpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	565 { "addps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	566 { "addsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	567 { "addss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	568 { "addsubpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	569 { "addsubps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	570 { "align", Op_Align },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	571 { "and", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	572 { "andnpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	573 { "andnps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	574 { "andpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	575 { "andps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	576 { "arpl", Op_UpdSrcNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	577 { "bound", Op_bound },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	578 { "bsf", Op_SrcSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	579 { "bsr", Op_SrcSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	580 { "bswap", Op_bswap },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	581 { "bt", Op_SrcSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	582 { "btc", Op_UpdSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	583 { "btr", Op_UpdSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	584 { "bts", Op_UpdSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	585 { "call", Op_Branch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	586 { "cbw", Op_0_AX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	587 { "cdq", Op_0_DXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	588 { "clc", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	589 { "cld", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	590 { "clflush",Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	591 { "cli", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	592 { "clts", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	593 { "cmc", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	594 { "cmova", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	595 { "cmovae", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	596 { "cmovb", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	597 { "cmovbe", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	598 { "cmovc", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	599 { "cmove", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	600 { "cmovg", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	601 { "cmovge", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	602 { "cmovl", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	603 { "cmovle", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	604 { "cmovna", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	605 { "cmovnae",Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	606 { "cmovnb", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	607 { "cmovnbe",Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	608 { "cmovnc", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	609 { "cmovne", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	610 { "cmovng", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	611 { "cmovnge",Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	612 { "cmovnl", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	613 { "cmovnle",Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	614 { "cmovno", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	615 { "cmovnp", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	616 { "cmovns", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	617 { "cmovnz", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	618 { "cmovo", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	619 { "cmovp", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	620 { "cmovpe", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	621 { "cmovpo", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	622 { "cmovs", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	623 { "cmovz", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	624 { "cmp", Op_SrcSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	625 { "cmppd", Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	626 { "cmpps", Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	627 { "cmps", Op_cmps },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	628 { "cmpsb", Op_cmpsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	629 { "cmpsd", Op_cmpsd }, // string cmp, and SSE cmp
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	630 { "cmpss", Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	631 { "cmpsw", Op_cmpsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	632 { "cmpxch8b", Op_cmpxchg8b }, // %% DMD opcode typo?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	633 { "cmpxchg", Op_cmpxchg },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	634 { "comisd", Op_SrcSrcSSEF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	635 { "comiss", Op_SrcSrcSSEF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	636 { "cpuid", Op_cpuid },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	637 { "cvtdq2pd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	638 { "cvtdq2ps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	639 { "cvtpd2dq", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	640 { "cvtpd2pi", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	641 { "cvtpd2ps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	642 { "cvtpi2pd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	643 { "cvtpi2ps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	644 { "cvtps2dq", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	645 { "cvtps2pd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	646 { "cvtps2pi", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	647 { "cvtsd2si", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	648 { "cvtsd2ss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	649 { "cvtsi2sd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	650 { "cvtsi2ss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	651 { "cvtss2sd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	652 { "cvtss2si", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	653 { "cvttpd2dq", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	654 { "cvttpd2pi", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	655 { "cvttps2dq", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	656 { "cvttps2pi", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	657 { "cvttsd2si", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	658 { "cvttss2si", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	659 { "cwd", Op_0_DXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	660 { "cwde", Op_0_AX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	661 //{ "da", Op_ },// dunno what this is -- takes labels?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	662 { "daa", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	663 { "das", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	664 { "db", Op_db },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	665 { "dd", Op_dd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	666 { "de", Op_de },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	667 { "dec", Op_UpdF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	668 { "df", Op_df },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	669 { "di", Op_di },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	670 { "div", Op_Src_DXAXF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	671 { "divpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	672 { "divps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	673 { "divsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	674 { "divss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	675 { "dl", Op_dl },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	676 { "dq", Op_dl },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	677 { "ds", Op_ds },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	678 { "dt", Op_de },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	679 { "dw", Op_ds },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	680 { "emms", Op_0 }, // clobber all mmx/fp?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	681 { "enter", Op_enter },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	682 { "even", Op_Even },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	683 { "f2xm1", Op_F0_ST }, // %% most of these are update...
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	684 { "fabs", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	685 { "fadd", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	686 { "faddp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	687 { "fbld", Op_Fs_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	688 { "fbstp", Op_Fd_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	689 { "fchs", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	690 { "fclex", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	691 { "fcmovb", Op_FdSTiSTi }, // but only ST(0) can be the destination -- should be FdST0STi
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	692 { "fcmovbe", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	693 { "fcmove", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	694 { "fcmovnb", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	695 { "fcmovnbe", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	696 { "fcmovne", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	697 { "fcmovnu", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	698 { "fcmovu", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	699 { "fcom", Op_FCmp },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	700 { "fcomi", Op_FCmpFlg },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	701 { "fcomip", Op_FCmpFlgP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	702 { "fcomp", Op_FCmpP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	703 { "fcompp", Op_F0_P }, // pops twice
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	704 { "fcos", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	705 { "fdecstp",Op_F0_P }, // changes stack
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	706 { "fdisi", Op_fdisi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	707 { "fdiv", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	708 { "fdivp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	709 { "fdivr", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	710 { "fdivrp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	711 { "feni", Op_feni },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	712 { "ffree", Op_FdST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	713 { "fiadd", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	714 { "ficom", Op_Fis },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	715 { "ficomp", Op_Fis_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	716 { "fidiv", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	717 { "fidivr", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	718 { "fild", Op_Fis_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	719 { "fimul", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	720 { "fincstp",Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	721 { "finit", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	722 { "fist", Op_Fid }, // only 16,32bit
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	723 { "fistp", Op_Fid_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	724 { "fisttp", Op_Fid_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	725 { "fisub", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	726 { "fisubr", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	727 { "fld", Op_fld },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	728 { "fld1", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	729 { "fldcw", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	730 { "fldenv", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	731 { "fldl2e", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	732 { "fldl2t", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	733 { "fldlg2", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	734 { "fldln2", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	735 { "fldpi", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	736 { "fldz", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	737 { "fmul", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	738 { "fmulp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	739 { "fnclex", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	740 { "fndisi", Op_fdisi }, // ??
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	741 { "fneni", Op_feni }, // ??
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	742 { "fninit", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	743 { "fnop", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	744 { "fnsave", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	745 { "fnstcw", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	746 { "fnstenv",Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	747 { "fnstsw", Op_fXstsw },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	748 { "fpatan", Op_F0_P }, // pop and modify new ST
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	749 { "fprem", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	750 { "fprem1", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	751 { "fptan", Op_F0_P }, // modify ST and push 1.0
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	752 { "frndint",Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	753 { "frstor", Op_SrcMemNT }, // but clobbers everything
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	754 { "fsave", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	755 { "fscale", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	756 { "fsetpm", Op_fsetpm },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	757 { "fsin", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	758 { "fsincos",Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	759 { "fsqrt", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	760 { "fst", Op_Ffd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	761 { "fstcw", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	762 { "fstenv", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	763 { "fstp", Op_Ffd_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	764 { "fstsw", Op_fXstsw },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	765 { "fsub", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	766 { "fsubp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	767 { "fsubr", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	768 { "fsubrp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	769 { "ftst", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	770 { "fucom", Op_FCmp },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	771 { "fucomi", Op_FCmpFlg },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	772 { "fucomip",Op_FCmpFlgP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	773 { "fucomp", Op_FCmpP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	774 { "fucompp",Op_F0_P }, // pops twice
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	775 { "fwait", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	776 { "fxam", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	777 { "fxch", Op_fxch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	778 { "fxrstor",Op_SrcMemNT }, // clobbers FP,MMX,SSE
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	779 { "fxsave", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	780 { "fxtract",Op_F0_P }, // pushes
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	781 { "fyl2x", Op_F0_P }, // pops
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	782 { "fyl2xp1",Op_F0_P }, // pops
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	783 { "haddpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	784 { "haddps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	785 { "hlt", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	786 { "hsubpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	787 { "hsubps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	788 { "idiv", Op_Src_DXAXF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	789 { "imul", Op_imul },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	790 { "in", Op_in },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	791 { "inc", Op_UpdF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	792 { "ins", Op_ins },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	793 { "insb", Op_insX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	794 { "insd", Op_insX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	795 { "insw", Op_insX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	796 { "int", Op_SrcImm },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	797 { "into", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	798 { "invd", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	799 { "invlpg", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	800 { "iret", Op_iret },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	801 { "iretd", Op_iretd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	802 { "ja", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	803 { "jae", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	804 { "jb", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	805 { "jbe", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	806 { "jc", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	807 { "jcxz", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	808 { "je", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	809 { "jecxz", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	810 { "jg", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	811 { "jge", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	812 { "jl", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	813 { "jle", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	814 { "jmp", Op_Branch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	815 { "jna", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	816 { "jnae", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	817 { "jnb", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	818 { "jnbe", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	819 { "jnc", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	820 { "jne", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	821 { "jng", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	822 { "jnge", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	823 { "jnl", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	824 { "jnle", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	825 { "jno", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	826 { "jnp", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	827 { "jns", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	828 { "jnz", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	829 { "jo", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	830 { "jp", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	831 { "jpe", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	832 { "jpo", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	833 { "js", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	834 { "jz", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	835 { "lahf", Op_0_AX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	836 { "lar", Op_DstSrcFW }, // reg dest only
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	837 { "lddqu", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	838 { "ldmxcsr", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	839 { "lds", Op_DstSrc }, // reg dest only
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	840 { "lea", Op_DstSrc }, // "
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	841 { "leave", Op_0 }, // EBP,ESP clobbers
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	842 { "les", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	843 { "lfence",Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	844 { "lfs", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	845 { "lgdt", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	846 { "lgs", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	847 { "lidt", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	848 { "lldt", Op_SrcRMWNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	849 { "lmsw", Op_SrcRMWNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	850 { "lock", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	851 { "lods", Op_lods },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	852 { "lodsb", Op_lodsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	853 { "lodsd", Op_lodsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	854 { "lodsw", Op_lodsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	855 { "loop", Op_Loop },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	856 { "loope", Op_Loop },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	857 { "loopne",Op_Loop },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	858 { "loopnz",Op_Loop },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	859 { "loopz", Op_Loop },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	860 { "lsl", Op_DstSrcFW }, // reg dest only
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	861 { "lss", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	862 { "ltr", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	863 { "maskmovdqu", Op_SrcSrcMMX }, // writes to [edi]
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	864 { "maskmovq", Op_SrcSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	865 { "maxpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	866 { "maxps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	867 { "maxsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	868 { "maxss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	869 { "mfence",Op_0},
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	870 { "minpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	871 { "minps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	872 { "minsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	873 { "minss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	874 { "monitor", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	875 { "mov", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	876 { "movapd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	877 { "movaps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	878 { "movd", Op_DstSrcNT }, // also mmx and sse
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	879 { "movddup", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	880 { "movdq2q", Op_DstSrcNT }, // mmx/sse
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	881 { "movdqa", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	882 { "movdqu", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	883 { "movhlps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	884 { "movhpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	885 { "movhps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	886 { "movlhps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	887 { "movlpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	888 { "movlps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	889 { "movmskpd",Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	890 { "movmskps",Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	891 { "movntdq", Op_DstSrcNT }, // limited to sse, but mem dest
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	892 { "movnti", Op_DstSrcNT }, // limited to gpr, but mem dest
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	893 { "movntpd", Op_DstSrcNT }, // limited to sse, but mem dest
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	894 { "movntps", Op_DstSrcNT }, // limited to sse, but mem dest
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	895 { "movntq", Op_DstSrcNT }, // limited to mmx, but mem dest
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	896 { "movq", Op_DstSrcNT }, // limited to sse and mmx
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	897 { "movq2dq", Op_DstSrcNT }, // limited to sse <- mmx regs
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	898 { "movs", Op_movs },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	899 { "movsb", Op_movsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	900 { "movsd", Op_movsd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	901 { "movshdup", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	902 { "movsldup", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	903 { "movss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	904 { "movsw", Op_movsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	905 { "movsx", Op_movsx }, // word-only, reg dest
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	906 { "movupd",Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	907 { "movups",Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	908 { "movzx", Op_movzx },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	909 { "mul", Op_mul },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	910 { "mulpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	911 { "mulps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	912 { "mulsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	913 { "mulss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	914 { "mwait", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	915 { "naked", Op_Naked },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	916 { "neg", Op_UpdF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	917 { "nop", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	918 { "not", Op_Upd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	919 { "or", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	920 { "orpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	921 { "orps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	922 { "out", Op_out },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	923 { "outs", Op_outs },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	924 { "outsb", Op_outsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	925 { "outsd", Op_outsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	926 { "outsw", Op_outsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	927 { "packssdw", Op_DstSrcMMX }, // %% also SSE
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	928 { "packsswb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	929 { "packuswb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	930 { "paddb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	931 { "paddd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	932 { "paddq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	933 { "paddsb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	934 { "paddsw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	935 { "paddusb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	936 { "paddusw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	937 { "paddw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	938 { "pand", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	939 { "pandn", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	940 { "pavgb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	941 { "pavgw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	942 { "pcmpeqb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	943 { "pcmpeqd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	944 { "pcmpeqw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	945 { "pcmpgtb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	946 { "pcmpgtd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	947 { "pcmpgtw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	948 { "pextrw", Op_DstSrcImmM }, // gpr32 dest
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	949 { "pinsrw", Op_DstSrcImmM }, // gpr32(16), mem16 src, sse too
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	950 { "pmaddwd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	951 { "pmaxsw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	952 { "pmaxub", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	953 { "pminsw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	954 { "pminub", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	955 { "pmovmskb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	956 { "pmulhuw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	957 { "pmulhw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	958 { "pmullw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	959 { "pmuludq", Op_DstSrcMMX }, // also sse
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	960 { "pop", Op_DstW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	961 { "popa", Op_SizedStack }, // For intel this is always 16-bit
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	962 { "popad", Op_SizedStack }, // GAS doesn't accept 'popad' -- these clobber everything, but supposedly it would be used to preserve clobbered regs
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	963 { "popf", Op_SizedStack }, // rewrite the insn with a special case
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	964 { "popfd", Op_SizedStack },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	965 { "por", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	966 { "prefetchnta", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	967 { "prefetcht0", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	968 { "prefetcht1", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	969 { "prefetcht2", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	970 { "psadbw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	971 { "pshufd", Op_DstSrcImmM },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	972 { "pshufhw", Op_DstSrcImmM },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	973 { "pshuflw", Op_DstSrcImmM },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	974 { "pshufw", Op_DstSrcImmM },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	975 { "pslld", Op_DstSrcMMX }, // immediate operands...
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	976 { "pslldq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	977 { "psllq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	978 { "psllw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	979 { "psrad", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	980 { "psraw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	981 { "psrld", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	982 { "psrldq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	983 { "psrlq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	984 { "psrlw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	985 { "psubb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	986 { "psubd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	987 { "psubq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	988 { "psubsb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	989 { "psubsw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	990 { "psubusb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	991 { "psubusw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	992 { "psubw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	993 { "punpckhbw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	994 { "punpckhdq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	995 { "punpckhqdq",Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	996 { "punpckhwd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	997 { "punpcklbw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	998 { "punpckldq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	999 { "punpcklqdq",Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1000 { "punpcklwd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1001 { "push", Op_push },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1002 { "pusha", Op_SizedStack },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1003 { "pushad", Op_SizedStack },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1004 { "pushf", Op_SizedStack },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1005 { "pushfd", Op_SizedStack },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1006 { "pxor", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1007 { "rcl", Op_Shift }, // limited src operands -- change to shift
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1008 { "rcpps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1009 { "rcpss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1010 { "rcr", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1011 { "rdmsr", Op_0_DXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1012 { "rdpmc", Op_0_DXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1013 { "rdtsc", Op_0_DXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1014 { "rep", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1015 { "repe", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1016 { "repne", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1017 { "repnz", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1018 { "repz", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1019 { "ret", Op_ret },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1020 { "retf", Op_retf },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1021 { "rol", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1022 { "ror", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1023 { "rsm", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1024 { "rsqrtps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1025 { "rsqrtss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1026 { "sahf", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1027 { "sal", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1028 { "sar", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1029 { "sbb", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1030 { "scas", Op_scas },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1031 { "scasb", Op_scasX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1032 { "scasd", Op_scasX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1033 { "scasw", Op_scasX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1034 { "seta", Op_DstRMBNT }, // also gpr8
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1035 { "setae", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1036 { "setb", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1037 { "setbe", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1038 { "setc", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1039 { "sete", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1040 { "setg", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1041 { "setge", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1042 { "setl", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1043 { "setle", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1044 { "setna", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1045 { "setnae", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1046 { "setnb", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1047 { "setnbe", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1048 { "setnc", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1049 { "setne", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1050 { "setng", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1051 { "setnge", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1052 { "setnl", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1053 { "setnle", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1054 { "setno", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1055 { "setnp", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1056 { "setns", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1057 { "setnz", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1058 { "seto", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1059 { "setp", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1060 { "setpe", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1061 { "setpo", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1062 { "sets", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1063 { "setz", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1064 { "sfence", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1065 { "sgdt", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1066 { "shl", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1067 { "shld", Op_UpdSrcShft },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1068 { "shr", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1069 { "shrd", Op_UpdSrcShft },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1070 { "shufpd", Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1071 { "shufps", Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1072 { "sidt", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1073 { "sldt", Op_DstRMWNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1074 { "smsw", Op_DstRMWNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1075 { "sqrtpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1076 { "sqrtps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1077 { "sqrtsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1078 { "sqrtss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1079 { "stc", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1080 { "std", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1081 { "sti", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1082 { "stmxcsr",Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1083 { "stos", Op_stos },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1084 { "stosb", Op_stosX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1085 { "stosd", Op_stosX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1086 { "stosw", Op_stosX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1087 { "str", Op_DstMemNT }, // also r16
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1088 { "sub", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1089 { "subpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1090 { "subps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1091 { "subsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1092 { "subss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1093 { "sysenter",Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1094 { "sysexit", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1095 { "test", Op_SrcSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1096 { "ucomisd", Op_SrcSrcSSEF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1097 { "ucomiss", Op_SrcSrcSSEF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1098 { "ud2", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1099 { "unpckhpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1100 { "unpckhps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1101 { "unpcklpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1102 { "unpcklps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1103 { "verr", Op_SrcMemNTF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1104 { "verw", Op_SrcMemNTF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1105 { "wait", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1106 { "wbinvd", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1107 { "wrmsr", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1108 { "xadd", Op_UpdUpdF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1109 { "xchg", Op_UpdUpd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1110 { "xlat", Op_xlat },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1111 { "xlatb", Op_0_AX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1112 { "xor", Op_DstSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1113 { "xorpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1114 { "xorps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1115 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1116
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1117 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1118 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1119 Default_Ptr = 0,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1120 Byte_Ptr = 1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1121 Short_Ptr = 2,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1122 Int_Ptr = 4,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1123 QWord_Ptr = 8,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1124 Float_Ptr = 4,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1125 Double_Ptr = 8,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1126 Extended_Ptr = 10,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1127 Near_Ptr = 98,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1128 Far_Ptr = 99,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1129 N_PtrTypes
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1130 } PtrType;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1131
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1132 static const int N_PtrNames = 8;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1133 static const char * ptrTypeNameTable[N_PtrNames] =
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1134 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1135 "word", "dword", "qword",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1136 "float", "double", "extended",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1137 "near", "far"
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1138 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1139
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1140 static Identifier * ptrTypeIdentTable[N_PtrNames];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1141 static PtrType ptrTypeValueTable[N_PtrNames] =
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1142 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1143 Short_Ptr, Int_Ptr, QWord_Ptr,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1144 Float_Ptr, Double_Ptr, Extended_Ptr,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1145 Near_Ptr, Far_Ptr
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1146 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1147
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1148 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1149 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1150 Opr_Invalid,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1151 Opr_Immediate,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1152 Opr_Reg,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1153 Opr_Mem
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1154 } OperandClass;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1155
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1156 /* kill inlining if we reference a local? */
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1157
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1158 /* DMD seems to allow only one 'symbol' per operand .. include __LOCAL_SIZE */
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1159
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1160 /* DMD offset usage: <parm>[<reg>] seems to always be relative to EBP+8 .. even
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1161 if naked.. */
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1162
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1163 // mov eax, 4
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1164 // mov eax, fs:4
871 e70a0e7e2260 Apply duane's patch for align power-of-two checking in inline asm. Fixes #159 Christian Kamm <kamm incasoftware de> parents: 793 diff changeset	1165 // -- have to assume we know whether or not to use '$'
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1166
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1167 static Token eof_tok;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1168 static Expression * Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1169 static Identifier * ident_seg;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1170
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1171 struct AsmProcessor
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1172 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1173 typedef struct
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1174 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1175 int inBracket;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1176 int hasBracket;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1177 int hasNumber;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1178 int isOffset;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1179
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1180 Reg segmentPrefix;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1181 Reg reg;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1182 sinteger_t constDisplacement; // use to build up.. should be int constant in the end..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1183 Array symbolDisplacement; // array of expressions or..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1184 Reg baseReg;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1185 Reg indexReg;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1186 int scale;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1187
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1188 OperandClass cls;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1189 PtrType dataSize;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1190 PtrType dataSizeHint; // DMD can use the type of a referenced variable
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1191 } Operand;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1192
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1193 static const unsigned Max_Operands = 3;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1194
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1195 AsmStatement * stmt;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1196 Scope * sc;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1197
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1198 Token * token;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1199 OutBuffer * insnTemplate;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1200
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1201 AsmOp op;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1202 AsmOpInfo * opInfo;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1203 Operand operands[Max_Operands];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1204 Identifier * opIdent;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1205 Operand * operand;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1206
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1207 AsmProcessor ( Scope * sc, AsmStatement * stmt )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1208 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1209 this->sc = sc;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1210 this->stmt = stmt;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1211 token = stmt->tokens;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1212 insnTemplate = new OutBuffer;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1213
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1214 opInfo = NULL;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1215
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1216 if ( ! regInfo[0].ident )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1217 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1218 char buf[8], *p;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1219
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1220 for ( int i = 0; i < N_Regs; i++ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1221 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1222 strncpy ( buf, regInfo[i].name, sizeof ( buf ) - 1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1223 for ( p = buf; *p; p++ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1224 p = std::tolower ( p );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1225 regInfo[i].gccName = std::string ( buf, p - buf );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1226 if ( ( i <= Reg_ST \|\| i > Reg_ST7 ) && i != Reg_EFLAGS )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1227 regInfo[i].ident = Lexer::idPool ( regInfo[i].name );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1228 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1229
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1230 for ( int i = 0; i < N_PtrNames; i++ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1231 ptrTypeIdentTable[i] = Lexer::idPool ( ptrTypeNameTable[i] );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1232
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1233 Handled = new Expression ( 0, TOKvoid, sizeof ( Expression ) );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1234
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1235 ident_seg = Lexer::idPool ( "seg" );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1236
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1237 eof_tok.value = TOKeof;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1238 eof_tok.next = 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1239 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1240 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1241
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1242 void run()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1243 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1244 parse();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1245 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1246
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1247 void nextToken()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1248 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1249 if ( token->next )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1250 token = token->next;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1251 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1252 token = & eof_tok;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1253 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1254
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1255 Token * peekToken()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1256 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1257 if ( token->next )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1258 return token->next;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1259 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1260 return & eof_tok;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1261 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1262
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1263 void expectEnd()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1264 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1265 if ( token->value != TOKeof )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1266 stmt->error ( "expected end of statement" ); // %% extra at end...
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1267 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1268
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1269 void parse()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1270 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1271 op = parseOpcode();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1272
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1273 switch ( op )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1274 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1275 case Op_Align:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1276 doAlign();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1277 expectEnd();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1278 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1279 case Op_Even:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1280 doEven();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1281 expectEnd();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1282 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1283 case Op_Naked:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1284 doNaked();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1285 expectEnd();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1286 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1287 case Op_Invalid:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1288 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1289 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1290 if ( op >= Op_db && op <= Op_de )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1291 doData();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1292 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1293 doInstruction();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1294 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1295 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1296
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1297 AsmOp parseOpcode()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1298 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1299 static const int N_ents = sizeof ( opData ) /sizeof ( AsmOpEnt );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1300
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1301 switch ( token->value )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1302 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1303 case TOKalign:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1304 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1305 return Op_Align;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1306 case TOKin:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1307 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1308 opIdent = Id::___in;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1309 return Op_in;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1310 case TOKint32: // "int"
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1311 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1312 opIdent = Id::__int;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1313 return Op_SrcImm;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1314 case TOKout:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1315 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1316 opIdent = Id::___out;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1317 return Op_out;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1318 case TOKidentifier:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1319 // search for mnemonic below
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1320 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1321 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1322 stmt->error ( "expected opcode" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1323 return Op_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1324 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1325
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1326 opIdent = token->ident;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1327 const char * opcode = token->ident->string;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1328
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1329 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1330
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1331 // %% okay to use bsearch?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1332 int i = 0, j = N_ents, k, l;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1333 do
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1334 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1335 k = ( i + j ) / 2;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1336 l = strcmp ( opcode, opData[k].inMnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1337 if ( ! l )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1338 return opData[k].asmOp;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1339 else if ( l < 0 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1340 j = k;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1341 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1342 i = k + 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1343 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1344 while ( i != j );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1345
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1346 stmt->error ( "unknown opcode '%s'", opcode );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1347
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1348 return Op_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1349 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1350
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1351 // need clobber information.. use information is good too...
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1352 void doInstruction()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1353 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1354 bool ok = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1355 unsigned operand_i = 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1356
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1357 opInfo = & asmOpInfo[op];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1358 memset ( operands, 0, sizeof ( operands ) );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1359
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1360 while ( token->value != TOKeof )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1361 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1362 if ( operand_i < Max_Operands )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1363 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1364 operand = & operands[operand_i];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1365 operand->reg = operand->baseReg = operand->indexReg =
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1366 operand->segmentPrefix = Reg_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1367 parseOperand();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1368 operand_i++;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1369 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1370 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1371 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1372 ok = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1373 stmt->error ( "too many operands for instruction" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1374 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1375 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1376
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1377 if ( token->value == TOKcomma )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1378 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1379 else if ( token->value != TOKeof )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1380 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1381 ok = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1382 stmt->error ( "expected comma after operand" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1383 return;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1384 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1385 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1386 // if (operand_i < opInfo->minOperands) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1387 // ok = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1388 // stmt->error("too few operands for instruction");
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1389 // }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1390
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1391 if ( matchOperands ( operand_i ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1392 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1393 AsmCode * asmcode = new AsmCode ( N_Regs );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1394
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1395 if ( formatInstruction ( operand_i, asmcode ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1396 stmt->asmcode = ( code * ) asmcode;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1397 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1398 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1399
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1400 void setAsmCode()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1401 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1402 AsmCode * asmcode = new AsmCode ( N_Regs );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1403 asmcode->insnTemplateLen = insnTemplate->offset;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1404 asmcode->insnTemplate = ( char* ) insnTemplate->extractData();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1405 stmt->asmcode = ( code* ) asmcode;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1406 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1407
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1408 // note: doesn't update AsmOp op
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1409 bool matchOperands ( unsigned nOperands )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1410 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1411 bool wrong_number = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1412
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1413 for ( unsigned i = 0; i < nOperands; i++ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1414 classifyOperand ( & operands[i] );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1415
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1416 while ( 1 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1417 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1418 if ( nOperands == opInfo->nOperands() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1419 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1420 wrong_number = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1421 /* Cases in which number of operands is not
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1422 enough for a match: Op_FCmp/Op_FCmp1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1423 Op_FCmpP/Op_FCmpP1 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1424 for ( unsigned i = 0; i < nOperands; i++ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1425 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1426 Operand * operand = & operands[i];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1427
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1428 switch ( opInfo->operands[i] & Opr_ClassMask )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1429 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1430 case OprC_Mem: // no FPMem currently
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1431 if ( operand->cls != Opr_Mem )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1432 goto no_match;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1433 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1434 case OprC_RFP:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1435 if ( ! ( operand->reg >= Reg_ST && operand->reg <= Reg_ST7 ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1436 goto no_match;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1437 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1438 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1439 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1440 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1441 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1442
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1443 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1444 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1445 no_match:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1446 if ( opInfo->linkType == Next_Form )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1447 opInfo = & asmOpInfo[ op = ( AsmOp ) opInfo->link ];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1448 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1449 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1450 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1451 if ( wrong_number )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1452 stmt->error ( "wrong number of operands" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1453 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1454 stmt->error ( "wrong operand types" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1455 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1456 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1457
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1458 void addOperand ( const char * fmt, AsmArgType type, Expression * e, AsmCode * asmcode, AsmArgMode mode = Mode_Input )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1459 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1460 if ( sc->func->naked )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1461 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1462 switch ( type )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1463 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1464 case Arg_Integer:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1465 if ( e->type->isunsigned() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1466 insnTemplate->printf ( "$%llu", e->toUInteger() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1467 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1468 insnTemplate->printf ( "$%lld", e->toInteger() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1469 break;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1470
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1471 case Arg_Pointer:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1472 stmt->error ( "unsupported pointer reference to '%s' in naked asm", e->toChars() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1473 break;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1474
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1475 case Arg_Memory:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1476 if ( e->op == TOKvar )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1477 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1478 VarExp* v = ( VarExp* ) e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1479 if ( VarDeclaration* vd = v->var->isVarDeclaration() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1480 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1481 if ( !vd->isDataseg() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1482 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1483 stmt->error ( "only global variables can be referenced by identifier in naked asm" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1484 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1485 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1486
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1487 // osx needs an extra underscore
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1488 if ( global.params.os == OSMacOSX )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1489 insnTemplate->writestring ( "_" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1490
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1491 // print out the mangle
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1492 insnTemplate->writestring ( vd->mangle() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1493 vd->nakedUse = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1494 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1495 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1496 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1497 stmt->error ( "unsupported memory reference to '%s' in naked asm", e->toChars() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1498 break;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1499
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1500 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1501 assert ( 0 && "asm unsupported arg" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1502 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1503 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1504 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1505 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1506 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1507 insnTemplate->writestring ( ( char* ) fmt );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1508 insnTemplate->printf ( "<<%s%d>>", ( mode==Mode_Input ) ?"in":"out", asmcode->args.dim );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1509 asmcode->args.push ( new AsmArg ( type, e, mode ) );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1510 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1511 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1512 void addOperand2 ( const char * fmtpre, const char * fmtpost, AsmArgType type, Expression * e, AsmCode * asmcode, AsmArgMode mode = Mode_Input )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1513 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1514 assert ( !sc->func->naked );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1515 insnTemplate->writestring ( ( char* ) fmtpre );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1516 insnTemplate->printf ( "<<%s%d>>", ( mode==Mode_Input ) ?"in":"out", asmcode->args.dim );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1517 insnTemplate->writestring ( ( char* ) fmtpost );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1518 asmcode->args.push ( new AsmArg ( type, e, mode ) );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1519 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1520
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1521 void addLabel ( char* id )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1522 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1523 insnTemplate->writestring ( sc->func->mangle() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1524 insnTemplate->writestring ( "_" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1525 insnTemplate->writestring ( id );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1526 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1527
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1528 /* Determines whether the operand is a register, memory reference
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1529 or immediate. Immediate addresses are currently classified as
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1530 memory. This function is called before the exact instructions
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1531 is known and thus, should not use opInfo. */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1532 void classifyOperand ( Operand * operand )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1533 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1534 operand->cls = classifyOperand1 ( operand );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1535 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1536
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1537 OperandClass classifyOperand1 ( Operand * operand )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1538 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1539 bool is_localsize = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1540 bool really_have_symbol = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1541
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1542 if ( operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1543 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1544 is_localsize = isLocalSize ( ( Expression * ) operand->symbolDisplacement.data[0] );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1545 really_have_symbol = ! is_localsize;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1546 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1547
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1548 if ( operand->isOffset && ! operand->hasBracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1549 return Opr_Immediate;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1550
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1551 if ( operand->hasBracket \|\| really_have_symbol ) // %% redo for 'offset' function
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1552 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1553 if ( operand->reg != Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1554 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1555 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1556 return Opr_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1557 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1558
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1559 return Opr_Mem;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1560 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1561
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1562 if ( operand->reg != Reg_Invalid && operand->constDisplacement != 0 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1563 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1564 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1565 return Opr_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1566 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1567
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1568 if ( operand->segmentPrefix != Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1569 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1570 if ( operand->reg != Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1571 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1572 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1573 return Opr_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1574 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1575
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1576 return Opr_Mem;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1577 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1578
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1579 if ( operand->reg != Reg_Invalid && ! operand->hasNumber )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1580 return Opr_Reg;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1581
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1582 // should check immediate given (operand->hasNumber);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1583 //
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1584 if ( operand->hasNumber \|\| is_localsize )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1585 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1586 // size determination not correct if there are symbols Opr_Immediate
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1587 if ( operand->dataSize == Default_Ptr )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1588 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1589 if ( operand->constDisplacement < 0x100 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1590 operand->dataSize = Byte_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1591 else if ( operand->constDisplacement < 0x10000 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1592 operand->dataSize = Short_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1593 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1594 operand->dataSize = Int_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1595 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1596 return Opr_Immediate;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1597 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1598
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1599 // probably a bug,?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1600 stmt->error ( "invalid operand" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1601 return Opr_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1602 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1603
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1604 void writeReg ( Reg reg )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1605 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1606 insnTemplate->writestring ( ( char* ) "%" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1607 insnTemplate->write ( regInfo[reg].gccName.c_str(), regInfo[reg].gccName.length() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1608 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1609
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1610 bool opTakesLabel()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1611 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1612 switch ( op )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1613 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1614 case Op_Branch:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1615 case Op_CBranch:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1616 case Op_Loop:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1617 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1618 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1619 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1620 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1621 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1622
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1623 bool getTypeChar ( TypeNeeded needed, PtrType ptrtype, char & type_char )
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	1624 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1625 switch ( needed )
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	1626 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1627 case Byte_NoType:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1628 return ptrtype == Byte_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1629 case Word_Types:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1630 if ( ptrtype == Byte_Ptr )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1631 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1632 // drop through
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1633 case Int_Types:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1634 switch ( ptrtype )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1635 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1636 case Byte_Ptr: type_char = 'b'; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1637 case Short_Ptr: type_char = 'w'; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1638 case Int_Ptr: type_char = 'l'; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1639 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1640 // %% these may be too strict
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1641 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1642 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1643 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1644 case FPInt_Types:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1645 switch ( ptrtype )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1646 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1647 case Short_Ptr: type_char = 0; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1648 case Int_Ptr: type_char = 'l'; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1649 case QWord_Ptr: type_char = 'q'; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1650 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1651 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1652 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1653 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1654 case FP_Types:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1655 switch ( ptrtype )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1656 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1657 case Float_Ptr: type_char = 's'; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1658 case Double_Ptr: type_char = 'l'; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1659 case Extended_Ptr: type_char = 't'; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1660 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1661 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1662 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1663 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1664 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1665 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1666 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1667 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1668 }
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	1669
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1670 // also set impl clobbers
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1671 bool formatInstruction ( int nOperands, AsmCode * asmcode )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1672 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1673 const char *fmt;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1674 const char *mnemonic;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1675 char type_char = 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1676 bool use_star;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1677 AsmArgMode mode;
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	1678
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1679 insnTemplate = new OutBuffer;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1680 // %% todo: special case for something..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1681 if ( opInfo->linkType == Out_Mnemonic )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1682 mnemonic = alternateMnemonics[opInfo->link];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1683 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1684 mnemonic = opIdent->string;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1685
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1686 if ( opInfo->needsType )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1687 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1688 PtrType exact_type = Default_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1689 PtrType min_type = Default_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1690 PtrType hint_type = Default_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1691
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1692 /* Default types: This attempts to match the observed behavior of DMD */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1693 switch ( opInfo->needsType )
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	1694 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1695 case Int_Types: min_type = Byte_Ptr; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1696 case Word_Types: min_type = Short_Ptr; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1697 case FPInt_Types:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1698 if ( op == Op_Fis_ST ) // integer math instructions
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1699 min_type = Int_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1700 else // compare, load, store
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1701 min_type = Short_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1702 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1703 case FP_Types: min_type = Float_Ptr; break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1704 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1705 if ( op == Op_push && operands[0].cls == Opr_Immediate )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1706 min_type = Int_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1707
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1708 for ( int i = 0; i < nOperands; i++ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1709 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1710 if ( hint_type == Default_Ptr &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1711 ! ( opInfo->operands[i] & Opr_NoType ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1712 hint_type = operands[i].dataSizeHint;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1713
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1714 if ( ( opInfo->operands[i] & Opr_NoType ) \|\|
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1715 operands[i].dataSize == Default_Ptr )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1716 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1717 if ( operands[i].cls == Opr_Immediate )
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	1718 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1719 min_type = operands[i].dataSize > min_type ?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1720 operands[i].dataSize : min_type;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1721 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1722 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1723 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1724 exact_type = operands[i].dataSize; // could check for conflicting types
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	1725 break;
545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	1726 }
545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	1727 }
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1728
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1729 bool type_ok;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1730 if ( exact_type == Default_Ptr )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1731 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1732 type_ok = getTypeChar ( ( TypeNeeded ) opInfo->needsType, hint_type, type_char );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1733 if ( ! type_ok )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1734 type_ok = getTypeChar ( ( TypeNeeded ) opInfo->needsType, min_type, type_char );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1735 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1736 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1737 type_ok = getTypeChar ( ( TypeNeeded ) opInfo->needsType, exact_type, type_char );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1738
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1739 if ( ! type_ok )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1740 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1741 stmt->error ( "invalid operand size" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1742 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1743 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1744 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1745 else if ( op == Op_Branch )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1746 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1747 if ( operands[0].dataSize == Far_Ptr ) // %% type=Far_Ptr not set by Seg:Ofss OTOH, we don't support that..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1748 insnTemplate->writebyte ( 'l' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1749 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1750 else if ( op == Op_fxch )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1751 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1752 // gas won't accept the two-operand form
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1753 if ( operands[1].cls == Opr_Reg && operands[1].reg == Reg_ST )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1754 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1755 nOperands = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1756 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1757 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1758 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1759 stmt->error ( "invalid operands" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1760 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1761 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1762 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1763
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1764 switch ( op )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1765 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1766 case Op_SizedStack:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1767 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1768 int mlen = strlen ( mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1769 if ( mnemonic[mlen-1] == 'd' )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1770 insnTemplate->write ( mnemonic, mlen-1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1771 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1772 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1773 insnTemplate->writestring ( ( char* ) mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1774 insnTemplate->writebyte ( 'w' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1775 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1776 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1777 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1778 case Op_cmpsd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1779 case Op_insX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1780 case Op_lodsX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1781 case Op_movsd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1782 case Op_outsX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1783 case Op_scasX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1784 case Op_stosX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1785 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1786 int mlen = strlen ( mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1787 if ( mnemonic[mlen-1] == 'd' )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1788 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1789 insnTemplate->write ( mnemonic, mlen-1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1790 insnTemplate->writebyte ( 'l' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1791 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1792 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1793 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1794 insnTemplate->writestring ( ( char* ) mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1795 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1796 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1797 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1798 case Op_movsx:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1799 case Op_movzx:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1800 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1801 char tc_1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1802 int mlen = strlen ( mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1803 PtrType op1_size = operands[1].dataSize;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1804 if ( op1_size == Default_Ptr )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1805 op1_size = operands[1].dataSizeHint;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1806 // Need type char for source arg
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1807 switch ( op1_size )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1808 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1809 case Byte_Ptr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1810 case Default_Ptr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1811 tc_1 = 'b';
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1812 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1813 case Short_Ptr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1814 tc_1 = 'w';
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1815 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1816 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1817 stmt->error ( "invalid operand size/type" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1818 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1819 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1820 assert ( type_char != 0 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1821 insnTemplate->write ( mnemonic, mlen-1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1822 insnTemplate->writebyte ( tc_1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1823 insnTemplate->writebyte ( type_char );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1824 }
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	1825 break;
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1826 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1827 insnTemplate->writestring ( ( char* ) mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1828 if ( type_char )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1829 insnTemplate->writebyte ( type_char );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1830 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1831 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1832
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1833 switch ( opInfo->implicitClobbers & Clb_DXAX_Mask )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1834 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1835 case Clb_SizeAX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1836 case Clb_EAX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1837 asmcode->regs[Reg_EAX] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1838 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1839 case Clb_SizeDXAX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1840 asmcode->regs[Reg_EAX] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1841 if ( type_char != 'b' )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1842 asmcode->regs[Reg_EDX] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1843 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1844 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1845 // nothing
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1846 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1847 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1848
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1849 if ( opInfo->implicitClobbers & Clb_DI )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1850 asmcode->regs[Reg_EDI] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1851 if ( opInfo->implicitClobbers & Clb_SI )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1852 asmcode->regs[Reg_ESI] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1853 if ( opInfo->implicitClobbers & Clb_CX )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1854 asmcode->regs[Reg_ECX] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1855 if ( opInfo->implicitClobbers & Clb_SP )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1856 asmcode->regs[Reg_ESP] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1857 if ( opInfo->implicitClobbers & Clb_ST )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1858 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1859 /* Can't figure out how to tell GCC that an
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1860 asm statement leaves an arg pushed on the stack.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1861 Maybe if the statment had and input or output
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1862 operand it would work... In any case, clobbering
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1863 all FP prevents incorrect code generation. */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1864 asmcode->regs[Reg_ST] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1865 asmcode->regs[Reg_ST1] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1866 asmcode->regs[Reg_ST2] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1867 asmcode->regs[Reg_ST3] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1868 asmcode->regs[Reg_ST4] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1869 asmcode->regs[Reg_ST5] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1870 asmcode->regs[Reg_ST6] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1871 asmcode->regs[Reg_ST7] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1872 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1873 if ( opInfo->implicitClobbers & Clb_Flags )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1874 asmcode->regs[Reg_EFLAGS] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1875 if ( op == Op_cpuid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1876 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1877 asmcode->regs[Reg_EAX] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1878 asmcode->regs[Reg_ECX] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1879 asmcode->regs[Reg_EDX] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1880 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1881
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1882 insnTemplate->writebyte ( ' ' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1883 for ( int i__ = 0; i__ < nOperands; i__++ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1884 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1885 int i;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1886 if ( i__ != 0 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1887 insnTemplate->writestring ( ( char* ) ", " );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1888
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1889 fmt = "$";
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1890
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1891 switch ( op )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1892 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1893 case Op_mul:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1894 // gas won't accept the two-operand form; skip to the source operand
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1895 i__ = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1896 // drop through
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1897 case Op_bound:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1898 case Op_enter:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1899 i = i__;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1900 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1901 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1902 i = nOperands - 1 - i__; // operand = & operands[ nOperands - 1 - i ];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1903 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1904 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1905 operand = & operands[ i ];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1906
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1907 switch ( operand->cls )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1908 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1909 case Opr_Immediate:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1910 // for implementing offset:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1911 // $var + $7 // fails
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1912 // $var + 7 // ok
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1913 // $7 + $var // ok
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1914
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1915 // DMD doesn't seem to allow this
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1916 /*
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1917 if (opInfo->takesLabel()) tho... (near ptr <Number> would be abs?)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1918 fmt = "$a"; // GAS won't accept "jmp $42"; must be "jmp 42" (rel) or "jmp *42" (abs)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1919 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1920 if ( opTakesLabel() /opInfo->takesLabel()/ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1921 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1922 // "relative addressing not allowed in branch instructions" ..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1923 stmt->error ( "integer constant not allowed in branch instructions" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1924 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1925 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1926
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1927 if ( operand->symbolDisplacement.dim &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1928 isLocalSize ( ( Expression * ) operand->symbolDisplacement.data[0] ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1929 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1930 // handle __LOCAL_SIZE, which in this constant, is an immediate
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1931 // should do this in slotexp..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1932 addOperand ( "$", Arg_LocalSize,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1933 ( Expression * ) operand->symbolDisplacement.data[0], asmcode );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1934 if ( operand->constDisplacement )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1935 insnTemplate->writebyte ( '+' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1936 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1937 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1938 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1939
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1940 if ( operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1941 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1942 fmt = "$a";
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1943 addOperand ( "$", Arg_Pointer,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1944 ( Expression * ) operand->symbolDisplacement.data[0],
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1945 asmcode );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1946
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1947 if ( operand->constDisplacement )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1948 insnTemplate->writebyte ( '+' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1949 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1950 // skip the addOperand(fmt, Arg_Integer...) below
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1951 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1952 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1953 addOperand ( fmt, Arg_Integer, newIntExp ( operand->constDisplacement ), asmcode );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1954 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1955 case Opr_Reg:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1956 if ( opInfo->operands[i] & Opr_Dest )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1957 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1958 Reg clbr_reg = ( Reg ) regInfo[operand->reg].baseReg;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1959 if ( clbr_reg != Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1960 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1961 asmcode->regs[clbr_reg] = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1962 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1963 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1964 if ( opTakesLabel() /opInfo->takesLabel()/ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1965 insnTemplate->writebyte ( '*' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1966 writeReg ( operand->reg );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1967 /*
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1968 insnTemplate->writestring("%");
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1969 insnTemplate->writestring(regInfo[operand->reg].name);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1970 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1971 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1972 case Opr_Mem:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1973 // better: use output operands for simple variable references
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1974 if ( ( opInfo->operands[i] & Opr_Update ) == Opr_Update )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1975 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1976 mode = Mode_Update;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1977 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1978 else if ( opInfo->operands[i] & Opr_Dest )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1979 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1980 mode = Mode_Output;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1981 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1982 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1983 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1984 mode = Mode_Input;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1985 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1986
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1987 use_star = opTakesLabel();//opInfo->takesLabel();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1988 if ( operand->segmentPrefix != Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1989 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1990 writeReg ( operand->segmentPrefix );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1991 insnTemplate->writebyte ( ':' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1992 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1993 if ( operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1994 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1995 Expression * e = ( Expression * ) operand->symbolDisplacement.data[0];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1996 Declaration * decl = 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1997
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1998 if ( e->op == TOKvar )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1999 decl = ( ( VarExp * ) e )->var;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2000
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2001 if ( operand->baseReg != Reg_Invalid &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2002 decl && ! decl->isDataseg() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2003 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2004
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2005 // Use the offset from frame pointer
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	2006
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2007 /* GCC doesn't give the front end access to stack offsets
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2008 when optimization is turned on (3.x) or at all (4.x).
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2009
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2010 Try to convert var[EBP] (or var[ESP] for naked funcs) to
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2011 a memory expression that does not require us to know
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2012 the stack offset.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2013 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2014
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2015 if ( operand->indexReg == Reg_Invalid &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2016 decl->isVarDeclaration() &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2017 ( ( operand->baseReg == Reg_EBP && ! sc->func->naked ) \|\|
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2018 ( operand->baseReg == Reg_ESP && sc->func->naked ) ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2019 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2020
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2021 if ( mode == Mode_Output )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2022 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2023 e = new AddrExp ( 0, e );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2024 e->type = decl->type->pointerTo();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2025 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2026
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2027 #if !IN_LLVM
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2028 /* DMD uses the same frame offsets for naked functions. */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2029 if ( sc->func->naked )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2030 operand->constDisplacement += 4;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2031
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2032 if ( operand->constDisplacement )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2033 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2034 e = new AddExp ( 0, e,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2035 new IntegerExp ( 0, operand->constDisplacement,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2036 Type::tint32 ) );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2037 e->type = decl->type->pointerTo();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2038 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2039 e = new PtrExp ( 0, e );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2040 e->type = decl->type;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2041 #endif
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2042 operand->constDisplacement = 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2043 operand->baseReg = Reg_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2044
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2045 addOperand ( fmt, Arg_Memory, e, asmcode, mode );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2046
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2047 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2048 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2049 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2050 // FIXME: what is this ?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2051 addOperand2 ( "${",":a}", Arg_FrameRelative, e, asmcode );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2052 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2053 if ( opInfo->operands[i] & Opr_Dest )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2054 asmcode->clobbersMemory = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2055 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2056 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2057 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2058 // Plain memory reference to variable
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2059
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2060 /* If in a reg, DMD moves to memory.. even with -O, so we'll do the same
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2061 by always using the "m" contraint.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2062
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2063 In order to get the correct output for function and label symbols,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2064 the %an format must be used with the "p" constraint.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2065 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2066 if ( isDollar ( e ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2067 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2068 error ( "dollar labels are not supported", stmt->loc.toChars() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2069 asmcode->dollarLabel = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2070 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2071 else if ( e->op == TOKdsymbol )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2072 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2073 LabelDsymbol * lbl = ( LabelDsymbol * ) ( ( DsymbolExp * ) e )->s;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2074 stmt->isBranchToLabel = lbl->ident;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2075
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2076 use_star = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2077 addLabel ( lbl->ident->toChars() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2078 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2079 else if ( ( decl && decl->isCodeseg() ) ) // if function or label
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2080 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2081 use_star = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2082 // simply write out the mangle
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2083 // on osx, prepend extra _
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2084 if ( global.params.os == OSMacOSX )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2085 insnTemplate->writestring ( "_" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2086 insnTemplate->writestring ( decl->mangle() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2087 // addOperand2("${", ":c}", Arg_Pointer, e, asmcode);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2088 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2089 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2090 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2091 if ( use_star )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2092 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2093 insnTemplate->writebyte ( '*' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2094 use_star = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2095 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2096
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2097 if ( !sc->func->naked ) // no addrexp in naked asm please :)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2098 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2099 Type* tt = e->type->pointerTo();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2100 e = new AddrExp ( 0, e );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2101 e->type = tt;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2102 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2103
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2104 addOperand ( fmt, Arg_Memory, e, asmcode, mode );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2105 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2106 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2107 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2108 if ( use_star )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2109 insnTemplate->writebyte ( '*' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2110 if ( operand->segmentPrefix != Reg_Invalid \|\| operand->constDisplacement )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2111 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2112 if ( operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2113 insnTemplate->writebyte ( '+' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2114 //addOperand(fmt, Arg_Integer, newIntExp(operand->constDisplacement), asmcode);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2115 insnTemplate->printf ( "%d", operand->constDisplacement );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2116 if ( opInfo->operands[i] & Opr_Dest )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2117 asmcode->clobbersMemory = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2118 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2119 if ( operand->baseReg != Reg_Invalid \|\| operand->indexReg != Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2120 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2121 insnTemplate->writebyte ( '(' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2122 if ( operand->baseReg != Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2123 writeReg ( operand->baseReg );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2124 if ( operand->indexReg != Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2125 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2126 insnTemplate->writebyte ( ',' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2127 writeReg ( operand->indexReg );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2128 if ( operand->scale )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2129 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2130 insnTemplate->printf ( ",%d", operand->scale );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2131 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2132 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2133 insnTemplate->writebyte ( ')' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2134 if ( opInfo->operands[i] & Opr_Dest )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2135 asmcode->clobbersMemory = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2136 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2137 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2138 case Opr_Invalid:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2139 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2140 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2141 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2142
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2143 asmcode->insnTemplateLen = insnTemplate->offset;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2144 asmcode->insnTemplate = ( char* ) insnTemplate->extractData();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2145 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2146 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2147
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2148 bool isIntExp ( Expression * exp )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2149 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2150 if ( exp->op == TOKint64 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2151 return 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2152 if ( exp->op == TOKvar )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2153 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2154 Declaration * v = ( ( VarExp * ) exp )->var;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2155 if ( v->isConst() && v->type->isintegral() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2156 return 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2157 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2158 return 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2159 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2160 bool isRegExp ( Expression * exp ) { return exp->op == TOKmod; } // ewww.%%
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2161 bool isLocalSize ( Expression * exp )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2162 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2163 // cleanup: make a static var
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2164 return exp->op == TOKidentifier && ( ( IdentifierExp * ) exp )->ident == Id::__LOCAL_SIZE;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2165 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2166 bool isDollar ( Expression * exp )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2167 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2168 return exp->op == TOKidentifier && ( ( IdentifierExp * ) exp )->ident == Id::__dollar;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2169 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2170
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2171 Expression * newRegExp ( int regno )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2172 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2173 IntegerExp * e = new IntegerExp ( regno );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2174 e->op = TOKmod;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2175 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2176 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2177
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2178 Expression * newIntExp ( int v /* %% type */ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2179 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2180 // Only handles 32-bit numbers as this is IA-32.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2181 return new IntegerExp ( stmt->loc, v, Type::tint32 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2182 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2183
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2184 void slotExp ( Expression * exp )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2185 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2186 /*
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2187 if offset, make a note
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2188
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2189 if integer, add to immediate
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2190 if reg:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2191 if not in bracket, set reg (else error)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2192 if in bracket:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2193 if not base, set base
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2194 if not index, set index
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2195 else, error
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2196 if symbol:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2197 set symbol field
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2198 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2199
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2200 bool is_offset = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2201 if ( exp->op == TOKaddress )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2202 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2203 exp = ( ( AddrExp * ) exp )->e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2204 is_offset = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2205 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2206
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2207 if ( isIntExp ( exp ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2208 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2209 if ( is_offset )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2210 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2211 operand->constDisplacement += exp->toInteger();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2212 if ( ! operand->inBracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2213 operand->hasNumber = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2214 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2215 else if ( isRegExp ( exp ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2216 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2217 if ( is_offset )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2218 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2219 if ( ! operand->inBracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2220 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2221 if ( operand->reg == Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2222 operand->reg = ( Reg ) exp->toInteger();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2223 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2224 stmt->error ( "too many registers in operand (use brackets)" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2225 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2226 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2227 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2228 if ( operand->baseReg == Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2229 operand->baseReg = ( Reg ) exp->toInteger();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2230 else if ( operand->indexReg == Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2231 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2232 operand->indexReg = ( Reg ) exp->toInteger();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2233 operand->scale = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2234 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2235 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2236 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2237 stmt->error ( "too many registers memory operand" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2238 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2239 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2240 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2241 else if ( exp->op == TOKvar )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2242 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2243 VarDeclaration * v = ( ( VarExp * ) exp )->var->isVarDeclaration();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2244
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2245 if ( v && v->storage_class & STCfield )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2246 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2247 operand->constDisplacement += v->offset;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2248 if ( ! operand->inBracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2249 operand->hasNumber = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2250 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2251 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2252 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2253 if ( v && v->type->isscalar() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2254 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2255 // DMD doesn't check Tcomplex*, and counts Tcomplex32 as Tfloat64
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2256 TY ty = v->type->toBasetype()->ty;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2257 operand->dataSizeHint = ty == Tfloat80 \|\| ty == Timaginary80 ?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2258 Extended_Ptr : ( PtrType ) v->type->size ( 0 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2259 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2260
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2261 if ( ! operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2262 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2263 if ( is_offset && ! operand->inBracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2264 operand->isOffset = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2265 operand->symbolDisplacement.push ( exp );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2266 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2267 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2268 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2269 stmt->error ( "too many symbols in operand" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2270 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2271 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2272 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2273 else if ( exp->op == TOKidentifier \|\| exp->op == TOKdsymbol )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2274 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2275 // %% localsize could be treated as a simple constant..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2276 // change to addSymbolDisp(e)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2277 if ( ! operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2278 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2279 operand->symbolDisplacement.push ( exp );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2280 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2281 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2282 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2283 stmt->error ( "too many symbols in operand" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2284 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2285 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2286 else if ( exp == Handled )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2287 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2288 // nothing
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2289 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2290 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2291 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2292 stmt->error ( "invalid operand" );
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	2293 }
545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	2294 }
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2295
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2296 void invalidExpression()
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	2297 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2298 // %% report operand number
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2299 stmt->error ( "invalid expression" );
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	2300 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2301
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2302 Expression * intOp ( TOK op, Expression * e1, Expression * e2 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2303 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2304 Expression * e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2305 if ( isIntExp ( e1 ) && ( ! e2 \|\| isIntExp ( e2 ) ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2306 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2307 switch ( op )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2308 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2309 case TOKadd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2310 if ( e2 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2311 e = new AddExp ( stmt->loc, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2312 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2313 e = e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2314 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2315 case TOKmin:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2316 if ( e2 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2317 e = new MinExp ( stmt->loc, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2318 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2319 e = new NegExp ( stmt->loc, e1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2320 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2321 case TOKmul:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2322 e = new MulExp ( stmt->loc, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2323 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2324 case TOKdiv:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2325 e = new DivExp ( stmt->loc, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2326 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2327 case TOKmod:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2328 e = new ModExp ( stmt->loc, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2329 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2330 case TOKshl:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2331 e = new ShlExp ( stmt->loc, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2332 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2333 case TOKshr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2334 e = new ShrExp ( stmt->loc, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2335 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2336 case TOKushr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2337 e = new UshrExp ( stmt->loc, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2338 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2339 case TOKnot:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2340 e = new NotExp ( stmt->loc, e1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2341 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2342 case TOKtilde:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2343 e = new ComExp ( stmt->loc, e1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2344 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2345 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2346 assert ( 0 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2347 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2348 e = e->semantic ( sc );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2349 return e->optimize ( WANTvalue \| WANTinterpret );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2350 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2351 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2352 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2353 stmt->error ( "expected integer operand(s) for '%s'", Token::tochars[op] );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2354 return newIntExp ( 0 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2355 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2356 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2357
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2358 void parseOperand()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2359 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2360 Expression * exp = parseAsmExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2361 slotExp ( exp );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2362 if ( isRegExp ( exp ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2363 operand->dataSize = ( PtrType ) regInfo[exp->toInteger() ].size;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2364 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2365
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2366 Expression * parseAsmExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2367 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2368 return parseShiftExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2369 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2370
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2371 Expression * parseShiftExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2372 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2373 Expression * e1 = parseAddExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2374 Expression * e2;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2375
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2376 while ( 1 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2377 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2378 TOK tv = token->value;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2379 switch ( tv )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2380 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2381 case TOKshl:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2382 case TOKshr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2383 case TOKushr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2384 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2385 e2 = parseAddExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2386 e1 = intOp ( tv, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2387 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2388 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2389 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2390 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2391 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2392 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2393 return e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2394 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2395
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2396 Expression * parseAddExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2397 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2398 Expression * e1 = parseMultExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2399 Expression * e2;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2400
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2401 while ( 1 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2402 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2403 TOK tv = token->value;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2404 switch ( tv )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2405 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2406 case TOKadd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2407 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2408 e2 = parseMultExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2409 if ( isIntExp ( e1 ) && isIntExp ( e2 ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2410 e1 = intOp ( tv, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2411 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2412 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2413 slotExp ( e1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2414 slotExp ( e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2415 e1 = Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2416 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2417 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2418 case TOKmin:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2419 // Note: no support for symbol address difference
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2420 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2421 e2 = parseMultExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2422 if ( isIntExp ( e1 ) && isIntExp ( e2 ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2423 e1 = intOp ( tv, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2424 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2425 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2426 slotExp ( e1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2427 e2 = intOp ( TOKmin, e2, NULL ); // verifies e2 is an int
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2428 slotExp ( e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2429 e1 = Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2430 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2431 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2432 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2433 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2434 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2435 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2436 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2437 return e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2438 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2439
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2440 bool tryScale ( Expression * e1, Expression * e2 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2441 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2442 Expression * et;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2443 if ( isIntExp ( e1 ) && isRegExp ( e2 ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2444 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2445 et = e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2446 e1 = e2;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2447 e2 = et;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2448 goto do_scale;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2449 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2450 else if ( isRegExp ( e1 ) && isIntExp ( e2 ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2451 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2452 do_scale:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2453 if ( ! operand->inBracket )
221 68687d8c3e9a [svn r237] some inline asm output now seems to work, see tangotests/asm2.d lindquist parents: 220 diff changeset	2454 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2455 invalidExpression(); // maybe should allow, e.g. DS:EBX+EAX*4
920 545f54041d91 Implemented proper support for naked asm using llvm module level asm. Still not 100% complete, but already 1000 times better that what we had before. Don's BignumX86 implementation from Tango (when turned into a standalone unittest) seems to fully work with no changes, and great performance :) Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 871 diff changeset	2456 }
222 251548c1035d [svn r238] use m for memory input constraints and pass in their address ChristianK* parents: 221 diff changeset	2457
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2458 if ( operand->scale \|\| operand->indexReg != Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2459 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2460 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2461 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2462 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2463
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2464 operand->indexReg = ( Reg ) e1->toInteger();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2465 operand->scale = e2->toInteger();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2466 switch ( operand->scale )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2467 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2468 case 1:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2469 case 2:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2470 case 4:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2471 case 8:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2472 // ok; do nothing
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2473 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2474 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2475 stmt->error ( "invalid index register scale '%d'", operand->scale );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2476 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2477 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2478
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2479 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2480 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2481 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2482 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2483
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2484 Expression * parseMultExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2485 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2486 Expression * e1 = parseBrExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2487 Expression * e2;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2488
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2489 while ( 1 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2490 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2491 TOK tv = token->value;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2492 switch ( tv )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2493 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2494 case TOKmul:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2495 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2496 e2 = parseMultExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2497 if ( isIntExp ( e1 ) && isIntExp ( e2 ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2498 e1 = intOp ( tv, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2499 else if ( tryScale ( e1,e2 ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2500 e1 = Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2501 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2502 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2503 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2504 case TOKdiv:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2505 case TOKmod:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2506 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2507 e2 = parseMultExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2508 e1 = intOp ( tv, e1, e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2509 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2510 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2511 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2512 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2513 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2514 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2515 return e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2516 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2517
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2518 Expression * parseBrExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2519 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2520 // %% check (why is bracket lower precends..)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2521 // 3+4[eax] -> 3 + (4 [EAX]) ..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2522
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2523 // only one bracked allowed, so this doesn't quite handle
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2524 // the spec'd syntax
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2525 Expression * e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2526
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2527 if ( token->value == TOKlbracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2528 e = Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2529 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2530 e = parseUnaExp();
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2531
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2532 // DMD allows multiple bracket expressions.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2533 while ( token->value == TOKlbracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2534 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2535 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2536
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2537 operand->inBracket = operand->hasBracket = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2538 slotExp ( parseAsmExp() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2539 operand->inBracket = 0;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2540
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2541 if ( token->value == TOKrbracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2542 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2543 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2544 stmt->error ( "missing ']'" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2545 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2546
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2547 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2548 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2549
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2550 PtrType isPtrType ( Token * tok )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2551 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2552 switch ( tok->value )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2553 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2554 case TOKint8: return Byte_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2555 case TOKint16: return Short_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2556 case TOKint32: return Int_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2557 // 'long ptr' isn't accepted?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2558 case TOKfloat32: return Float_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2559 case TOKfloat64: return Double_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2560 case TOKfloat80: return Extended_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2561 case TOKidentifier:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2562 for ( int i = 0; i < N_PtrNames; i++ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2563 if ( tok->ident == ptrTypeIdentTable[i] )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2564 return ptrTypeValueTable[i];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2565 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2566 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2567 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2568 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2569 return Default_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2570 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2571
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2572 Expression * parseUnaExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2573 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2574 Expression * e = NULL;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2575 PtrType ptr_type;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2576
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2577 // First, check for type prefix.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2578 if ( token->value != TOKeof &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2579 peekToken()->value == TOKidentifier &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2580 peekToken()->ident == Id::ptr )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2581 {
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2582
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2583 ptr_type = isPtrType ( token );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2584 if ( ptr_type != Default_Ptr )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2585 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2586 if ( operand->dataSize == Default_Ptr )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2587 operand->dataSize = ptr_type;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2588 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2589 stmt->error ( "multiple specifications of operand size" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2590 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2591 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2592 stmt->error ( "unknown operand size '%s'", token->toChars() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2593 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2594 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2595 return parseAsmExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2596 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2597
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2598 TOK tv = token->value;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2599 switch ( tv )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2600 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2601 case TOKidentifier:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2602 if ( token->ident == ident_seg )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2603 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2604 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2605 stmt->error ( "'seg' not supported" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2606 e = parseAsmExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2607 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2608 else if ( token->ident == Id::offset \|\|
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2609 token->ident == Id::offsetof )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2610 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2611 if ( token->ident == Id::offset && ! global.params.useDeprecated )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2612 stmt->error ( "offset deprecated, use offsetof" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2613 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2614 e = parseAsmExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2615 e = new AddrExp ( stmt->loc, e );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2616 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2617 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2618 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2619 // primary exp
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2620 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2621 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2622 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2623 case TOKadd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2624 case TOKmin:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2625 case TOKnot:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2626 case TOKtilde:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2627 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2628 e = parseUnaExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2629 return intOp ( tv, e, NULL );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2630 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2631 // primary exp
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2632 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2633 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2634 return parsePrimaryExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2635 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2636
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2637 Expression * parsePrimaryExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2638 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2639 Expression * e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2640 Identifier * ident = NULL;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2641
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2642 switch ( token->value )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2643 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2644 case TOKint32v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2645 case TOKuns32v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2646 case TOKint64v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2647 case TOKuns64v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2648 // semantic here?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2649 // %% for tok64 really should use 64bit type
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2650 e = new IntegerExp ( stmt->loc, token->uns64value, Type::tint32 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2651 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2652 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2653 case TOKfloat32v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2654 case TOKfloat64v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2655 case TOKfloat80v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2656 // %% need different types?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2657 e = new RealExp ( stmt->loc, token->float80value, Type::tfloat80 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2658 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2659 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2660 case TOKidentifier:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2661 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2662 ident = token->ident;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2663 nextToken();
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2664
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2665 if ( ident == Id::__LOCAL_SIZE )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2666 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2667 return new IdentifierExp ( stmt->loc, ident );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2668 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2669 else if ( ident == Id::__dollar )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2670 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2671 do_dollar:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2672 return new IdentifierExp ( stmt->loc, ident );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2673 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2674 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2675 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2676 e = new IdentifierExp ( stmt->loc, ident );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2677 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2678
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2679 // If this is more than one component ref, it gets complicated: *(&Field + n)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2680 // maybe just do one step at a time..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2681 // simple case is Type.f -> VarDecl(field)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2682 // actually, DMD only supports on level...
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2683 // X.y+Y.z[EBX] is supported, tho..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2684 // %% doesn't handle properties (check%%)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2685 while ( token->value == TOKdot )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2686 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2687 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2688 if ( token->value == TOKidentifier )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2689 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2690 e = new DotIdExp ( stmt->loc, e, token->ident );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2691 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2692 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2693 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2694 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2695 stmt->error ( "expected identifier" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2696 return Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2697 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2698 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2699
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2700 // check for reg first then dotexp is an error?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2701 if ( e->op == TOKidentifier )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2702 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2703 for ( int i = 0; i < N_Regs; i++ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2704 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2705 if ( ident == regInfo[i].ident )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2706 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2707 if ( ( Reg ) i == Reg_ST && token->value == TOKlparen )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2708 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2709 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2710 switch ( token->value )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2711 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2712 case TOKint32v: case TOKuns32v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2713 case TOKint64v: case TOKuns64v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2714 if ( token->uns64value < 8 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2715 e = newRegExp ( ( Reg ) ( Reg_ST + token->uns64value ) );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2716 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2717 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2718 stmt->error ( "invalid floating point register index" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2719 e = Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2720 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2721 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2722 if ( token->value == TOKrparen )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2723 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2724 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2725 stmt->error ( "expected ')'" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2726 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2727 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2728 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2729 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2730 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2731 return Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2732 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2733 else if ( token->value == TOKcolon )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2734 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2735 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2736 if ( operand->segmentPrefix != Reg_Invalid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2737 stmt->error ( "too many segment prefixes" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2738 else if ( i >= Reg_CS && i <= Reg_GS )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2739 operand->segmentPrefix = ( Reg ) i;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2740 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2741 stmt->error ( "'%s' is not a segment register", ident->string );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2742 return parseAsmExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2743 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2744 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2745 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2746 return newRegExp ( ( Reg ) i );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2747 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2748 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2749 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2750 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2751
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2752 if ( opTakesLabel() /opInfo->takesLabel()/ && e->op == TOKidentifier )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2753 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2754 // DMD uses labels secondarily to other symbols, so check
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2755 // if IdentifierExp::semantic won't find anything.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2756 Dsymbol *scopesym;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2757
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2758 if ( ! sc->search ( stmt->loc, ident, & scopesym ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2759 return new DsymbolExp ( stmt->loc,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2760 sc->func->searchLabel ( ident ) );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2761 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2762
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2763 e = e->semantic ( sc );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2764
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2765 // Special case for floating point constant declarations.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2766 if ( e->op == TOKfloat64 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2767 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2768 Dsymbol * sym = sc->search ( stmt->loc, ident, NULL );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2769 if ( sym )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2770 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2771 VarDeclaration *v = sym->isVarDeclaration();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2772 if ( v )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2773 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2774 Expression *ve = new VarExp ( stmt->loc, v );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2775 ve->type = e->type;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2776 e = ve;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2777 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2778 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2779 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2780 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2781 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2782 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2783 case TOKdollar:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2784 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2785 ident = Id::__dollar;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2786 goto do_dollar;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2787 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2788 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2789 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2790 return Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2791 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2792 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2793 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2794
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2795 void doAlign()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2796 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2797 // .align bits vs. bytes...
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2798 // apparently a.out platforms use bits instead of bytes...
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2799
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2800 // parse primary: DMD allows 'MyAlign' (const int) but not '2+2'
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2801 // GAS is padding with NOPs last time I checked.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2802 Expression * e = parseAsmExp()->optimize ( WANTvalue \| WANTinterpret );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2803 uinteger_t align = e->toUInteger();
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2804
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2805 if ( ( align & ( align - 1 ) ) == 0 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2806 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2807 //FIXME: This printf is not portable. The use of `align` varies from system to system;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2808 // on i386 using a.out, .align `n` will align on a 2^`n` boundary instead of an `n` boundary
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2809 #ifdef HAVE_GAS_BALIGN_AND_P2ALIGN
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2810 insnTemplate->printf ( ".balign\t%u", ( unsigned ) align );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2811 #else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2812 insnTemplate->printf ( ".align\t%u", ( unsigned ) align );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2813 #endif
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2814 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2815 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2816 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2817 stmt->error ( "alignment must be a power of 2, not %u", ( unsigned ) align );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2818 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2819
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2820 setAsmCode();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2821 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2822
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2823 void doEven()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2824 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2825 // .align for GAS is in bits, others probably use bytes..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2826 #ifdef HAVE_GAS_BALIGN_AND_P2ALIGN
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2827 insnTemplate->writestring ( ( char * ) ".align\t2" );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2828 #else
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2829 insnTemplate->writestring ( ( char * ) ".align\t2" );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2830 #endif
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2831 setAsmCode();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2832 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2833
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2834 void doNaked()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2835 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2836 // %% can we assume sc->func != 0?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2837 sc->func->naked = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2838 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2839
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2840 void doData()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2841 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2842 static const char * directives[] = { ".byte", ".short", ".long", ".long",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2843 "", "", ""
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2844 };
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2845 // FIXME
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2846 /*
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2847 machine_mode mode;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2848
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2849 insnTemplate->writestring((char*) directives[op - Op_db]);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2850 insnTemplate->writebyte(' ');
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2851
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2852 do {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2853 // DMD is pretty strict here, not even constant expressions are allowed..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2854 switch (op) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2855 case Op_db:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2856 case Op_ds:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2857 case Op_di:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2858 case Op_dl:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2859 if (token->value == TOKint32v \|\| token->value == TOKuns32v \|\|
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2860 token->value == TOKint64v \|\| token->value == TOKuns64v) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2861 // As per usual with GNU, assume at least 32-bit host
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2862 if (op != Op_dl)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2863 insnTemplate->printf("%u", (d_uns32) token->uns64value);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2864 else {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2865 // Output two .longS. GAS has .quad, but would have to rely on 'L' format ..
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2866 // just need to use HOST_WIDE_INT_PRINT_DEC
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2867 insnTemplate->printf("%u,%u",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2868 (d_uns32) token->uns64value, (d_uns32) (token->uns64value >> 32));
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2869 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2870 } else {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2871 stmt->error("expected integer constant");
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2872 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2873 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2874 case Op_df:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2875 mode = SFmode;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2876 goto do_float;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2877 case Op_dd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2878 mode = DFmode;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2879 goto do_float;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2880 case Op_de:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2881 #ifndef TARGET_80387
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2882 #define XFmode TFmode
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2883 #endif
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2884 mode = XFmode; // not TFmode
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2885 // drop through
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2886 do_float:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2887 if (token->value == TOKfloat32v \|\| token->value == TOKfloat64v \|\|
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2888 token->value == TOKfloat80v) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2889 long words[3];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2890 real_to_target(words, & token->float80value.rv(), mode);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2891 // don't use directives..., just use .long like GCC
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2892 insnTemplate->printf(".long\t%u", words[0]);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2893 if (mode != SFmode)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2894 insnTemplate->printf(",%u", words[1]);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2895 // DMD outputs 10 bytes, so we need to switch to .short here
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2896 if (mode == XFmode)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2897 insnTemplate->printf("\n\t.short\t%u", words[2]);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2898 } else {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2899 stmt->error("expected float constant");
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2900 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2901 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2902 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2903 abort();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2904 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2905
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2906 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2907 if (token->value == TOKcomma) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2908 insnTemplate->writebyte(',');
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2909 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2910 } else if (token->value == TOKeof) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2911 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2912 } else {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2913 stmt->error("expected comma");
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2914 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2915 } while (1);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2916
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2917 setAsmCode();*/
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2918 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2919 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2920
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2921 #if D_GCC_VER < 40
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2922 // struct rtx was modified for c++; this macro from rtl.h needs to
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2923 // be modified accordingly.
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2924 #undef XEXP
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2925 #define XEXP(RTX, N) (RTL_CHECK2 (RTX, N, 'e', 'u').rt_rtx)
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2926 #endif
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2927
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2928 // FIXME
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2929 #define HOST_WIDE_INT long
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2930 bool getFrameRelativeValue ( LLValue* decl, HOST_WIDE_INT * result )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2931 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2932 assert ( 0 );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2933 // FIXME
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2934 // // Using this instead of DECL_RTL for struct args seems like a
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2935 // // good way to get hit by a truck because it may not agree with
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2936 // // non-asm access, but asm code wouldn't know what GCC does anyway. */
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2937 // rtx r = DECL_INCOMING_RTL(decl);
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2938 // rtx e1, e2;
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2939 //
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2940 // // Local variables don't have DECL_INCOMING_RTL
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2941 // if (r == NULL_RTX)
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2942 // r = DECL_RTL(decl);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2943 //
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2944 // if (r != NULL_RTX && GET_CODE(r) == MEM /* && r->frame_related */ ) {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2945 // r = XEXP(r, 0);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2946 // if (GET_CODE(r) == PLUS) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2947 // e1 = XEXP(r, 0);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2948 // e2 = XEXP(r, 1);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2949 // if (e1 == virtual_incoming_args_rtx && GET_CODE(e2) == CONST_INT) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2950 // *result = INTVAL(e2) + 8; // %% 8 is 32-bit specific...
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2951 // return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2952 // } else if (e1 == virtual_stack_vars_rtx && GET_CODE(e2) == CONST_INT) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2953 // *result = INTVAL(e2); // %% 8 is 32-bit specific...
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2954 // return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2955 // }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2956 // } else if (r == virtual_incoming_args_rtx) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2957 // *result = 8;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2958 // return true; // %% same as above
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2959 // }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2960 // // shouldn't have virtual_stack_vars_rtx by itself
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2961 // }
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2962 //
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2963 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2964 }
756 a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	2965
a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	2966
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2967 struct AsmParser : public AsmParserCommon
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2968 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2969 virtual void run ( Scope* sc, AsmStatement* asmst )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2970 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2971 AsmProcessor ap ( sc, asmst );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2972 ap.run();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2973 }
756 a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	2974
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2975 virtual std::string getRegName ( int i )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2976 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2977 return regInfo[i].gccName;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2978 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2979 };
756 a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	2980
a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	2981 }

Mercurial > projects > ldc

annotate gen/asm-x86-32.h @ 945:03d7c4aac654