$SAVE NOLIST

dq$get$size:  PROCEDURE( segment$t,
                         except$ptr ) WORD EXTERNAL;

DECLARE segment$t       TOKEN,
        except$ptr      POINTER;

END dq$get$size;

$RESTORE