--============================================================================= --| --| PACKAGE NAME: numbers.search --| --| NOTES: For convenience in development and maintenance, all tasks are --| separately compiled. --| --============================================================================= SEPARATE (numbers) PACKAGE BODY search IS -- Maximum length of input line line_length : CONSTANT := 80; TASK BODY process_normal_input IS SEPARATE; TASK BODY monitor_keyboard IS SEPARATE; TASK BODY synchronize IS SEPARATE; TASK BODY do_search_type IS SEPARATE; END search;