home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / exec / tasks.h < prev   
Encoding:
Text File  |  1994-07-25  |  1.6 KB  |  86 lines
  1. {$if not def EXEC_TASKS_H} CONST EXEC_TASKS_H=0;
  2.  
  3.  
  4. { **************************************************************
  5.   ** KickPascal-Include-Datei "exec/tasks.h" zu Kickstart 3.0 **
  6.   ************************************************************** }
  7.  
  8. TYPE p_Task = ^Task;
  9. TYPE p_StackSwapStruct = ^StackSwapStruct;
  10.  
  11.  
  12. {$if not def EXEC_NODES_H;incl "exec/nodes.h";endif}
  13. {$if not def EXEC_LISTS_H;incl "exec/lists.h";endif}
  14.  
  15.  
  16. TYPE Task = RECORD;
  17.  tc_Node       : Node;
  18.  tc_Flags      : Byte;
  19.  tc_State      : Byte;
  20.  tc_IDNestCnt  : Byte;
  21.  tc_TDNestCnt  : Byte;
  22.  tc_SigAlloc   : Long;
  23.  tc_SigWait    : Long;
  24.  tc_SigRecvd   : Long;
  25.  tc_SigExcept  : Long;
  26.  tc_TrapAlloc  : Word;
  27.  tc_TrapAble   : Word;
  28.  tc_ExceptData : Ptr;
  29.  tc_ExceptCode : Ptr;
  30.  tc_TrapData   : Ptr;
  31.  tc_TrapCode   : Ptr;
  32.  tc_SPReg      : Ptr;
  33.  tc_SPLower    : Ptr;
  34.  tc_SPUpper    : Ptr;
  35.  tc_Switch     : Ptr;
  36.  tc_Launch     : Ptr;
  37.  tc_MemEntry   : List;
  38.  tc_UserData   : Ptr;
  39. END;
  40.  
  41. TYPE StackSwapStruct = RECORD
  42.  stk_Lower   : Ptr;
  43.  stk_Upper   : Long;
  44.  stk_Pointer : Ptr;
  45. END;
  46.  
  47.  
  48. CONST
  49.  TB_PROCTIME = 0;
  50.  TB_ETASK    = 3;
  51.  TB_STACKCHK = 4;
  52.  TB_EXCEPT   = 5;
  53.  TB_SWITCH   = 6;
  54.  TB_LAUNCH   = 7;
  55.  
  56.  TF_PROCTIME = $1;
  57.  TF_ETASK    = $8;
  58.  TF_STACKCHK = $10;
  59.  TF_EXCEPT   = $20;
  60.  TF_SWITCH   = $40;
  61.  TF_LAUNCH   = $80;
  62.  
  63.  TS_INVALID = 0;
  64.  TS_ADDED   = 1;
  65.  TS_RUN     = 2;
  66.  TS_READY   = 3;
  67.  TS_WAIT    = 4;
  68.  TS_EXCEPT  = 5;
  69.  TS_REMOVED = 6;
  70.  
  71.  SIGB_ABORT     = 0;
  72.  SIGB_CHILD     = 1;
  73.  SIGB_BLIT      = 4;
  74.  SIGB_SINGLE    = 4;
  75.  SIGB_INTUITION = 5;
  76.  SIGB_DOS       = 8;
  77.  
  78.  SIGF_ABORT     = $1;
  79.  SIGF_CHILD     = $2;
  80.  SIGF_BLIT      = $10;
  81.  SIGF_SINGLE    = $10;
  82.  SIGF_INTUITION = $20;
  83.  SIGF_DOS       = $100;
  84.  
  85. {$endif}
  86.