
  VAR
    clv$f_current_task_block: [XREF] ^clt$f_block;

?? PUSH (LISTEXT := ON) ??
*copyc clt$f_block
?? POP ??
