/src/tools/syntax/tree/liberty_ast_check.e
Specman e | 35 lines | 16 code | 5 blank | 14 comment | 0 complexity | ff74f7f17de00dc96a9e0a4b090c328b 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_AST_CHECK 16 17inherit 18 LIBERTY_AST_LIST[LIBERTY_AST_ASSERTION] 19 redefine 20 possible_counts 21 end 22 23create {LIBERTY_NODE_FACTORY} 24 make 25 26feature {ANY} 27 name: STRING is "Check" 28 29feature {} 30 possible_counts: SET[INTEGER] is 31 once 32 Result := {AVL_SET[INTEGER] << 0, 4 >> } 33 end 34 35end