$SAVE NOLIST

rq$a$delete$connection:  PROCEDURE( connection$t,
                                    resp$mbox,
                                    except$ptr ) EXTERNAL;

DECLARE connection$t  TOKEN,
        resp$mbox     TOKEN,
        except$ptr    POINTER;

END rq$a$delete$connection;

$RESTORE