?? NEWTITLE := '~~~~~   common deck DSP$DST_GLOBAL_VARIABLES', EJECT ??

  TYPE
    deadstart_type = (start_dual_state, term_dual_state);

  PROCEDURE [XREF] endprgr;

  PROCEDURE [XREF] set_priority_normal ALIAS 'setprn';

  PROCEDURE [XREF] offmode;

  PROCEDURE [XREF] onmode;

  PROCEDURE [XREF] display;

  PROCEDURE [XREF] gettime (VAR clock_value: integer);

  PROCEDURE [XREF] wakeup;

  PROCEDURE [XREF] deadstart_cpu ALIAS 'dstcpu' (kind: deadstart_type);

  PROCEDURE [XREF] get_ve_status ALIAS 'getvest' (VAR status: integer);

  PROCEDURE [XREF] makscpb;

?? OLDTITLE ??
