
  VAR
    dpv$top_window_p: [XREF] ^dpt$window;

?? PUSH (LISTEXT := ON) ??
*copyc dpt$window
?? POP ??
