X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FBytecodes.h;h=73003a3002dd24c59aa05705a35b9fcd40c38c32;hb=c137ecd7e6e83d0f9c39b15ccdb9f2355f243c91;hp=b6e05ddbafff57040f542e57a9b8dacaa01d42ce;hpb=6a56f3ba02d33c38c95ff8f8da8a28d07f02ede9;p=ghc-hetmet.git diff --git a/ghc/includes/Bytecodes.h b/ghc/includes/Bytecodes.h index b6e05dd..73003a3 100644 --- a/ghc/includes/Bytecodes.h +++ b/ghc/includes/Bytecodes.h @@ -1,5 +1,4 @@ /* ----------------------------------------------------------------------------- - * $Id: Bytecodes.h,v 1.10 2004/09/07 10:10:07 simonmar Exp $ * * (c) The GHC Team, 1998-2002 * @@ -53,28 +52,29 @@ #define bci_ALLOC_AP 27 #define bci_ALLOC_PAP 28 #define bci_MKAP 29 -#define bci_UNPACK 30 -#define bci_PACK 31 -#define bci_TESTLT_I 32 -#define bci_TESTEQ_I 33 -#define bci_TESTLT_F 34 -#define bci_TESTEQ_F 35 -#define bci_TESTLT_D 36 -#define bci_TESTEQ_D 37 -#define bci_TESTLT_P 38 -#define bci_TESTEQ_P 39 -#define bci_CASEFAIL 40 -#define bci_JMP 41 -#define bci_CCALL 42 -#define bci_SWIZZLE 43 -#define bci_ENTER 44 -#define bci_RETURN 45 -#define bci_RETURN_P 46 -#define bci_RETURN_N 47 -#define bci_RETURN_F 48 -#define bci_RETURN_D 49 -#define bci_RETURN_L 50 -#define bci_RETURN_V 51 +#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 /* If a BCO definitely requires less than this many words of stack, don't include an explicit STKCHECK insn in it. The interpreter