$SAVE NOLIST

rq$c$delete$command$connection:  PROCEDURE( command$conn,
                                            except$ptr ) EXTERNAL;

DECLARE command$conn    TOKEN,
        except$ptr      POINTER;

END rq$c$delete$command$connection;

$RESTORE