import nesper, nesper/tasks

type
  Task* = object
    name*: string
    handle: TaskHandle_t
    ret*: BaseType_t
    cb: proc(): void {.thread.}

proc wrapper (a1: pointer) {.cdecl.} =
  cast[ptr Task](a1).cb()

proc newTask*(cb: proc() {.thread.} , name: string, stackSize: SzBytes): Task =
  result.name = name
  result.cb = cb

  var ret = xTaskCreate(wrapper, cstring(result.name), stackSize.uint32, addr result, 10, addr result.handle)
  result.ret = ret

proc `=destroy`*(t: var Task) =
  echo "Destroying!"
  vTaskDelete(t.handle)