/src/tools/compiler/asm/marshall/liberty_asm_codes.e

 1-- This file is part of Liberty Eiffel.
 2--
 3-- Liberty Eiffel is free software: you can redistribute it and/or modify
 4-- it under the terms of the GNU General Public License as published by
 5-- the Free Software Foundation, version 3 of the License.
 6--
 7-- Liberty Eiffel is distributed in the hope that it will be useful,
 8-- but WITHOUT ANY WARRANTY; without even the implied warranty of
 9-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
10-- GNU General Public License for more details.
11--
12-- You should have received a copy of the GNU General Public License
13-- along with Liberty Eiffel.  If not, see <http://www.gnu.org/licenses/>.
14--
15class LIBERTY_ASM_CODES
16
17feature {} -- assembly code
18   system_marker: INTEGER is 0x0118E579 -- l33t for "LIBERTY", I guess
19   type_marker:   INTEGER is 0x0975E811 -- reversed.
20   method_marker: INTEGER is 0x086D0D68 -- xor'ed.
21
22   flag_retry:         INTEGER_8 is 0x01
23   flag_precondition:  INTEGER_8 is 0x10
24   flag_postcondition: INTEGER_8 is 0x11
25
26   native_void:        INTEGER_8 is 0x00
27   native_integer:     INTEGER_8 is 0x01
28   native_pointer:     INTEGER_8 is 0x02
29
30   asm_new:            INTEGER_8 is 0x01
31   asm_jump:           INTEGER_8 is 0x02
32   asm_invoke:         INTEGER_8 is 0x03
33   asm_return:         INTEGER_8 is 0x04
34   asm_call_native:    INTEGER_8 is 0x05
35
36   asm_not:            INTEGER_8 is 0x10
37   asm_and:            INTEGER_8 is 0x11
38   asm_or:             INTEGER_8 is 0x12
39
40   asm_load_int:       INTEGER_8 is 0x20
41   asm_add_int:        INTEGER_8 is 0x21
42   asm_sub_int:        INTEGER_8 is 0x22
43   asm_mul_int:        INTEGER_8 is 0x23
44   asm_div_int:        INTEGER_8 is 0x24
45   asm_rem_int:        INTEGER_8 is 0x25
46
47feature {} -- utilities
48   positions: LIBERTY_ASM_POSITIONS is
49      once
50         create {LIBERTY_ASM_POSITIONS} Result.make
51      end
52
53end -- class LIBERTY_ASM_CODES