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

annotate gen/asm-x86-32.h @ 1083:c1e9f612e2e2

Fix for dual operand form of fistp, also make reg ST(0) explicit and fix lindquists previous code that allowed dual operand form of fstp but dissallowed the single operand form accidently

author	Kelly Wilson <wilsonk cpsc.ucalgary.ca>
date	Tue, 10 Mar 2009 06:23:26 -0600
parents	ee310a79e9a1
children	56e56b3b9bb8

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,
1056 cc723604da95 Fixed two operand form of X86 fstp instruction. (throw away second operand!) Tomas Lindquist Olsen <tomas.l.olsen gmail.com> parents: 944 diff changeset	216 Op_FfdRR_P,
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	217 Op_Fd_P,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	218 Op_FdST,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	219 Op_FMath,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	220 Op_FdSTiSTi,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	221 Op_FPMath,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	222 Op_FCmp,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	223 Op_FCmp1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	224 Op_FCmpP,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	225 Op_FCmpP1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	226 Op_FCmpFlg,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	227 Op_FCmpFlgP,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	228 Op_fld,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	229 Op_fldR,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	230 Op_fxch,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	231 Op_fxch1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	232 Op_fxch0,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	233 Op_SizedStack,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	234 Op_bound,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	235 Op_bswap,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	236 Op_cmps,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	237 Op_cmpsd,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	238 Op_cmpsX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	239 Op_cmpxchg8b,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	240 Op_cmpxchg,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	241 Op_cpuid,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	242 Op_enter,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	243 Op_fdisi,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	244 Op_feni,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	245 Op_fsetpm,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	246 Op_fXstsw,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	247 Op_imul,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	248 Op_imul2,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	249 Op_imul1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	250 Op_in,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	251 Op_ins,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	252 Op_insX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	253 Op_iret,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	254 Op_iretd,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	255 Op_lods,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	256 Op_lodsX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	257 Op_movs,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	258 Op_movsd,
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_movsx,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	261 Op_movzx,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	262 Op_mul,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	263 Op_out,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	264 Op_outs,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	265 Op_outsX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	266 Op_push,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	267 Op_ret,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	268 Op_retf,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	269 Op_scas,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	270 Op_scasX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	271 Op_stos,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	272 Op_stosX,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	273 Op_xlat,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	274 N_AsmOpInfo,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	275 Op_Align,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	276 Op_Even,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	277 Op_Naked,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	278 Op_db,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	279 Op_ds,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	280 Op_di,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	281 Op_dl,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	282 Op_df,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	283 Op_dd,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	284 Op_de
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	285 } AsmOp;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	286
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	287 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	288 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	289 Opr_None = 0,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	290 OprC_MRI = 1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	291 OprC_MR = 2,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	292 OprC_Mem = 3,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	293 OprC_Reg = 4,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	294 OprC_Imm = 5,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	295 OprC_SSE = 6,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	296 OprC_SSE_Mem = 7,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	297 OprC_R32 = 8,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	298 OprC_RWord = 9,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	299 OprC_RFP = 10,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	300 OprC_AbsRel = 11,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	301 OprC_Relative = 12,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	302 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	303 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	304 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	305 OprC_MMX = 16,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	306 OprC_MMX_Mem = 17,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	307 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	308
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	309 Opr_ClassMask = 0x1f,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	310
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	311 Opr_Dest = 0x20,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	312 Opr_Update = 0x60,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	313
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	314 Opr_NoType = 0x80,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	315 } OprVals;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	316
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	317
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	318 typedef struct
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	319 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	320 } AsmOprInfo;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	321
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	322 typedef unsigned char Opr;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	323
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	324 typedef struct
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	325 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	326 Opr operands[3];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	327 unsigned char
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	328 needsType : 3,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	329 implicitClobbers : 8,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	330 linkType : 2;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	331 unsigned link;
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 /*
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	334 bool takesLabel() {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	335 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	336 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	337 */
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	338
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	339 unsigned nOperands()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	340 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	341 if ( !operands[0] )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	342 return 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	343 else if ( !operands[1] )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	344 return 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	345 else if ( !operands[2] )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	346 return 2;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	347 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	348 return 3;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	349 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	350 } AsmOpInfo;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	351
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	352 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	353 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	354 Mn_fdisi,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	355 Mn_feni,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	356 Mn_fsetpm,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	357 Mn_iretw,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	358 Mn_iret,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	359 Mn_lret,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	360 Mn_cmpxchg8b,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	361 N_AltMn
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	362 } Alternate_Mnemonics;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	363
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	364 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	365 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	366 ".byte 0xdb, 0xe1",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	367 ".byte 0xdb, 0xe0",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	368 ".byte 0xdb, 0xe4",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	369 "iretw",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	370 "iret",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	371 "lret",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	372 "cmpxchg8b"
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	373 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	374
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	375 #define mri OprC_MRI
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	376 #define mr OprC_MR
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	377 #define mem OprC_Mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	378 // for now mfp=mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	379 #define mfp OprC_Mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	380 #define reg OprC_Reg
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	381 #define imm OprC_Imm
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	382 #define sse OprC_SSE
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	383 #define ssem OprC_SSE_Mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	384 #define mmx OprC_MMX
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	385 #define mmxm OprC_MMX_Mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	386 #define r32 OprC_R32
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	387 #define rw OprC_RWord
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	388 #define rfp OprC_RFP
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	389 #define port OprC_Port
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	390 #define ax OprC_AX
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	391 #define dx OprC_DX
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	392 #define shft OprC_Shift
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	393 #define D Opr_Dest
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	394 #define U Opr_Update
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	395 #define N Opr_NoType
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	396 //#define L Opr_Label
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	397
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	398 // 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	399 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	400 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	401 /* Op_Invalid */ {},
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	402 /* 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	403 /* 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	404 /* 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	405 /* 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	406 /* 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	407 /* 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	408 /* 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	409 /* 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	410 /* 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	411 /* 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	412 /* 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	413 /* 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	414 /* 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	415 /* 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	416 /* 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	417 /* 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	418 /* 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	419 /* 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	420 /* 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	421 /* 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	422 /* 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	423 /* 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	424 /* 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	425 /* 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	426 /* 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	427 /* 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	428 /* Op_SrcImm */ { imm },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	429 /* 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	430 /* 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	431 /* 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	432 /* 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	433 /* 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	434 /* 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	435 /* 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	436 /* 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	437 /* 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	438 /* Op_Branch */ { mri },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	439 /* Op_CBranch */ { imm },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	440 /* 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	441 /* 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	442 /* 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	443 /* 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	444 /* 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	445 /* 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	446 /* 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	447 /* 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	448 /* 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	449 /* 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	450 /* 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	451 /* 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	452 /* 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	453 /* 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	454 /* Op_FfdR */ { D\|rfp, 0, 0 },
1056 cc723604da95 Fixed two operand form of X86 fstp instruction. (throw away second operand!) Tomas Lindquist Olsen <tomas.l.olsen gmail.com> parents: 944 diff changeset	455 /* Op_Ffd_P */ { D\|mfp, 0, 0, FP_Types, Clb_ST, Next_Form, Op_FfdR_P }, // pop, fld so also 80 bit, "
cc723604da95 Fixed two operand form of X86 fstp instruction. (throw away second operand!) Tomas Lindquist Olsen <tomas.l.olsen gmail.com> parents: 944 diff changeset	456 /* Op_FfdR_P */ { D\|rfp, 0, 0, 0, Clb_ST, Next_Form, Op_FfdRR_P },
cc723604da95 Fixed two operand form of X86 fstp instruction. (throw away second operand!) Tomas Lindquist Olsen <tomas.l.olsen gmail.com> parents: 944 diff changeset	457 /* Op_FfdRR_P */ { D\|mfp\|rfp,rfp,0, 0, Clb_ST },
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	458 /* 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	459 /* 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	460 /* 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	461 /* 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	462 /* 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	463 /* 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	464 /* 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	465 /* 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	466 /* 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	467 /* 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	468 /* 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	469 /* 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	470 /* 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	471 /* 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	472 /* 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	473 /* 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	474 /* 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	475 /* 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	476 /* Op_bswap */ { D\|r32 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	477 /* 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	478 /* 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	479 /* 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	480 /* 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	481 /* 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	482 /* 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	483 /* 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	484 /* 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	485 /* 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	486 /* 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	487 /* 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	488 /* 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	489 /* 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	490 /* 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	491 /* 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	492 /* 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	493 /* 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	494 /* 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	495 /* 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	496 /* 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	497 /* 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	498 /* 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	499 /* 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	500 /* 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	501 /* 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	502 /* 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	503 /* 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	504 /* 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	505 /* 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	506 /* 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	507 /* 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	508 /* 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	509 /* 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	510 /* 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	511 /* 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	512 /* 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	513 /* 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	514 /* 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	515
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	516 /// * 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	517 /// * 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	518 /// * 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	519 /// * 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	520 /// * 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	521 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	522
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	523 #undef mri
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	524 #undef mr
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	525 #undef mem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	526 #undef mfp
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	527 #undef reg
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	528 #undef imm
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	529 #undef sse
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	530 #undef ssem
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	531 #undef mmx
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	532 #undef mmxm
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	533 #undef r32
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	534 #undef rw
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	535 #undef rfp
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	536 #undef port
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	537 #undef ax
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	538 #undef dx
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	539 #undef shft
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	540 #undef D
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	541 #undef U
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	542 #undef N
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	543 //#undef L
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	544
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	545 typedef struct
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	546 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	547 const char * inMnemonic;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	548 AsmOp asmOp;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	549 } AsmOpEnt;
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 /* 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	552
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	553 cmov, l<segreg> ?, lea, lsl, shld
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	554
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	555 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	556 */
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	557
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	558 static AsmOpEnt opData[] =
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	559 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	560 { "aaa", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	561 { "aad", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	562 { "aam", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	563 { "aas", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	564 { "adc", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	565 { "add", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	566 { "addpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	567 { "addps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	568 { "addsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	569 { "addss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	570 { "addsubpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	571 { "addsubps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	572 { "align", Op_Align },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	573 { "and", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	574 { "andnpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	575 { "andnps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	576 { "andpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	577 { "andps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	578 { "arpl", Op_UpdSrcNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	579 { "bound", Op_bound },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	580 { "bsf", Op_SrcSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	581 { "bsr", Op_SrcSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	582 { "bswap", Op_bswap },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	583 { "bt", Op_SrcSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	584 { "btc", Op_UpdSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	585 { "btr", Op_UpdSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	586 { "bts", Op_UpdSrcFW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	587 { "call", Op_Branch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	588 { "cbw", Op_0_AX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	589 { "cdq", Op_0_DXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	590 { "clc", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	591 { "cld", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	592 { "clflush",Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	593 { "cli", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	594 { "clts", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	595 { "cmc", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	596 { "cmova", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	597 { "cmovae", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	598 { "cmovb", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	599 { "cmovbe", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	600 { "cmovc", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	601 { "cmove", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	602 { "cmovg", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	603 { "cmovge", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	604 { "cmovl", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	605 { "cmovle", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	606 { "cmovna", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	607 { "cmovnae",Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	608 { "cmovnb", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	609 { "cmovnbe",Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	610 { "cmovnc", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	611 { "cmovne", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	612 { "cmovng", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	613 { "cmovnge",Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	614 { "cmovnl", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	615 { "cmovnle",Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	616 { "cmovno", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	617 { "cmovnp", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	618 { "cmovns", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	619 { "cmovnz", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	620 { "cmovo", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	621 { "cmovp", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	622 { "cmovpe", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	623 { "cmovpo", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	624 { "cmovs", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	625 { "cmovz", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	626 { "cmp", Op_SrcSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	627 { "cmppd", Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	628 { "cmpps", Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	629 { "cmps", Op_cmps },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	630 { "cmpsb", Op_cmpsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	631 { "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	632 { "cmpss", Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	633 { "cmpsw", Op_cmpsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	634 { "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	635 { "cmpxchg", Op_cmpxchg },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	636 { "comisd", Op_SrcSrcSSEF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	637 { "comiss", Op_SrcSrcSSEF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	638 { "cpuid", Op_cpuid },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	639 { "cvtdq2pd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	640 { "cvtdq2ps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	641 { "cvtpd2dq", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	642 { "cvtpd2pi", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	643 { "cvtpd2ps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	644 { "cvtpi2pd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	645 { "cvtpi2ps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	646 { "cvtps2dq", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	647 { "cvtps2pd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	648 { "cvtps2pi", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	649 { "cvtsd2si", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	650 { "cvtsd2ss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	651 { "cvtsi2sd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	652 { "cvtsi2ss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	653 { "cvtss2sd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	654 { "cvtss2si", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	655 { "cvttpd2dq", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	656 { "cvttpd2pi", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	657 { "cvttps2dq", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	658 { "cvttps2pi", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	659 { "cvttsd2si", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	660 { "cvttss2si", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	661 { "cwd", Op_0_DXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	662 { "cwde", Op_0_AX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	663 //{ "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	664 { "daa", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	665 { "das", Op_Adjust },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	666 { "db", Op_db },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	667 { "dd", Op_dd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	668 { "de", Op_de },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	669 { "dec", Op_UpdF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	670 { "df", Op_df },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	671 { "di", Op_di },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	672 { "div", Op_Src_DXAXF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	673 { "divpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	674 { "divps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	675 { "divsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	676 { "divss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	677 { "dl", Op_dl },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	678 { "dq", Op_dl },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	679 { "ds", Op_ds },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	680 { "dt", Op_de },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	681 { "dw", Op_ds },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	682 { "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	683 { "enter", Op_enter },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	684 { "even", Op_Even },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	685 { "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	686 { "fabs", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	687 { "fadd", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	688 { "faddp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	689 { "fbld", Op_Fs_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	690 { "fbstp", Op_Fd_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	691 { "fchs", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	692 { "fclex", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	693 { "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	694 { "fcmovbe", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	695 { "fcmove", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	696 { "fcmovnb", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	697 { "fcmovnbe", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	698 { "fcmovne", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	699 { "fcmovnu", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	700 { "fcmovu", Op_FdSTiSTi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	701 { "fcom", Op_FCmp },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	702 { "fcomi", Op_FCmpFlg },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	703 { "fcomip", Op_FCmpFlgP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	704 { "fcomp", Op_FCmpP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	705 { "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	706 { "fcos", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	707 { "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	708 { "fdisi", Op_fdisi },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	709 { "fdiv", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	710 { "fdivp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	711 { "fdivr", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	712 { "fdivrp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	713 { "feni", Op_feni },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	714 { "ffree", Op_FdST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	715 { "fiadd", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	716 { "ficom", Op_Fis },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	717 { "ficomp", Op_Fis_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	718 { "fidiv", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	719 { "fidivr", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	720 { "fild", Op_Fis_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	721 { "fimul", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	722 { "fincstp",Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	723 { "finit", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	724 { "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	725 { "fistp", Op_Fid_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	726 { "fisttp", Op_Fid_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	727 { "fisub", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	728 { "fisubr", Op_Fis_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	729 { "fld", Op_fld },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	730 { "fld1", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	731 { "fldcw", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	732 { "fldenv", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	733 { "fldl2e", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	734 { "fldl2t", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	735 { "fldlg2", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	736 { "fldln2", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	737 { "fldpi", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	738 { "fldz", Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	739 { "fmul", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	740 { "fmulp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	741 { "fnclex", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	742 { "fndisi", Op_fdisi }, // ??
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	743 { "fneni", Op_feni }, // ??
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	744 { "fninit", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	745 { "fnop", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	746 { "fnsave", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	747 { "fnstcw", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	748 { "fnstenv",Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	749 { "fnstsw", Op_fXstsw },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	750 { "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	751 { "fprem", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	752 { "fprem1", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	753 { "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	754 { "frndint",Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	755 { "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	756 { "fsave", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	757 { "fscale", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	758 { "fsetpm", Op_fsetpm },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	759 { "fsin", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	760 { "fsincos",Op_F0_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	761 { "fsqrt", Op_F0_ST },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	762 { "fst", Op_Ffd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	763 { "fstcw", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	764 { "fstenv", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	765 { "fstp", Op_Ffd_P },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	766 { "fstsw", Op_fXstsw },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	767 { "fsub", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	768 { "fsubp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	769 { "fsubr", Op_FMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	770 { "fsubrp", Op_FPMath },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	771 { "ftst", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	772 { "fucom", Op_FCmp },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	773 { "fucomi", Op_FCmpFlg },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	774 { "fucomip",Op_FCmpFlgP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	775 { "fucomp", Op_FCmpP },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	776 { "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	777 { "fwait", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	778 { "fxam", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	779 { "fxch", Op_fxch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	780 { "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	781 { "fxsave", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	782 { "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	783 { "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	784 { "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	785 { "haddpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	786 { "haddps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	787 { "hlt", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	788 { "hsubpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	789 { "hsubps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	790 { "idiv", Op_Src_DXAXF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	791 { "imul", Op_imul },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	792 { "in", Op_in },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	793 { "inc", Op_UpdF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	794 { "ins", Op_ins },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	795 { "insb", Op_insX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	796 { "insd", Op_insX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	797 { "insw", Op_insX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	798 { "int", Op_SrcImm },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	799 { "into", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	800 { "invd", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	801 { "invlpg", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	802 { "iret", Op_iret },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	803 { "iretd", Op_iretd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	804 { "ja", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	805 { "jae", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	806 { "jb", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	807 { "jbe", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	808 { "jc", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	809 { "jcxz", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	810 { "je", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	811 { "jecxz", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	812 { "jg", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	813 { "jge", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	814 { "jl", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	815 { "jle", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	816 { "jmp", Op_Branch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	817 { "jna", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	818 { "jnae", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	819 { "jnb", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	820 { "jnbe", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	821 { "jnc", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	822 { "jne", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	823 { "jng", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	824 { "jnge", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	825 { "jnl", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	826 { "jnle", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	827 { "jno", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	828 { "jnp", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	829 { "jns", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	830 { "jnz", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	831 { "jo", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	832 { "jp", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	833 { "jpe", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	834 { "jpo", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	835 { "js", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	836 { "jz", Op_CBranch },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	837 { "lahf", Op_0_AX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	838 { "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	839 { "lddqu", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	840 { "ldmxcsr", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	841 { "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	842 { "lea", Op_DstSrc }, // "
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	843 { "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	844 { "les", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	845 { "lfence",Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	846 { "lfs", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	847 { "lgdt", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	848 { "lgs", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	849 { "lidt", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	850 { "lldt", Op_SrcRMWNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	851 { "lmsw", Op_SrcRMWNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	852 { "lock", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	853 { "lods", Op_lods },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	854 { "lodsb", Op_lodsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	855 { "lodsd", Op_lodsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	856 { "lodsw", Op_lodsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	857 { "loop", Op_Loop },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	858 { "loope", Op_Loop },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	859 { "loopne",Op_Loop },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	860 { "loopnz",Op_Loop },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	861 { "loopz", Op_Loop },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	862 { "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	863 { "lss", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	864 { "ltr", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	865 { "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	866 { "maskmovq", Op_SrcSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	867 { "maxpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	868 { "maxps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	869 { "maxsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	870 { "maxss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	871 { "mfence",Op_0},
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	872 { "minpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	873 { "minps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	874 { "minsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	875 { "minss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	876 { "monitor", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	877 { "mov", Op_DstSrc },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	878 { "movapd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	879 { "movaps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	880 { "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	881 { "movddup", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	882 { "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	883 { "movdqa", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	884 { "movdqu", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	885 { "movhlps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	886 { "movhpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	887 { "movhps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	888 { "movlhps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	889 { "movlpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	890 { "movlps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	891 { "movmskpd",Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	892 { "movmskps",Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	893 { "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	894 { "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	895 { "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	896 { "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	897 { "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	898 { "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	899 { "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	900 { "movs", Op_movs },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	901 { "movsb", Op_movsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	902 { "movsd", Op_movsd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	903 { "movshdup", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	904 { "movsldup", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	905 { "movss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	906 { "movsw", Op_movsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	907 { "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	908 { "movupd",Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	909 { "movups",Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	910 { "movzx", Op_movzx },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	911 { "mul", Op_mul },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	912 { "mulpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	913 { "mulps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	914 { "mulsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	915 { "mulss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	916 { "mwait", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	917 { "naked", Op_Naked },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	918 { "neg", Op_UpdF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	919 { "nop", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	920 { "not", Op_Upd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	921 { "or", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	922 { "orpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	923 { "orps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	924 { "out", Op_out },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	925 { "outs", Op_outs },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	926 { "outsb", Op_outsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	927 { "outsd", Op_outsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	928 { "outsw", Op_outsX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	929 { "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	930 { "packsswb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	931 { "packuswb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	932 { "paddb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	933 { "paddd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	934 { "paddq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	935 { "paddsb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	936 { "paddsw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	937 { "paddusb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	938 { "paddusw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	939 { "paddw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	940 { "pand", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	941 { "pandn", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	942 { "pavgb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	943 { "pavgw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	944 { "pcmpeqb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	945 { "pcmpeqd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	946 { "pcmpeqw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	947 { "pcmpgtb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	948 { "pcmpgtd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	949 { "pcmpgtw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	950 { "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	951 { "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	952 { "pmaddwd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	953 { "pmaxsw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	954 { "pmaxub", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	955 { "pminsw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	956 { "pminub", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	957 { "pmovmskb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	958 { "pmulhuw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	959 { "pmulhw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	960 { "pmullw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	961 { "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	962 { "pop", Op_DstW },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	963 { "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	964 { "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	965 { "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	966 { "popfd", Op_SizedStack },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	967 { "por", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	968 { "prefetchnta", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	969 { "prefetcht0", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	970 { "prefetcht1", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	971 { "prefetcht2", Op_SrcMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	972 { "psadbw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	973 { "pshufd", Op_DstSrcImmM },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	974 { "pshufhw", Op_DstSrcImmM },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	975 { "pshuflw", Op_DstSrcImmM },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	976 { "pshufw", Op_DstSrcImmM },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	977 { "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	978 { "pslldq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	979 { "psllq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	980 { "psllw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	981 { "psrad", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	982 { "psraw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	983 { "psrld", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	984 { "psrldq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	985 { "psrlq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	986 { "psrlw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	987 { "psubb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	988 { "psubd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	989 { "psubq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	990 { "psubsb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	991 { "psubsw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	992 { "psubusb", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	993 { "psubusw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	994 { "psubw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	995 { "punpckhbw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	996 { "punpckhdq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	997 { "punpckhqdq",Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	998 { "punpckhwd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	999 { "punpcklbw", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1000 { "punpckldq", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1001 { "punpcklqdq",Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1002 { "punpcklwd", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1003 { "push", Op_push },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1004 { "pusha", Op_SizedStack },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1005 { "pushad", Op_SizedStack },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1006 { "pushf", Op_SizedStack },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1007 { "pushfd", Op_SizedStack },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1008 { "pxor", Op_DstSrcMMX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1009 { "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	1010 { "rcpps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1011 { "rcpss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1012 { "rcr", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1013 { "rdmsr", Op_0_DXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1014 { "rdpmc", Op_0_DXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1015 { "rdtsc", Op_0_DXAX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1016 { "rep", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1017 { "repe", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1018 { "repne", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1019 { "repnz", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1020 { "repz", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1021 { "ret", Op_ret },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1022 { "retf", Op_retf },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1023 { "rol", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1024 { "ror", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1025 { "rsm", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1026 { "rsqrtps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1027 { "rsqrtss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1028 { "sahf", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1029 { "sal", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1030 { "sar", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1031 { "sbb", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1032 { "scas", Op_scas },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1033 { "scasb", Op_scasX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1034 { "scasd", Op_scasX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1035 { "scasw", Op_scasX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1036 { "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	1037 { "setae", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1038 { "setb", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1039 { "setbe", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1040 { "setc", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1041 { "sete", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1042 { "setg", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1043 { "setge", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1044 { "setl", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1045 { "setle", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1046 { "setna", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1047 { "setnae", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1048 { "setnb", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1049 { "setnbe", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1050 { "setnc", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1051 { "setne", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1052 { "setng", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1053 { "setnge", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1054 { "setnl", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1055 { "setnle", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1056 { "setno", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1057 { "setnp", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1058 { "setns", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1059 { "setnz", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1060 { "seto", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1061 { "setp", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1062 { "setpe", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1063 { "setpo", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1064 { "sets", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1065 { "setz", Op_DstRMBNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1066 { "sfence", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1067 { "sgdt", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1068 { "shl", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1069 { "shld", Op_UpdSrcShft },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1070 { "shr", Op_Shift },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1071 { "shrd", Op_UpdSrcShft },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1072 { "shufpd", Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1073 { "shufps", Op_DstSrcImmS },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1074 { "sidt", Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1075 { "sldt", Op_DstRMWNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1076 { "smsw", Op_DstRMWNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1077 { "sqrtpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1078 { "sqrtps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1079 { "sqrtsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1080 { "sqrtss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1081 { "stc", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1082 { "std", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1083 { "sti", Op_Flags },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1084 { "stmxcsr",Op_DstMemNT },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1085 { "stos", Op_stos },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1086 { "stosb", Op_stosX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1087 { "stosd", Op_stosX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1088 { "stosw", Op_stosX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1089 { "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	1090 { "sub", Op_UpdSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1091 { "subpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1092 { "subps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1093 { "subsd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1094 { "subss", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1095 { "sysenter",Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1096 { "sysexit", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1097 { "test", Op_SrcSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1098 { "ucomisd", Op_SrcSrcSSEF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1099 { "ucomiss", Op_SrcSrcSSEF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1100 { "ud2", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1101 { "unpckhpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1102 { "unpckhps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1103 { "unpcklpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1104 { "unpcklps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1105 { "verr", Op_SrcMemNTF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1106 { "verw", Op_SrcMemNTF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1107 { "wait", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1108 { "wbinvd", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1109 { "wrmsr", Op_0 },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1110 { "xadd", Op_UpdUpdF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1111 { "xchg", Op_UpdUpd },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1112 { "xlat", Op_xlat },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1113 { "xlatb", Op_0_AX },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1114 { "xor", Op_DstSrcF },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1115 { "xorpd", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1116 { "xorps", Op_DstSrcSSE },
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1117 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1118
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1119 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1120 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1121 Default_Ptr = 0,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1122 Byte_Ptr = 1,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1123 Short_Ptr = 2,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1124 Int_Ptr = 4,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1125 QWord_Ptr = 8,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1126 Float_Ptr = 4,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1127 Double_Ptr = 8,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1128 Extended_Ptr = 10,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1129 Near_Ptr = 98,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1130 Far_Ptr = 99,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1131 N_PtrTypes
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1132 } PtrType;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1133
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1134 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	1135 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	1136 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1137 "word", "dword", "qword",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1138 "float", "double", "extended",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1139 "near", "far"
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1140 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1141
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1142 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	1143 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	1144 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1145 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	1146 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	1147 Near_Ptr, Far_Ptr
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1148 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1149
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1150 typedef enum
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1151 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1152 Opr_Invalid,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1153 Opr_Immediate,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1154 Opr_Reg,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1155 Opr_Mem
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1156 } OperandClass;
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 /* kill inlining if we reference a local? */
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 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	1161
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1162 /* 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	1163 if naked.. */
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1164
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1165 // mov eax, 4
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1166 // 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	1167 // -- 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	1168
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1169 static Token eof_tok;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1170 static Expression * Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1171 static Identifier * ident_seg;
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 struct AsmProcessor
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1174 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1175 typedef struct
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1176 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1177 int inBracket;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1178 int hasBracket;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1179 int hasNumber;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1180 int isOffset;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1181
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1182 Reg segmentPrefix;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1183 Reg reg;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1184 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	1185 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	1186 Reg baseReg;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1187 Reg indexReg;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1188 int scale;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1189
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1190 OperandClass cls;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1191 PtrType dataSize;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1192 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	1193 } Operand;
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 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	1196
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1197 AsmStatement * stmt;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1198 Scope * sc;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1199
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1200 Token * token;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1201 OutBuffer * insnTemplate;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1202
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1203 AsmOp op;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1204 AsmOpInfo * opInfo;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1205 Operand operands[Max_Operands];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1206 Identifier * opIdent;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1207 Operand * operand;
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 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	1210 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1211 this->sc = sc;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1212 this->stmt = stmt;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1213 token = stmt->tokens;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1214 insnTemplate = new OutBuffer;
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 opInfo = NULL;
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 if ( ! regInfo[0].ident )
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 char buf[8], *p;
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 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	1223 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1224 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	1225 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	1226 p = std::tolower ( p );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1227 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	1228 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	1229 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	1230 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1231
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1232 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	1233 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	1234
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1235 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	1236
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1237 ident_seg = Lexer::idPool ( "seg" );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1238
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1239 eof_tok.value = TOKeof;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1240 eof_tok.next = 0;
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 }
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 void run()
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 parse();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1247 }
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 void nextToken()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1250 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1251 if ( token->next )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1252 token = token->next;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1253 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1254 token = & eof_tok;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1255 }
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 Token * peekToken()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1258 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1259 if ( token->next )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1260 return token->next;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1261 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1262 return & eof_tok;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1263 }
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 void expectEnd()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1266 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1267 if ( token->value != TOKeof )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1268 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	1269 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1270
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1271 void parse()
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 op = parseOpcode();
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 switch ( op )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1276 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1277 case Op_Align:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1278 doAlign();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1279 expectEnd();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1280 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1281 case Op_Even:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1282 doEven();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1283 expectEnd();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1284 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1285 case Op_Naked:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1286 doNaked();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1287 expectEnd();
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 case Op_Invalid:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1290 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1291 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1292 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	1293 doData();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1294 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1295 doInstruction();
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 }
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 AsmOp parseOpcode()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1300 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1301 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	1302
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1303 switch ( token->value )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1304 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1305 case TOKalign:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1306 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1307 return Op_Align;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1308 case TOKin:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1309 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1310 opIdent = Id::___in;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1311 return Op_in;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1312 case TOKint32: // "int"
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1313 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1314 opIdent = Id::__int;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1315 return Op_SrcImm;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1316 case TOKout:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1317 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1318 opIdent = Id::___out;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1319 return Op_out;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1320 case TOKidentifier:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1321 // search for mnemonic below
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1322 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1323 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1324 stmt->error ( "expected opcode" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1325 return Op_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1326 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1327
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1328 opIdent = token->ident;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1329 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	1330
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1331 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1332
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1333 // %% okay to use bsearch?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1334 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	1335 do
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1336 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1337 k = ( i + j ) / 2;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1338 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	1339 if ( ! l )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1340 return opData[k].asmOp;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1341 else if ( l < 0 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1342 j = k;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1343 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1344 i = k + 1;
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 while ( i != j );
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 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	1349
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1350 return Op_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1351 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1352
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1353 // 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	1354 void doInstruction()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1355 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1356 bool ok = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1357 unsigned operand_i = 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1358
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1359 opInfo = & asmOpInfo[op];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1360 memset ( operands, 0, sizeof ( operands ) );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1361
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1362 while ( token->value != TOKeof )
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 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	1365 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1366 operand = & operands[operand_i];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1367 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	1368 operand->segmentPrefix = Reg_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1369 parseOperand();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1370 operand_i++;
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 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1373 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1374 ok = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1375 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	1376 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1377 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1378
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1379 if ( token->value == TOKcomma )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1380 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1381 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	1382 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1383 ok = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1384 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	1385 return;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1386 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1387 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1388 // 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	1389 // ok = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1390 // 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	1391 // }
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 if ( matchOperands ( operand_i ) )
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 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	1396
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1397 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	1398 stmt->asmcode = ( code * ) asmcode;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1399 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1400 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1401
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1402 void setAsmCode()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1403 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1404 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	1405 asmcode->insnTemplateLen = insnTemplate->offset;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1406 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	1407 stmt->asmcode = ( code* ) asmcode;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1408 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1409
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1410 // 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	1411 bool matchOperands ( unsigned nOperands )
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 bool wrong_number = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1414
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1415 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	1416 classifyOperand ( & operands[i] );
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 while ( 1 )
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 if ( nOperands == opInfo->nOperands() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1421 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1422 wrong_number = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1423 /* 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	1424 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	1425 Op_FCmpP/Op_FCmpP1 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1426 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	1427 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1428 Operand * operand = & operands[i];
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 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	1431 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1432 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	1433 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	1434 goto no_match;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1435 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1436 case OprC_RFP:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1437 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	1438 goto no_match;
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 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1441 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1442 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1443 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1444
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1445 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1446 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1447 no_match:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1448 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	1449 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	1450 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1451 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1452 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1453 if ( wrong_number )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1454 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	1455 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1456 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	1457 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1458 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1459
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1460 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	1461 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1462 if ( sc->func->naked )
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 switch ( type )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1465 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1466 case Arg_Integer:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1467 if ( e->type->isunsigned() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1468 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	1469 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1470 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	1471 break;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1472
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1473 case Arg_Pointer:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1474 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	1475 break;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1476
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1477 case Arg_Memory:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1478 if ( e->op == TOKvar )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1479 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1480 VarExp* v = ( VarExp* ) e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1481 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	1482 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1483 if ( !vd->isDataseg() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1484 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1485 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	1486 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1487 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1488
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1489 // 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	1490 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	1491 insnTemplate->writestring ( "_" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1492
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1493 // print out the mangle
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1494 insnTemplate->writestring ( vd->mangle() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1495 vd->nakedUse = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1496 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1497 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1498 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1499 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	1500 break;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1501
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1502 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1503 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	1504 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1505 }
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 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1508 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1509 insnTemplate->writestring ( ( char* ) fmt );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1510 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	1511 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	1512 }
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 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	1515 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1516 assert ( !sc->func->naked );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1517 insnTemplate->writestring ( ( char* ) fmtpre );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1518 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	1519 insnTemplate->writestring ( ( char* ) fmtpost );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1520 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	1521 }
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 void addLabel ( char* id )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1524 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1525 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	1526 insnTemplate->writestring ( "_" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1527 insnTemplate->writestring ( id );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1528 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1529
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1530 /* 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	1531 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	1532 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	1533 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	1534 void classifyOperand ( Operand * operand )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1535 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1536 operand->cls = classifyOperand1 ( operand );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1537 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1538
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1539 OperandClass classifyOperand1 ( Operand * operand )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1540 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1541 bool is_localsize = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1542 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	1543
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1544 if ( operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1545 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1546 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	1547 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	1548 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1549
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1550 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	1551 return Opr_Immediate;
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->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	1554 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1555 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	1556 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1557 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1558 return Opr_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1559 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1560
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1561 return Opr_Mem;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1562 }
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 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	1565 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1566 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1567 return Opr_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1568 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1569
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1570 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	1571 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1572 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	1573 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1574 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1575 return Opr_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1576 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1577
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1578 return Opr_Mem;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1579 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1580
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1581 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	1582 return Opr_Reg;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	1583
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1584 // 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	1585 //
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1586 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	1587 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1588 // 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	1589 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	1590 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1591 if ( operand->constDisplacement < 0x100 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1592 operand->dataSize = Byte_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1593 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	1594 operand->dataSize = Short_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1595 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1596 operand->dataSize = Int_Ptr;
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 return Opr_Immediate;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1599 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1600
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1601 // probably a bug,?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1602 stmt->error ( "invalid operand" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1603 return Opr_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1604 }
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 void writeReg ( Reg reg )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1607 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1608 insnTemplate->writestring ( ( char* ) "%" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1609 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	1610 }
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 bool opTakesLabel()
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 switch ( op )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1615 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1616 case Op_Branch:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1617 case Op_CBranch:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1618 case Op_Loop:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1619 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1620 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1621 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1622 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1623 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: 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 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	1626 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1627 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	1628 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1629 case Byte_NoType:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1630 return ptrtype == Byte_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1631 case Word_Types:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1632 if ( ptrtype == Byte_Ptr )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1633 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1634 // drop through
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1635 case Int_Types:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1636 switch ( ptrtype )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1637 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1638 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	1639 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	1640 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	1641 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1642 // %% 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	1643 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1644 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1645 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1646 case FPInt_Types:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1647 switch ( ptrtype )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1648 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1649 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	1650 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	1651 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	1652 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1653 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1654 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1655 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1656 case FP_Types:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1657 switch ( ptrtype )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1658 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1659 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	1660 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	1661 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	1662 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1663 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1664 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1665 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1666 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1667 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1668 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1669 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1670 }
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	1671
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1672 // also set impl clobbers
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1673 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	1674 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1675 const char *fmt;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1676 const char *mnemonic;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1677 char type_char = 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1678 bool use_star;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1679 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	1680
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1681 insnTemplate = new OutBuffer;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1682 // %% 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	1683 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	1684 mnemonic = alternateMnemonics[opInfo->link];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1685 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1686 mnemonic = opIdent->string;
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 if ( opInfo->needsType )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1689 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1690 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	1691 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	1692 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	1693
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1694 /* 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	1695 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	1696 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1697 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	1698 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	1699 case FPInt_Types:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1700 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	1701 min_type = Int_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1702 else // compare, load, store
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1703 min_type = Short_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1704 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1705 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	1706 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1707 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	1708 min_type = Int_Ptr;
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 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	1711 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1712 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	1713 ! ( 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	1714 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	1715
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1716 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	1717 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	1718 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1719 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	1720 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1721 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	1722 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	1723 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1724 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1725 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1726 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	1727 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	1728 }
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	1729 }
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1730
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1731 bool type_ok;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1732 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	1733 {
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, hint_type, type_char );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1735 if ( ! type_ok )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1736 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	1737 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1738 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1739 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	1740
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1741 if ( ! type_ok )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1742 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1743 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	1744 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1745 }
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 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	1748 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1749 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	1750 insnTemplate->writebyte ( 'l' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1751 }
1056 cc723604da95 Fixed two operand form of X86 fstp instruction. (throw away second operand!) Tomas Lindquist Olsen <tomas.l.olsen gmail.com> parents: 944 diff changeset	1752 else if ( op == Op_fxch \|\| op == Op_FfdRR_P)
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1753 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1754 // 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	1755 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	1756 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1757 nOperands = 1;
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 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1760 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1761 stmt->error ( "invalid operands" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1762 return false;
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 }
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 switch ( op )
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 case Op_SizedStack:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1769 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1770 int mlen = strlen ( mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1771 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	1772 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	1773 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1774 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1775 insnTemplate->writestring ( ( char* ) mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1776 insnTemplate->writebyte ( 'w' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1777 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1778 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1779 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1780 case Op_cmpsd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1781 case Op_insX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1782 case Op_lodsX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1783 case Op_movsd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1784 case Op_outsX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1785 case Op_scasX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1786 case Op_stosX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1787 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1788 int mlen = strlen ( mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1789 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	1790 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1791 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	1792 insnTemplate->writebyte ( 'l' );
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 else
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 insnTemplate->writestring ( ( char* ) mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1797 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1798 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1799 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1800 case Op_movsx:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1801 case Op_movzx:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1802 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1803 char tc_1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1804 int mlen = strlen ( mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1805 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	1806 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	1807 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	1808 // 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	1809 switch ( op1_size )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1810 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1811 case Byte_Ptr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1812 case Default_Ptr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1813 tc_1 = 'b';
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1814 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1815 case Short_Ptr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1816 tc_1 = 'w';
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1817 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1818 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1819 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	1820 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1821 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1822 assert ( type_char != 0 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1823 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	1824 insnTemplate->writebyte ( tc_1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1825 insnTemplate->writebyte ( type_char );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1826 }
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	1827 break;
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1828 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1829 insnTemplate->writestring ( ( char* ) mnemonic );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1830 if ( type_char )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1831 insnTemplate->writebyte ( type_char );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1832 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1833 }
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 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	1836 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1837 case Clb_SizeAX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1838 case Clb_EAX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1839 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	1840 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1841 case Clb_SizeDXAX:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1842 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	1843 if ( type_char != 'b' )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1844 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	1845 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1846 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1847 // nothing
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1848 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1849 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1850
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_DI )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1852 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	1853 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	1854 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	1855 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	1856 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	1857 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	1858 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	1859 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	1860 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1861 /* 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	1862 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	1863 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	1864 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	1865 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	1866 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	1867 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	1868 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	1869 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	1870 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	1871 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	1872 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	1873 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	1874 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1875 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	1876 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	1877 if ( op == Op_cpuid )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1878 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1879 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	1880 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	1881 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	1882 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1883
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1884 insnTemplate->writebyte ( ' ' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1885 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	1886 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1887 int i;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1888 if ( i__ != 0 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1889 insnTemplate->writestring ( ( char* ) ", " );
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 fmt = "$";
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 switch ( op )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1894 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1895 case Op_mul:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1896 // 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	1897 i__ = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1898 // drop through
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1899 case Op_bound:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1900 case Op_enter:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1901 i = i__;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1902 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1903 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1904 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	1905 break;
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 operand = & operands[ i ];
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 switch ( operand->cls )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1910 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1911 case Opr_Immediate:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1912 // for implementing offset:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1913 // $var + $7 // fails
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1914 // $var + 7 // ok
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1915 // $7 + $var // ok
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 // 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	1918 /*
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1919 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	1920 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	1921 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1922 if ( opTakesLabel() /opInfo->takesLabel()/ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1923 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1924 // "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	1925 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	1926 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1927 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1928
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1929 if ( operand->symbolDisplacement.dim &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1930 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	1931 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1932 // 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	1933 // 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	1934 addOperand ( "$", Arg_LocalSize,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1935 ( 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	1936 if ( operand->constDisplacement )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1937 insnTemplate->writebyte ( '+' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1938 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1939 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1940 }
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 if ( operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1943 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1944 fmt = "$a";
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1945 addOperand ( "$", Arg_Pointer,
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1946 ( 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	1947 asmcode );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1948
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1949 if ( operand->constDisplacement )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1950 insnTemplate->writebyte ( '+' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1951 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1952 // 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	1953 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1954 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1955 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	1956 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1957 case Opr_Reg:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1958 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	1959 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1960 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	1961 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	1962 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1963 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	1964 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1965 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1966 if ( opTakesLabel() /opInfo->takesLabel()/ )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1967 insnTemplate->writebyte ( '*' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1968 writeReg ( operand->reg );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1969 /*
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1970 insnTemplate->writestring("%");
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1971 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	1972 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1973 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1974 case Opr_Mem:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1975 // 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	1976 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	1977 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1978 mode = Mode_Update;
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 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	1981 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1982 mode = Mode_Output;
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 else
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 mode = Mode_Input;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1987 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1988
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1989 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	1990 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	1991 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1992 writeReg ( operand->segmentPrefix );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1993 insnTemplate->writebyte ( ':' );
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 if ( operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1996 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1997 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	1998 Declaration * decl = 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	1999
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2000 if ( e->op == TOKvar )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2001 decl = ( ( VarExp * ) e )->var;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2002
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2003 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	2004 decl && ! decl->isDataseg() )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2005 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2006
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2007 // 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	2008
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2009 /* 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	2010 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	2011
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2012 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	2013 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	2014 the stack offset.
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2015 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2016
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2017 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	2018 decl->isVarDeclaration() &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2019 ( ( 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	2020 ( 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	2021 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2022
1055 5066ba0c9783 Apply [1053] to x86-32 asm as well. Frits van Bommel <fvbommel wxs.nl> parents: 944 diff changeset	2023 e = new AddrExp ( 0, e );
5066ba0c9783 Apply [1053] to x86-32 asm as well. Frits van Bommel <fvbommel wxs.nl> parents: 944 diff changeset	2024 e->type = decl->type->pointerTo();
944 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 #if !IN_LLVM
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2027 /* 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	2028 if ( sc->func->naked )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2029 operand->constDisplacement += 4;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2030
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2031 if ( operand->constDisplacement )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2032 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2033 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	2034 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	2035 Type::tint32 ) );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2036 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	2037 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2038 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	2039 e->type = decl->type;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2040 #endif
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2041 operand->constDisplacement = 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2042 operand->baseReg = Reg_Invalid;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2043
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2044 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	2045
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 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2048 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2049 // FIXME: what is this ?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2050 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	2051 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2052 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	2053 asmcode->clobbersMemory = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2054 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2055 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2056 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2057 // 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	2058
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2059 /* 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	2060 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	2061
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2062 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	2063 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	2064 */
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2065 if ( isDollar ( e ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2066 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2067 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	2068 asmcode->dollarLabel = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2069 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2070 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	2071 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2072 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	2073 stmt->isBranchToLabel = lbl->ident;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2074
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2075 use_star = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2076 addLabel ( lbl->ident->toChars() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2077 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2078 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	2079 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2080 use_star = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2081 // 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	2082 // on osx, prepend extra _
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2083 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	2084 insnTemplate->writestring ( "_" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2085 insnTemplate->writestring ( decl->mangle() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2086 // 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	2087 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2088 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2089 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2090 if ( use_star )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2091 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2092 insnTemplate->writebyte ( '*' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2093 use_star = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2094 }
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 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	2097 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2098 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	2099 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	2100 e->type = tt;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2101 }
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 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	2104 }
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 if ( use_star )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2108 insnTemplate->writebyte ( '*' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2109 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	2110 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2111 if ( operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2112 insnTemplate->writebyte ( '+' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2113 //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	2114 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	2115 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	2116 asmcode->clobbersMemory = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2117 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2118 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	2119 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2120 insnTemplate->writebyte ( '(' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2121 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	2122 writeReg ( operand->baseReg );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2123 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	2124 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2125 insnTemplate->writebyte ( ',' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2126 writeReg ( operand->indexReg );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2127 if ( operand->scale )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2128 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2129 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	2130 }
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 insnTemplate->writebyte ( ')' );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2133 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	2134 asmcode->clobbersMemory = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2135 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2136 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2137 case Opr_Invalid:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2138 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2139 }
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 asmcode->insnTemplateLen = insnTemplate->offset;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2143 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	2144 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2145 }
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 bool isIntExp ( Expression * exp )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2148 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2149 if ( exp->op == TOKint64 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2150 return 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2151 if ( exp->op == TOKvar )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2152 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2153 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	2154 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	2155 return 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2156 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2157 return 0;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2158 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2159 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	2160 bool isLocalSize ( Expression * exp )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2161 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2162 // 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	2163 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	2164 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2165 bool isDollar ( Expression * exp )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2166 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2167 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	2168 }
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 Expression * newRegExp ( int regno )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2171 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2172 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	2173 e->op = TOKmod;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2174 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2175 }
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 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	2178 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2179 // 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	2180 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	2181 }
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 void slotExp ( Expression * exp )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2184 {
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 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	2187
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2188 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	2189 if reg:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2190 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	2191 if in bracket:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2192 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	2193 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	2194 else, error
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2195 if symbol:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2196 set symbol field
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2197 */
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 bool is_offset = false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2200 if ( exp->op == TOKaddress )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2201 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2202 exp = ( ( AddrExp * ) exp )->e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2203 is_offset = true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2204 }
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 if ( isIntExp ( exp ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2207 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2208 if ( is_offset )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2209 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2210 operand->constDisplacement += exp->toInteger();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2211 if ( ! operand->inBracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2212 operand->hasNumber = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2213 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2214 else if ( isRegExp ( exp ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2215 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2216 if ( is_offset )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2217 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2218 if ( ! operand->inBracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2219 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2220 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	2221 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	2222 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2223 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	2224 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2225 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2226 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2227 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	2228 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	2229 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	2230 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2231 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	2232 operand->scale = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2233 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2234 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2235 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2236 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	2237 }
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 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	2241 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2242 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	2243
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2244 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	2245 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2246 operand->constDisplacement += v->offset;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2247 if ( ! operand->inBracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2248 operand->hasNumber = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2249 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2250 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2251 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2252 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	2253 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2254 // 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	2255 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	2256 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	2257 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	2258 }
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 if ( ! operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2261 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2262 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	2263 operand->isOffset = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2264 operand->symbolDisplacement.push ( exp );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2265 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2266 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2267 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2268 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	2269 }
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 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	2273 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2274 // %% 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	2275 // change to addSymbolDisp(e)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2276 if ( ! operand->symbolDisplacement.dim )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2277 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2278 operand->symbolDisplacement.push ( exp );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2279 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2280 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2281 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2282 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	2283 }
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 else if ( exp == Handled )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2286 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2287 // nothing
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2288 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2289 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2290 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2291 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	2292 }
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 }
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2294
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2295 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	2296 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2297 // %% report operand number
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2298 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	2299 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2300
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2301 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	2302 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2303 Expression * e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2304 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	2305 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2306 switch ( op )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2307 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2308 case TOKadd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2309 if ( e2 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2310 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	2311 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2312 e = e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2313 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2314 case TOKmin:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2315 if ( e2 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2316 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	2317 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2318 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	2319 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2320 case TOKmul:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2321 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	2322 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2323 case TOKdiv:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2324 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	2325 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2326 case TOKmod:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2327 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	2328 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2329 case TOKshl:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2330 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	2331 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2332 case TOKshr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2333 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	2334 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2335 case TOKushr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2336 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	2337 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2338 case TOKnot:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2339 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	2340 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2341 case TOKtilde:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2342 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	2343 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2344 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2345 assert ( 0 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2346 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2347 e = e->semantic ( sc );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2348 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	2349 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2350 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2351 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2352 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	2353 return newIntExp ( 0 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2354 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2355 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2356
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2357 void parseOperand()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2358 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2359 Expression * exp = parseAsmExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2360 slotExp ( exp );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2361 if ( isRegExp ( exp ) )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2362 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	2363 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2364
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2365 Expression * parseAsmExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2366 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2367 return parseShiftExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2368 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2369
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2370 Expression * parseShiftExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2371 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2372 Expression * e1 = parseAddExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2373 Expression * e2;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2374
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2375 while ( 1 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2376 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2377 TOK tv = token->value;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2378 switch ( tv )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2379 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2380 case TOKshl:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2381 case TOKshr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2382 case TOKushr:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2383 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2384 e2 = parseAddExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2385 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	2386 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2387 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2388 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2389 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2390 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2391 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2392 return e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2393 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2394
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2395 Expression * parseAddExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2396 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2397 Expression * e1 = parseMultExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2398 Expression * e2;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2399
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2400 while ( 1 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2401 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2402 TOK tv = token->value;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2403 switch ( tv )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2404 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2405 case TOKadd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2406 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2407 e2 = parseMultExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2408 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	2409 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	2410 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2411 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2412 slotExp ( e1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2413 slotExp ( e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2414 e1 = Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2415 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2416 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2417 case TOKmin:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2418 // 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	2419 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2420 e2 = parseMultExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2421 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	2422 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	2423 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2424 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2425 slotExp ( e1 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2426 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	2427 slotExp ( e2 );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2428 e1 = Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2429 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2430 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2431 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2432 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2433 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2434 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2435 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2436 return e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2437 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2438
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2439 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	2440 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2441 Expression * et;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2442 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	2443 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2444 et = e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2445 e1 = e2;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2446 e2 = et;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2447 goto do_scale;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2448 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2449 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	2450 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2451 do_scale:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2452 if ( ! operand->inBracket )
221 68687d8c3e9a [svn r237] some inline asm output now seems to work, see tangotests/asm2.d lindquist parents: 220 diff changeset	2453 {
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2454 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	2455 }
222 251548c1035d [svn r238] use m for memory input constraints and pass in their address ChristianK* parents: 221 diff changeset	2456
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2457 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	2458 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2459 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2460 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2461 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2462
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2463 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	2464 operand->scale = e2->toInteger();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2465 switch ( operand->scale )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2466 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2467 case 1:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2468 case 2:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2469 case 4:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2470 case 8:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2471 // ok; do nothing
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2472 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2473 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2474 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	2475 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2476 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2477
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2478 return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2479 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2480 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2481 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2482
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2483 Expression * parseMultExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2484 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2485 Expression * e1 = parseBrExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2486 Expression * e2;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2487
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2488 while ( 1 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2489 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2490 TOK tv = token->value;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2491 switch ( tv )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2492 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2493 case TOKmul:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2494 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2495 e2 = parseMultExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2496 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	2497 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	2498 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	2499 e1 = Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2500 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2501 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2502 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2503 case TOKdiv:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2504 case TOKmod:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2505 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2506 e2 = parseMultExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2507 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	2508 continue;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2509 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2510 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2511 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2512 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2513 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2514 return e1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2515 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2516
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2517 Expression * parseBrExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2518 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2519 // %% 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	2520 // 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	2521
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2522 // 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	2523 // the spec'd syntax
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2524 Expression * e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2525
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2526 if ( token->value == TOKlbracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2527 e = Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2528 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2529 e = parseUnaExp();
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2530
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2531 // 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	2532 while ( token->value == TOKlbracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2533 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2534 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2535
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2536 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	2537 slotExp ( parseAsmExp() );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2538 operand->inBracket = 0;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2539
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2540 if ( token->value == TOKrbracket )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2541 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2542 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2543 stmt->error ( "missing ']'" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2544 }
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 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2547 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2548
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2549 PtrType isPtrType ( Token * tok )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2550 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2551 switch ( tok->value )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2552 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2553 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	2554 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	2555 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	2556 // '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	2557 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	2558 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	2559 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	2560 case TOKidentifier:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2561 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	2562 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	2563 return ptrTypeValueTable[i];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2564 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2565 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2566 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2567 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2568 return Default_Ptr;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2569 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2570
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2571 Expression * parseUnaExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2572 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2573 Expression * e = NULL;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2574 PtrType ptr_type;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2575
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2576 // 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	2577 if ( token->value != TOKeof &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2578 peekToken()->value == TOKidentifier &&
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2579 peekToken()->ident == Id::ptr )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2580 {
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2581
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2582 ptr_type = isPtrType ( token );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2583 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	2584 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2585 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	2586 operand->dataSize = ptr_type;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2587 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2588 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	2589 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2590 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2591 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	2592 nextToken();
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 return parseAsmExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2595 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2596
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2597 TOK tv = token->value;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2598 switch ( tv )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2599 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2600 case TOKidentifier:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2601 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	2602 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2603 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2604 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	2605 e = parseAsmExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2606 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2607 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	2608 token->ident == Id::offsetof )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2609 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2610 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	2611 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	2612 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2613 e = parseAsmExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2614 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	2615 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2616 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2617 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2618 // primary exp
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2619 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2620 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2621 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2622 case TOKadd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2623 case TOKmin:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2624 case TOKnot:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2625 case TOKtilde:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2626 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2627 e = parseUnaExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2628 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	2629 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2630 // primary exp
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2631 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2632 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2633 return parsePrimaryExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2634 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2635
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2636 Expression * parsePrimaryExp()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2637 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2638 Expression * e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2639 Identifier * ident = NULL;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2640
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2641 switch ( token->value )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2642 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2643 case TOKint32v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2644 case TOKuns32v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2645 case TOKint64v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2646 case TOKuns64v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2647 // semantic here?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2648 // %% 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	2649 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	2650 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2651 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2652 case TOKfloat32v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2653 case TOKfloat64v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2654 case TOKfloat80v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2655 // %% need different types?
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2656 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	2657 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2658 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2659 case TOKidentifier:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2660 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2661 ident = token->ident;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2662 nextToken();
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2663
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2664 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	2665 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2666 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	2667 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2668 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	2669 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2670 do_dollar:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2671 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	2672 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2673 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2674 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2675 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	2676 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2677
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2678 // 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	2679 // 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	2680 // 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	2681 // 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	2682 // 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	2683 // %% 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	2684 while ( token->value == TOKdot )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2685 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2686 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2687 if ( token->value == TOKidentifier )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2688 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2689 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	2690 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2691 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2692 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2693 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2694 stmt->error ( "expected identifier" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2695 return Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2696 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2697 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2698
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2699 // 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	2700 if ( e->op == TOKidentifier )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2701 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2702 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	2703 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2704 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	2705 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2706 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	2707 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2708 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2709 switch ( token->value )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2710 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2711 case TOKint32v: case TOKuns32v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2712 case TOKint64v: case TOKuns64v:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2713 if ( token->uns64value < 8 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2714 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	2715 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2716 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2717 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	2718 e = Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2719 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2720 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2721 if ( token->value == TOKrparen )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2722 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2723 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2724 stmt->error ( "expected ')'" );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2725 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2726 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2727 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2728 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2729 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2730 return Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2731 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2732 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	2733 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2734 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2735 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	2736 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	2737 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	2738 operand->segmentPrefix = ( Reg ) i;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2739 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2740 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	2741 return parseAsmExp();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2742 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2743 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2744 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2745 return newRegExp ( ( Reg ) i );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2746 }
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 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2750
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2751 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	2752 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2753 // 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	2754 // 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	2755 Dsymbol *scopesym;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2756
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2757 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	2758 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	2759 sc->func->searchLabel ( ident ) );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2760 }
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 e = e->semantic ( sc );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2763
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2764 // 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	2765 if ( e->op == TOKfloat64 )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2766 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2767 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	2768 if ( sym )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2769 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2770 VarDeclaration *v = sym->isVarDeclaration();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2771 if ( v )
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2772 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2773 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	2774 ve->type = e->type;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2775 e = ve;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2776 }
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 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2780 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2781 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2782 case TOKdollar:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2783 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2784 ident = Id::__dollar;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2785 goto do_dollar;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2786 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2787 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2788 invalidExpression();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2789 return Handled;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2790 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2791 return e;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2792 }
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 void doAlign()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2795 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2796 // .align bits vs. bytes...
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2797 // 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	2798
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2799 // 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	2800 // 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	2801 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	2802 uinteger_t align = e->toUInteger();
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2803
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2804 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	2805 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2806 //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	2807 // 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	2808 #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	2809 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	2810 #else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2811 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	2812 #endif
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2813 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2814 else
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2815 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2816 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	2817 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2818
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2819 setAsmCode();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2820 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2821
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2822 void doEven()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2823 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2824 // .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	2825 #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	2826 insnTemplate->writestring ( ( char * ) ".align\t2" );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2827 #else
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2828 insnTemplate->writestring ( ( char * ) ".align\t2" );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2829 #endif
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2830 setAsmCode();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2831 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2832
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2833 void doNaked()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2834 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2835 // %% 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	2836 sc->func->naked = 1;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2837 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2838
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2839 void doData()
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2840 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2841 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	2842 "", "", ""
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 // FIXME
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2845 /*
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2846 machine_mode mode;
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2847
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2848 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	2849 insnTemplate->writebyte(' ');
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2850
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2851 do {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2852 // 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	2853 switch (op) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2854 case Op_db:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2855 case Op_ds:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2856 case Op_di:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2857 case Op_dl:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2858 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	2859 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	2860 // 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	2861 if (op != Op_dl)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2862 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	2863 else {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2864 // 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	2865 // 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	2866 insnTemplate->printf("%u,%u",
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2867 (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	2868 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2869 } else {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2870 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	2871 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2872 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2873 case Op_df:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2874 mode = SFmode;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2875 goto do_float;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2876 case Op_dd:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2877 mode = DFmode;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2878 goto do_float;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2879 case Op_de:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2880 #ifndef TARGET_80387
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2881 #define XFmode TFmode
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2882 #endif
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2883 mode = XFmode; // not TFmode
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2884 // drop through
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2885 do_float:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2886 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	2887 token->value == TOKfloat80v) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2888 long words[3];
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2889 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	2890 // 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	2891 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	2892 if (mode != SFmode)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2893 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	2894 // 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	2895 if (mode == XFmode)
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2896 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	2897 } else {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2898 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	2899 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2900 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2901 default:
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2902 abort();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2903 }
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2904
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2905 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2906 if (token->value == TOKcomma) {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2907 insnTemplate->writebyte(',');
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2908 nextToken();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2909 } 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	2910 break;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2911 } else {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2912 stmt->error("expected comma");
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2913 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2914 } while (1);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2915
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2916 setAsmCode();*/
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2917 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2918 };
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2919
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2920 #if D_GCC_VER < 40
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2921 // 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	2922 // be modified accordingly.
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2923 #undef XEXP
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2924 #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	2925 #endif
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2926
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2927 // FIXME
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2928 #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	2929 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	2930 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2931 assert ( 0 );
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2932 // FIXME
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2933 // // 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	2934 // // 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	2935 // // 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	2936 // rtx r = DECL_INCOMING_RTL(decl);
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2937 // rtx e1, e2;
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2938 //
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2939 // // Local variables don't have DECL_INCOMING_RTL
761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2940 // 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	2941 // r = DECL_RTL(decl);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2942 //
219 761c8352f494 [svn r235] rough port of GDC's inline assembler code, unfinished ChristianK parents: diff changeset	2943 // 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	2944 // r = XEXP(r, 0);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2945 // 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	2946 // e1 = XEXP(r, 0);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2947 // e2 = XEXP(r, 1);
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2948 // 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	2949 // *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	2950 // return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2951 // } 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	2952 // *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	2953 // return true;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2954 // }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2955 // } 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	2956 // *result = 8;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2957 // 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	2958 // }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2959 // // 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	2960 // }
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2961 //
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2962 return false;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2963 }
756 a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	2964
a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	2965
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2966 struct AsmParser : public AsmParserCommon
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2967 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2968 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	2969 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2970 AsmProcessor ap ( sc, asmst );
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2971 ap.run();
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2972 }
756 a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	2973
944 eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2974 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	2975 {
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2976 return regInfo[i].gccName;
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2977 }
eb310635d80e Fixed accessing function symbols from inline asm. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 924 diff changeset	2978 };
756 a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	2979
a58784e0f035 Merge wilsonk's x86-64 inline assembly. Christian Kamm <kamm incasoftware de> parents: 751 diff changeset	2980 }

Mercurial > projects > ldc

annotate gen/asm-x86-32.h @ 1083:c1e9f612e2e2