/*
 * call-seq:
 *    conn.describe_portal( portal_name ) -> PGresult
 *
 * Retrieve information about the portal _portal_name_.
 */
static VALUE
pgconn_describe_portal(self, stmt_name)
        VALUE self, stmt_name;
{
        PGresult *result;
        VALUE rb_pgresult;
        PGconn *conn = get_pgconn(self);
        char *stmt;
        if(stmt_name == Qnil) {
                stmt = NULL;
        }
        else {
                Check_Type(stmt_name, T_STRING);
                stmt = StringValuePtr(stmt_name);
        }
        result = PQdescribePortal(conn, stmt);
        rb_pgresult = new_pgresult(result);
        pgresult_check(self, rb_pgresult);
        return rb_pgresult;
}