Subversion Repositories Kolibri OS

#define	FALSE		0

#define	LOCAL		-1

#define DYNAMIC_VAR  3

#define r8 1

#define r32 4

#define CODE16 0x100

#define THIS_PARAM 0x300

#define THIS_NEW   0x500

	dm_other,

	dm_def0,

	STDLEX,

	DEFLEX,

	ASMLEX,

	zero_term,

};

enum{

	INITVAR,

	INITUSEVAR

	tp_ucnovn,

	tp_localvar,

	tp_label,

	tp_opperand,

	tp_modif,

	tp_classvar,

	stdcompr,

	zerocompr=8,

	cxnzcompr=0x18

	tk_eof,         tk_number,      tk_string,      tk_id,          tk_ID,

	tk_plusplus,    tk_mult,        tk_div,         tk_mod,         tk_multminus,

  tk_llminus,     tk_minusequals, tk_plusequals,  tk_rrequals,    tk_llequals,

	tk_andminus,    tk_xorminus,    tk_orequals,    tk_andequals,   tk_xorequals,

	tk_openbracket, tk_closebracket,tk_openblock,   tk_closeblock,  tk_colon,

	tk_semicolon,   tk_camma,       tk_period,      tk_at,          tk_numsign,

																							    tk_void,        tk_char,

	tk_byte,        tk_int,         tk_word,        tk_long,        tk_dword,

								                                  tk_if,          tk_IF,

	tk_return,      tk_from,        tk_extract,     tk_interrupt,   tk_far,

								                                  tk_bits,        tk_charvar,

	tk_bytevar,     tk_intvar,      tk_wordvar,     tk_longvar,     tk_dwordvar,

//100

	tk_notoverflowflag,tk_carryflag,tk_notcarryflag,tk_zeroflag,    tk_notzeroflag,

	tk_comment1,    tk_comment2,		tk_minusflag,   tk_plusflag,    tk_RETURN,

//120

	tk_continue,    tk_WHILE,       tk_FOR,         tk_for,         tk_asm,

	tk_switch,      tk_case,        tk_default,     tk_mmxreg,      tk_fpust,

//140

	tk_extern,      tk_declare,     tk_pascal,      tk_cdecl,       tk_stdcall,

	tk_fastcall,    tk_union,       tk_export,      tk_multipoint,  tk_LOOPNZ,

//160

	tk_dblcolon,    tk_static,      tk_baseclass,   tk_rescommand,  tk_endline,

  tk_singlquote,	tk_new,         tk_delete,      tk_macro,       tk_reg64,

};

#define	CX		1

#define	BX		3

#define	BP		5

#define	DI		7

// 8-bit byte regs

#define	CL		1

#define	BL		3

#define	CH		5

#define	BH		7

#define	ECX		1

#define	EBX		3

#define	EBP		5

#define	EDI		7

//ª®­à®«ì à §àã襭¨ï ॣ¨áâ஢

#define dECX 2

#define dEBX 8

#define dEBP 32

#define dEDI 128

#define	ES		0

#define	SS		2

#define	FS		4

// 386+ control regs

#define	CR1		1

#define	CR3		3

#define	CR5		5

#define	CR7		7

// 386+ test regs

#define	TR1		1

#define	TR3		3

#define	TR5		5

#define	TR7		7

// 386+ debug regs

#define	DR1		1

#define	DR3		3

#define	DR5		5

#define	DR7		7

//¯¥à¥¬¥­­ ï, 㪠§ â¥«ì, ¤ «ì­¨© 㪠§ â¥«ì,ᥣ¬¥­â­ë© 㪠§ â¥«ì.

#define	pointer		1

#define	e_ok		0

#define	e_cannotopeninput	2

#define	e_internalerror	4

#define	e_unknowncommandline	6

#define	e_outputtoobig	8

#define e_preprocess 10

#define	e_badinputfilename	14

#define	e_manyinclude	16

#define	rm_mod00	0

#define	rm_mod10	128

#define	rm_d16		6

#define	rm_BXDI		1

#define	rm_BPDI		3

#define	rm_DI		5

#define	rm_BX		7

#define	rm_d32		5

enum{

CALL_SHORT,	// 1

CONTINUE_SHORT,	// 3

//CALL_NEARD,

BREAK_NEAR,	// 6

BREAK_32,	// 10

UNDEF_OFSET,	//12

POST_STRING32,

EXT_VAR,	// 15

CALL_32I,	// 16

POST_VAR,	// 17

FIX_CODE,	// 19

POST_VAR32,	// 20

FIX_CODE32,	// 22

DATABLOCK_VAR32,	//25

DIN_VAR32,	 //27

CODE_SIZE,

DATA_SIZE,

POST_SIZE,

STACK_SIZE,

//DATABLOCK_STRING,	// 26

};

#define	file_exe	0

#define	file_sys	2

#define	file_w32	4

#define file_meos 6

#define	TINY		0

//ä« £¨

#define	f_extern	0x10	//¢­¥è­ïï ¯à®æ¥¤ãà , ¯¥à¥¬¥­­ ï

#define	f_export	0x40	//íªá¯®àâ¨à㥬 ï ¯à®æ¥¤ãà 

#define f_retproc 0xf00	//¢®§¢à â ä« £  ¨§ ¯à®æ¥¤ãàë

#define f_classproc 0x2000	//¯à®æ¥¤ãà  ¨§ ª« áá 

#define fs_constructor 0x4000

#define	tp_pascal	0

#define	tp_stdcall	4

#define	API_FAST	1

//#define USEFIRST4REG 1

enum{

	d_resmes,d_stack,d_start,	 d_atr,  d_name,

	d_stm,   d_fca,  d_suv,    d_us,   d_ib,

	d_code,  d_define, d_DOS,   d_endif,  d_ifdef,

	d_prnex, d_random, d_speed, d_8086,   d_8088,

	d_80686, d_80786,  d_sdp,   d_warning,d_ip,

	d_fut,   d_dstr,   d_cv,   	d_else, 	d_wmb,

	a_add,a_or, a_adc,a_sbb,a_and, a_sub, a_xor, a_cmp,

  a_movzx,a_movsx,a_cbw,a_cwde,a_cwd,a_cdq,

	a_nop,a_wait,a_lock,a_hlt,a_int,

	a_popf,a_popfd,a_pushf,a_pushfd,a_sahf,a_lahf,

	a_push,a_pusha,a_pushad,a_pop,a_popa,a_popad,

	a_in,a_out,a_insb,a_insw,a_insd,a_outsb,a_outsw,a_outsd,

	a_stosb,a_stosw,a_stosd,a_lodsb,a_lodsw,a_lodsd,

	a_jcxz,a_jecxz,a_loop,a_loopd,a_loopz,a_loopnz,

	a_jo,a_jno,a_jc,a_jnc,a_jz,a_jnz,a_jna,a_ja,

	a_sets,a_setns,a_setp,a_setnp,a_setl,a_setnl,a_setng,a_setg,

	/*a_jmps,a_jmpn,a_jmpf,*/a_jmp,

	a_enter,a_leave,a_bound,a_arpl,

	a_invd,a_wbinvd,//a_invlpd,

	a_rdpmc,a_ud2,/*a_emmx,a_setalc,*/

	a_punpcklbw,a_punpcklwd,a_punpckldq,

	a_punpckhbw,a_punpckhwd,a_punpckhdq,

	a_psrlw,a_psrld,a_psrlq,

	a_psllw,a_pslld,a_psllq,

	a_pmullw,

	a_psubusb,a_psubusw,

	a_pand,

	a_pandn,a_pmulhw,

	a_por,

	a_pxor,

	a_psubb,a_psubw,a_psubd,

	a_f2xm1,a_fabs,a_fadd,a_faddp,a_fbld,a_fbstp,a_fchs,a_fclex,a_fcom,

	a_fdivr,a_fdivrp,a_ffree,a_fiadd,a_ficom,a_ficomp,a_fidiv,a_fidivr,

	a_finit,a_fninit,a_fld,a_fldcw,a_fldenv,a_fldlg2,a_fldln2,a_fldl2e,

	a_fprem1,a_fptan,a_frndint,a_fsetpm,a_frstor,a_fsave,a_fnsave,a_fscale,

	a_fstenv,a_fnstenv,a_fsub,a_fsubp,a_fsubr,a_fsubrp,a_ftst,a_fucom,a_fucomp,

	a_fxrstor,a_fxsave,a_fndisi,a_fneni,a_fnsetpm,

	a_cmovo,a_cmovno,a_cmovc,a_cmovnc,a_cmovz,a_cmovnz,a_cmovna,a_cmova,

	a_maskmovq,  a_movntq,    a_pavgb,      a_pavgw,      a_pextrw,  a_pinsrw,

	a_prefetcht0,a_prefetcht1,a_prefetcht2, a_prefetchnta,a_sfence,  a_psadbw,

//XMM extentions Pentium III

	a_comiss,   a_cvtpi2ps,a_cvtps2pi,a_cvtsi2ss,a_cvtss2si,a_cvttps2pi,

	a_minps,    a_minss,   a_movaps,  a_movhlps, a_movhps,  a_movlhps,

	a_movntps,  a_orps,    a_rcpps,   a_rcpss,   a_rsqrtps, a_rsqrtss,

	a_ucomiss,  a_unpckhps,a_unpcklps,a_xorps,

// Pentium IV

	a_cmppd,   a_comisd,    a_cvtdq2pd,  a_cvtdq2ps,  a_cvtpd2dq,  a_cvtpd2pi,

	a_cvtsi2sd,a_cvtss2sd,  a_cvttpd2pi, a_cvttpd2dq, a_cvttps2dq, a_cvttsd2si,

	a_minsd,   a_movapd,    a_movdqa,    a_movdqu,    a_movdq2q,   a_movhpd,

	a_movupd,  a_mulpd,     a_mulsd,     a_orpd,      a_pshufd,    a_pshufhw,

	a_subpd,   a_subsd,     a_ucomisd,   a_unpckhpd,  a_unpcklpd,  a_xorpd,

	a_cmpeqpd, a_cmpltpd,   a_cmplepd,   a_cmpunordpd,a_cmpneqpd,  a_cmpnltpd,

	a_cmpneqps,a_cmpnltps,  a_cmpnleps,  a_cmpordps,  a_cmpeqss,   a_cmpltss,

	a_haddpd,  a_haddps,    a_hsubpd,    a_hsubps,    a_lddqu,     a_movddup,

	pF3=1,

	p66