/src/tools/compiler/asm/instruction/liberty_asm_return.e
Specman e | 40 lines | 18 code | 5 blank | 17 comment | 0 complexity | e73cf55a659ebff7eb222383153c4d19 MD5 | raw file
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_RETURN 16 -- 17 -- Return from invoke 18 -- 19 20inherit 21 LIBERTY_ASM_INSTRUCTION 22 23create {ANY} 24 make 25 26feature {ANY} 27 accept (visitor: LIBERTY_ASM_VISITOR) is 28 local 29 v: LIBERTY_ASM_INSTRUCTION_VISITOR 30 do 31 v ::= visitor 32 v.visit_return(Current) 33 end 34 35feature {} 36 make is 37 do 38 end 39 40end -- class LIBERTY_ASM_RETURN