- Added bridge functions to histmemsec to make it look more like histmem

- Modifed many modules using histmem to work also with histmemsec
- Extended tasker with task names and task groups
- There is a new taskobj which allows to list tasks and to interact with them.
- Task now supports running Tcl functions as tasks
- There is a new experimental sctcomtask module which allows to define communication
  tasks against a scriptcontext. This is a new feature which should facilitate
  writing sequential scripts using asynchronous communication.
- A fix to make spss7 work when there are no switches
- ORION support for single X. TRICS measures crystals hanging down, ORION
  standing up


SKIPPED:
	psi/ease.c
	psi/faverage.c
	psi/jvlprot.c
	psi/make_gen
	psi/pardef.c
	psi/polterwrite.c
	psi/psi.c
	psi/sinq.c
	psi/spss7.c

task.h

@@ -78,6 +78,23 @@ long TaskRegister(pTaskMan self, TaskFunc pTaskRun,
      On Success a positive value denoting the ID of the task is returned.
      On error a negative value is returned.
    */
+/*--------------------------------------------------------------------------*/
+long TaskRegisterN(pTaskMan self, char *name, TaskFunc pTaskRun,
+                  SignalFunc pSignalFunc,
+                  TaskKillFunc pKillFunc, void *pData, int iPriority);
+  /*
+     This call enter a new task into the system. The caller has to
+     specify:
+     a TaskFunction   [Required]
+     a SignalFunction [Optional, can be NULL]
+     a KillFunction for task private data.
+     [Optional, can be NULL]
+     a pointer to task  private data     
+     [Optional, can be NULL]
+     a priority for this task. This is currently unused.                  
+     On Success a positive value denoting the ID of the task is returned.
+     On error a negative value is returned.
+   */
 /*-------------------------------------------------------------------------*/
 int TaskSchedule(pTaskMan self);
   /*
@@ -117,5 +134,80 @@ int TaskSignal(pTaskMan self, int iSignal, void *pSigData);
   /*
      remove the task with the given task function and the given data pointer
   */
-    
+/*-------------------------------------------------------------------------*/
+  int StopTask(pTaskMan self, char *name);
+/*
+  stop the task with the given name. Returns 0 on failure, 1 on success
+*/
+/*--------------------------------------------------------------------------*/
+  int isTaskRunning(pTaskMan self, char *name);
+/*
+  returns 1 when task name is running, 0 else
+*/
+/*===========================================================================
+Iterating the task list. This works like:
+
+pTaskHead it;
+char *des;
+
+for(it = TaskIteratorStart(self); it != NULL; it = TaskIteratorNext(it)){
+   des = TaskDescription(it);
+} 
+
+There are two limitations of the implementation here:
+
+- Never, ever delete the Iterator it
+- Do your iteration in one go or abandon it mid iteration. If another task 
+  gets in between and registers new tasks or removes one, then  the whole 
+  iterator may be messed up.
+=============================================================================*/
+
+pTaskHead TaskIteratorStart(pTaskMan self);
+/*
+ starts iterating on the TaskList. Do NOT delete the returned pointer!
+*/
+pTaskHead TaskIteratorNext(pTaskHead it);
+/*
+  Steps to the next element in the task list. Returns NULL when node.
+  Do NOT delete the returned pointer!
+*/
+
+char *TaskDescription(pTaskHead it);
+/*
+  get a description of the task at the current iterator
+  You are responsible for deleting the returned character array.
+*/
+/*=============================================================================
+   Task Groups. The implementation has the limit that any given task can 
+   only be member of one task group
+   ===============================================================================*/
+long GetTaskGroupID(pTaskMan self);
+/*
+  get the ID for a task group
+*/
+void AddTaskToGroup(pTaskMan self, long taskID, long groupID);
+/*
+  Add taskID to the task group groupID
+*/
+int isTaskGroupRunning(pTaskMan self, long groupID); 
+/*
+  Returns 1 when the task group is still running, 0 else
+*/
+
+typedef struct{
+  pTaskMan tasker;
+  long groupID;
+} TaskGroupData, *pTaskGroupData;
+
+int TaskGroupTask(void *data);
+/*
+ This is a task function which implements the common task of waiting 
+ for a group of tasks to finish. It expects as data a TaskGroupData
+ structure.
+*/
+/*--------------------------------------------------------------------------*/
+int TaskSignalGroup(pTaskMan self, int iSignal, void *pSigData, long groupID);
+/*
+  signal only tasks in the group groupID
+*/ 
 #endif