
  PROCEDURE [XREF] clp$f_pop_block_stack
    (VAR block: ^clt$f_block);

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