note status: "See notice at end of class."; Date: "$Date$" Revision: "$Revision$" Product: EiffelStore Database: All_Bases class DB_CONSTANT feature {NONE} -- Status report name_table_size: INTEGER -- Shared hash table size -- used to hold stored procedure names do Result := name_table_size_ref.item end selection_string_size: INTEGER -- Shared allocated size of passed SQL string -- with bind variables do Result := selection_string_size_ref.item end parsed_string_size: INTEGER -- Shared allocated size of passed SQL string -- with bind variables all expanded do Result := parsed_string_size_ref.item end feature {NONE} -- Status setting set_name_table_size (n: INTEGER) -- Set shared `name_table_size_ref' with `n'. require n_positive: n > 0 do name_table_size_ref.set_item (n) ensure name_table_size_set: name_table_size = n end set_selection_string_size (n: INTEGER) -- Set shared `selection_string_size' with `n'. require n_positive: n > 0 do selection_string_size_ref.set_item (n) ensure selection_string_size_set: selection_string_size = n end set_parsed_string_size (n: INTEGER) -- Set shared `parsed_string_size' with `n'. require n_positive: n > 0 do parsed_string_size_ref.set_item (n) ensure parsed_string_set: parsed_string_size = n end feature {NONE} -- Status report Default_name_table_size: INTEGER = 20 Default_selection_string_size: INTEGER = 2048 Default_parsed_string_size: INTEGER = 4096 name_table_size_ref: INTEGER_REF -- Shared integer object holding a value once create Result Result.set_item (Default_name_table_size) end selection_string_size_ref: INTEGER_REF -- Shared integer reference object holding a value once create Result Result.set_item (Default_selection_string_size) end parsed_string_size_ref: INTEGER_REF -- Shared integer object holding a value once create Result Result.set_item (Default_parsed_string_size) end note copyright: "Copyright (c) 1984-2006, Eiffel Software and others" license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)" source: "[ Eiffel Software 356 Storke Road, Goleta, CA 93117 USA Telephone 805-685-1006, Fax 805-685-6869 Website http://www.eiffel.com Customer support http://support.eiffel.com ]" end -- class DB_CONSTANT