INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

project: "Visual Eiffel"
revision: "$Revision: 1.1 $"
copyright: "Copyright (C) 1996-2005 Object Tools Group"
license: "http://visual-eiffel.com/license"
cluster: grape
class BOOLEAN_VALIDATOR
inherit

VALIDATOR
rename
make as validator_make
end
creation

make
feature

default_value: BOOLEAN

value: BOOLEAN

make (a_default: BOOLEAN; a_yes, a_no: ARRAY [STRING])

formated_text: STRING

is_valid (p_string: STRING): BOOLEAN
end -- class BOOLEAN_VALIDATOR

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES