X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FBytecodes.h;h=4aff907cfd4911bb63a714e62cdb171d267486e8;hb=2fbab1a0f1a017799e8f5130bdf1078060623f29;hp=4a75b00c11082040763f7e6ad3b79d30a41e7eae;hpb=f2363290372453038d1ad85b8a71b206a8fcac3e;p=ghc-hetmet.git diff --git a/includes/Bytecodes.h b/includes/Bytecodes.h index 4a75b00..4aff907 100644 --- a/includes/Bytecodes.h +++ b/includes/Bytecodes.h @@ -50,31 +50,33 @@ /* #define bci_PUSH_APPLY_PPPPPPP 25 */ #define bci_SLIDE 26 #define bci_ALLOC_AP 27 -#define bci_ALLOC_PAP 28 -#define bci_MKAP 29 -#define bci_MKPAP 30 -#define bci_UNPACK 31 -#define bci_PACK 32 -#define bci_TESTLT_I 33 -#define bci_TESTEQ_I 34 -#define bci_TESTLT_F 35 -#define bci_TESTEQ_F 36 -#define bci_TESTLT_D 37 -#define bci_TESTEQ_D 38 -#define bci_TESTLT_P 39 -#define bci_TESTEQ_P 40 -#define bci_CASEFAIL 41 -#define bci_JMP 42 -#define bci_CCALL 43 -#define bci_SWIZZLE 44 -#define bci_ENTER 45 -#define bci_RETURN 46 -#define bci_RETURN_P 47 -#define bci_RETURN_N 48 -#define bci_RETURN_F 49 -#define bci_RETURN_D 50 -#define bci_RETURN_L 51 -#define bci_RETURN_V 52 +#define bci_ALLOC_AP_NOUPD 28 +#define bci_ALLOC_PAP 29 +#define bci_MKAP 30 +#define bci_MKPAP 31 +#define bci_UNPACK 32 +#define bci_PACK 33 +#define bci_TESTLT_I 34 +#define bci_TESTEQ_I 35 +#define bci_TESTLT_F 36 +#define bci_TESTEQ_F 37 +#define bci_TESTLT_D 38 +#define bci_TESTEQ_D 39 +#define bci_TESTLT_P 40 +#define bci_TESTEQ_P 41 +#define bci_CASEFAIL 42 +#define bci_JMP 43 +#define bci_CCALL 44 +#define bci_SWIZZLE 45 +#define bci_ENTER 46 +#define bci_RETURN 47 +#define bci_RETURN_P 48 +#define bci_RETURN_N 49 +#define bci_RETURN_F 50 +#define bci_RETURN_D 51 +#define bci_RETURN_L 52 +#define bci_RETURN_V 53 +#define bci_BRK_FUN 54 /* If you need to go past 255 then you will run into the flags */ /* If you need to go below 0x0100 then you will run into the instructions */