; ; --- Version 2.2 90-10-12 18:53 --- ; ; CTASK.DEF - Periscope debugger Record definitions ; ; Definitions are for CTask with all options (DOS, GROUPS, NAMED, DYNAMIC) on. ; Definitions adapted from a file supplied by Joe Urso. ; \GLOBVARS CTask id,a,8 curr_task,d,4 eligible_q,d,8 e_q.kind,+,1 timer_q,d,8 t_q.kind,+,1 watch_q,d,4 w_q.kind,+,1 preempt,b,1 pretick,b,1 var_prior,b,1 in_sched,b,1 tick_factr,w,2 tickspersc,i,2 ticker_chn,d,4 stub table,d,4 kill_queue,d,8 kq.kind,+,1 kill task,d,4 hotkey_scn,d,8 hks.kind,+,1 hotkey_nos,d,8 hkn.kind,+,1 emssav/res,d,8 emssavetsk,d,4 emergency,d,4 l_swap,i,2 dos_vars,d,4 dos in use,d,4 home/level,d,8 branch,d,4 creator,d,4 exit_addr,d,4 cr/sav psp,w,4 save_sssp,d,4 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 main_ptr,d,4 remove,d,4 alloc/free,d,8 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 ; \NAMEREC first,d,4 last,d,4 type,b,1 strucp,d,4 name,z,9 ; \TCB cqueue,d,8 cqkind,+,1 prior,w,2 iniprior,w,2 qhead,d,4 stkbot,d,4 state/flag,b,2 stack,d,4 ax-cx,w,4 dx-si-di,w,6 bp-es-ds,w,6 timerqueue,d,8 tl.kind,+,1 ticks,x,4 tl.strucp,+,4 tl.userp,+,4 tl.chain,+,9 reload,x,4 telem,+,4 tl.elkind,+,1 tl.strucind,+,1 tl.eflags,+,1 retptr,d,4 retsize,i,2 sav/restfn,d,8 user_ptr,d,4 group/home,d,8 schedfunc,d,4 indos/new,b,2 base_psp,w,2 psp_sssp,d,4 swaparea,+,30 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 ; \GCB home/level,d,8 branch,d,4 creator,d,4 exit_addr,d,4 cr/sav psp,w,4 save_sssp,d,4 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 main_ptr,d,4 remove,d,4 telem_lst,d,8 telstknd,+,1 tick_list,d,8 tilstknd,+,1 alloc/free,d,8 ; \RESOURCE waiting,d,8 kind,+,1 owner,d,4 count,i,2 flags,b,1 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 ; \COUNTER wait set,d,8 wskind,+,1 wait clear,d,8 wckind,+,1 state,x,4 flags,b,1 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 ; \FLAG wait set,d,8 wskind,+,1 wait clear,d,8 wc.kind,+,1 state,i,2 flags,b,1 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 ; \MAILBOX waiting,d,8 waitkind,+,1 mail_first,d,4 mail_last,d,4 flags,b,1 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 ; \PIPE wait read,d,8 wrdkind,+,1 wait write,d,8 wwrkind,+,1 wait clear,d,8 wclkind,+,1 bufsize,i,2 filled,i,2 inptr,w,2 outptr,w,2 contents,b,16 flags,b,1 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 ; \WPIPE wait read,d,8 wrdkind,+,1 wait write,d,8 wwrkind,+,1 wait clear,d,8 wclkind,+,1 bufsize,i,2 filled,i,2 inptr,w,2 outptr,w,2 contents,w,16 flags,b,1 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 ; \CALLCHAIN next,d,4 func,d,4 flags,b,1 ; \TIMER link,d,8 kind,+,1 ticks,x,4 telem,+,4 next,d,4 strucp,d,4 user_param,d,4 chain,d,8 chknd,+,1 reload,x,4 dum,+,4 elkind,b,1 stknd/flag,b,2 ; \MEMWATCH link,d,8 kind,+,1 ticks,+,4 next,d,4 strucp,d,4 user_param,d,4 chain,d,8 chknd,+,1 address,d,4 mask,w,2 compare,w,2 elkind,b,1 stknd/flag,b,2 ; \PORTWATCH link,d,8 kind,+,1 ticks,+,4 next,d,4 strucp,d,4 user_param,d,4 chain,d,8 chknd,+,1 port,w,2 mask,w,2 compare,w,2 in_word,b,1 dum,+,1 elkind,b,1 stknd/flag,b,2 ; \HOTKEY link,d,8 kind,+,1 ticks,+,4 next,d,4 strucp,d,4 user_param,d,4 chain,d,8 chknd,+,1 mask/comp1,b,2 mask/comp2,b,2 mask/comp3,b,2 scancode,b,1 dum,+,1 elkind,b,1 stknd/flag,b,2 ; \BUFFER rsc write,d,8 wkind,+,1 wrt owner,d,4 wrt count,i,2 wflags,+,1 wnamelist,+,8 wnamekind,+,1 wstrucp,+,4 wname,+,9 rsc read,d,8 rkind,+,1 read owner,d,4 read count,i,2 rflags,+,1 rnamelist,+,8 rnamekind,+,1 rstrucp,+,4 rname,+,9 wait read,d,8 wrdkind,+,1 wait write,d,8 wwrkind,+,1 wait clear,d,8 wclkind,+,1 bufsize,i,2 filled,i,2 inptr,w,2 outptr,w,2 contents,w,16 flags,b,1 namelist,+,8 namekind,+,1 strucp,+,4 name,+,9 msgcnt,i,2 flags,b,1 namelist,d,8 namekind,+,1 strucp,+,4 name,z,9 ; \TICKER next,d,4 ticks,x,4 chain,d,8 chknd,+,1 flags,b,1 ;