/src/tools/compiler/asm/instruction/liberty_asm_and.e
Specman e | 37 lines | 18 code | 5 blank | 14 comment | 0 complexity | 77f663fd7443c624bccfaff56bb54c73 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_AND 16 17inherit 18 LIBERTY_ASM_INSTRUCTION 19 20create {ANY} 21 make 22 23feature {ANY} 24 accept (visitor: LIBERTY_ASM_VISITOR) is 25 local 26 v: LIBERTY_ASM_INSTRUCTION_VISITOR 27 do 28 v ::= visitor 29 v.visit_and(Current) 30 end 31 32feature {} 33 make is 34 do 35 end 36 37end -- class LIBERTY_ASM_AND