[Bese-devel] Tasks

[Hoan Ton-That]

Hey everyone,

I've written an insy-winsy macro for tasks.

(defmacro deftask (name &body body)
  `(progn
     (defcomponent ,name (task-component)
       ())
     ;; We use `self' as the magic variable, so tasks can answer.
     (defaction start ((self ,name))
       , at body)
     ',name))

Does anyone add extra slots to the task component?

Hoan