- allow scriptcontext objects to be dynamic

- enhancements in scriptcontext (error messages stored as properties)
2009-02-19 13:30:32 +00:00
parent 981534624f
commit 35f2b6b810
33 changed files with 753 additions and 310 deletions
--- a/task.c
+++ b/task.c
@ -344,3 +344,30 @@ int TaskContinue(pTaskMan self)
  self->iStop = 0;
  return 1;
 }
+
+/*--------------------------------------------------------------------------*/
+void TaskRemove(pTaskMan self, TaskFunc pTaskRun, void *pData)
+{
+  int iRet;
+  pTaskHead pCurrent, pNext;
+
+  assert(self);
+  assert(self->iID == TASKERID);
+
+  pNext = self->pHead->pNext;   /* skip dummy task */
+  while (pNext != NULL) {
+    pCurrent = pNext;
+    pNext = pCurrent->pNext;
+    if (pCurrent->pRun == pTaskRun && pCurrent->pData == pData) {
+      /* unlink */
+      if (pCurrent->pPrevious != NULL) {
+        pCurrent->pPrevious->pNext = pCurrent->pNext;
+      }
+      if (pCurrent->pNext != NULL) {
+        pCurrent->pNext->pPrevious = pCurrent->pPrevious;
+      }
+      free(pCurrent);
+    }
+  }
+  return;
+}