$SAVE NOLIST

dq$special:  PROCEDURE( type,
                        parameter$ptr,
                        except$ptr ) EXTERNAL;

DECLARE type            BYTE,
        parameter$ptr   POINTER,
        except$ptr      POINTER;

END dq$special;

$RESTORE