-- $Header: /ct/interp/syspkg.ada,v 1.12 84/08/14 12:03:06 penny Exp $
--

   package system is
	type address is new integer;
        type name is (ctada3600);

	system_name   : constant name := ctada3600;
	storage_unit  : constant := 32;
	memory_size   : constant := 4294967295;--(2**32-1)
	

	-- system-dependent named numbers


	min_int      : constant := -4294967296;-- -(2**32)
	max_int      : constant:= 4294967295;-- (2**32-1)
	max_digits   : constant:= 9;
	max_mantissa : constant:= 0;
	fine_delta   : constant:= 0;
	tick         : constant:= 0.0166667;

	-- other system-dependent declarations

	subtype priority is integer range 10..10 ;

   end system;
