status.i4.v = acl_default_data_source_c(data_source.i4.v,
						source_info.g.v, options.u4.v)

	This routine sets the default data source for Accelerator
	Command Language (ACL) scripts.

	data_source	source of the data
			(DIO_SOURCE_ACCELERATOR -> read live data,
			 DIO_SOURCE_DATABASE -> read the last setting stored
						in the database,
			 DIO_SOURCE_SAVERESTORE -> read data from save/restore,
			 DIO_SOURCE_SDA -> read data from SDA,
			 DIO_SOURCE_DATALOGGER -> read data from a Lumberjack,
			 DIO_SOURCE_MEMORY -> read data from a memory pool)
	source_info	data acquisition specifications depending on data source
			 DIO_SOURCE_DATABASE -> not used,
			 DIO_SOURCE_SAVERESTORE -> structure of type DIO_SR_SPEC,
			 DIO_SOURCE_SDA -> structure of type DIO_SDA_SPEC,
			 DIO_SOURCE_DATALOGGER-> structure of type DIO_DL_SPEC,
			 DIO_SOURCE_MEMORY -> structure of type DIO_MEMORY_SPEC)
	options		path options
			(ACL_OPT_NONE -> no options selected)

	This function returns ACNET status values as follows:

	CLIB_OK			success
	CLIB_INVARG		invalid data source passed or
				missing source info

	This function requires the following include files:

	acl_h, acnet_errors.h

	Related functions:

	intro_acl, acl_execute_c, acl_file_execute_c, acl_file_read_c,
	acl_file_write_c, acl_compile_c, acl_free_c, acl_read_symbol_c,
	acl_read_symbol_info_c, acl_read_symbol_names, acl_delete_symbol,
	acl_info_c, acl_cancel_requests_c, acl_set_symbol_c, acl_log_file_c,
	acl_default_script_path_c, acl_script_is_executing,
	acl_register_host_request_func, acl_unregister_host_request_func,
	acl_translate_command_string, acl_file_read_description_c,

	C/C++ usage:

	int	status;
	int	data_source = DIO_SOURCE_ACCELERATOR;
	unsigned int	options = ACL_OPT_NONE;
	void	*source_info = (void *) NULL;

	status = acl_default_data_source_c(data_source,source_info,options);