libs/iovm/source/IoCoroutine.h

   1
   2 //metadoc Coroutine copyright Steve Dekorte 2002
   3 //metadoc Coroutine license BSD revised
   4
   5 #ifndef IoCoroutine_DEFINED
   6 #define IoCoroutine_DEFINED 1
   7 #include "IoVMApi.h"
   8
   9 #include "IoState.h"
  10
  11 #include "Common.h"
  12 #include "Coro.h"
  13
  14 #ifdef __cplusplus
  15 extern "C" {
  16 #endif
  17
  18 #define ISCOROUTINE(self) IoObject_hasCloneFunc_(self, (IoTagCloneFunc *)IoCoroutine_rawClone)
  19
  20 typedef IoObject IoCoroutine;
  21
  22 typedef struct
  23 {
  24         Coro *cid;
  25         Stack *ioStack;
  26         int debuggingOn;
  27 } IoCoroutineData;
  28
  29 IOVM_API IoCoroutine *IoCoroutine_proto(void *state);
  30 IOVM_API void IoCoroutine_protoFinish(IoCoroutine *self);
  31 IOVM_API IoCoroutine *IoCoroutine_rawClone(IoCoroutine *self);
  32 IOVM_API IoCoroutine *IoCoroutine_new(void *state);
  33
  34 IOVM_API void IoCoroutine_free(IoCoroutine *self);
  35 IOVM_API void IoCoroutine_mark(IoCoroutine *self);
  36 Stack *IoCoroutine_rawIoStack(IoCoroutine *self);
  37 IOVM_API void IoCoroutine_rawShow(IoCoroutine *self);
  38
  39 IOVM_API IoObject *IoCoroutine_main(IoCoroutine *self, IoObject *locals, IoMessage *m);
  40 IOVM_API IoObject *IoCoroutine_freeStack(IoCoroutine *self, IoObject *locals, IoMessage *m);
  41
  42 IOVM_API void *IoCoroutine_cid(IoCoroutine *self);
  43
  44 // label
  45
  46 //void IoCoroutine_rawSetLabel_(IoCoroutine *self, IoSymbol *s);
  47 //IoObject *IoCoroutine_rawLabel(IoCoroutine *self);
  48
  49 IOVM_API IoObject *IoCoroutine_setLabel(IoCoroutine *self, IoObject *locals, IoMessage *m);
  50 IOVM_API IoObject *IoCoroutine_label(IoCoroutine *self, IoObject *locals, IoMessage *m);
  51
  52 // runTarget
  53
  54 IOVM_API void IoCoroutine_rawSetRunTarget_(IoCoroutine *self, IoObject *v);
  55 IOVM_API IoObject *IoCoroutine_rawRunTarget(IoCoroutine *self);
  56
  57 // runMessage
  58
  59 IOVM_API void IoCoroutine_rawSetRunMessage_(IoCoroutine *self, IoObject *v);
  60 IOVM_API IoObject *IoCoroutine_rawRunMessage(IoCoroutine *self);
  61
  62 // runLocals
  63
  64 IOVM_API void IoCoroutine_rawSetRunLocals_(IoCoroutine *self, IoObject *v);
  65 IOVM_API IoObject *IoCoroutine_rawRunLocals(IoCoroutine *self);
  66
  67 // parent
  68
  69 IOVM_API void IoCoroutine_rawSetParentCoroutine_(IoCoroutine *self, IoObject *v);
  70 IOVM_API IoObject *IoCoroutine_rawParentCoroutine(IoCoroutine *self);
  71 // exception
  72
  73 IOVM_API void IoCoroutine_rawSetResult_(IoCoroutine *self, IoObject *v);
  74 IOVM_API IoObject *IoCoroutine_rawResult(IoCoroutine *self);
  75
  76 // exception
  77
  78 IOVM_API void IoCoroutine_rawRemoveException(IoCoroutine *self);
  79 IOVM_API void IoCoroutine_rawSetException_(IoCoroutine *self, IoObject *v);
  80 IOVM_API IoObject *IoCoroutine_rawException(IoCoroutine *self);
  81
  82 // ioStack
  83
  84 IOVM_API IoObject *IoCoroutine_ioStack(IoCoroutine *self, IoObject *locals, IoMessage *m);
  85 IOVM_API int IoCoroutine_rawIoStackSize(IoCoroutine *self);
  86
  87 // raw
  88
  89 IOVM_API void IoCoroutine_rawRun(IoCoroutine *self);
  90
  91 IOVM_API void IoCoroutine_clearStack(IoCoroutine *self);
  92
  93 IOVM_API void IoCoroutine_try(IoCoroutine *self, IoObject *target, IoObject *locals, IoMessage *message);
  94
  95 IOVM_API IoCoroutine *IoCoroutine_newWithTry(void *state,
  96                                                                                         IoObject *target,
  97                                                                                         IoObject *locals,
  98                                                                                         IoMessage *message);
  99
 100 IOVM_API void IoCoroutine_raiseError(IoCoroutine *self, IoSymbol *description, IoMessage *m);
 101
 102 // methods
 103
 104 IOVM_API IoObject *IoCoroutine_implementation(IoCoroutine *self, IoObject *locals, IoMessage *m);
 105
 106 IOVM_API IoObject *IoCoroutine_run(IoCoroutine *self, IoObject *locals, IoMessage *m);
 107 IOVM_API IoObject *IoCoroutine_callStack(IoCoroutine *self, IoObject *locals, IoMessage *m);
 108
 109 IOVM_API IoObject *IoCoroutine_isCurrent(IoCoroutine *self, IoObject *locals, IoMessage *m);
 110
 111 // runTarget
 112
 113 IOVM_API void IoCoroutine_rawSetRunTarget_(IoCoroutine *self, IoObject *v);
 114 IOVM_API IoObject *IoCoroutine_rawRunTarget(IoCoroutine *self);
 115
 116 // message
 117
 118 IOVM_API void IoCoroutine_rawSetRunMessage_(IoCoroutine *self, IoObject *v);
 119 IOVM_API IoObject *IoCoroutine_rawRunMessage(IoCoroutine *self);
 120
 121 // parent
 122
 123 IOVM_API void IoCoroutine_rawSetParentCoroutine_(IoCoroutine *self, IoObject *v);
 124 IOVM_API IoObject *IoCoroutine_rawParentCoroutine(IoCoroutine *self);
 125
 126 // try
 127
 128 IOVM_API IoObject *IoCoroutine_start(IoCoroutine *self, IoObject *locals, IoMessage *m);
 129
 130 IOVM_API IoObject *IoCoroutine_rawResume(IoCoroutine *self);
 131 IOVM_API IoObject *IoCoroutine_resume(IoCoroutine *self, IoObject *locals, IoMessage *m);
 132
 133 IOVM_API IoObject *IoCoroutine_isCurrent(IoCoroutine *self, IoObject *locals, IoMessage *m);
 134 IOVM_API IoObject *IoCoroutine_currentCoroutine(IoCoroutine *self, IoObject *locals, IoMessage *m);
 135
 136 // stack trace
 137
 138 IOVM_API IoObject *IoObject_callStack(IoCoroutine *self);
 139
 140 IOVM_API void IoObject_appendStackEntryDescription(IoCoroutine *self, UArray *ba);
 141
 142 IOVM_API void IoCoroutine_rawPrint(IoCoroutine *self);
 143
 144 // debugging
 145
 146 IOVM_API int IoCoroutine_rawDebuggingOn(IoCoroutine *self);
 147
 148 IOVM_API IoObject *IoCoroutine_setMessageDebugging(IoCoroutine *self, IoObject *locals, IoMessage *m);
 149 IOVM_API IoObject *IoObject_performWithDebugger(IoCoroutine *self, IoObject *locals, IoMessage *m);
 150
 151 IOVM_API IoObject *IoCoroutine_callStack(IoCoroutine *self, IoObject *locals, IoMessage *m);
 152
 153 IOVM_API void IoCoroutine_rawPrintBackTrace(IoCoroutine *self);
 154
 155 //error
 156
 157 IOVM_API IoObject *IoCoroutine_rawSetErrorDescription_(IoCoroutine *self, IoSymbol *description);
 158 IOVM_API IoObject *IoCoroutine_setErrorDescription(IoCoroutine *self, IoObject *locals, IoMessage *m);
 159 #ifdef __cplusplus
 160 }
 161 #endif
 162 #endif