/*
 * call-seq:
 *    conn.lo_create( oid ) -> Fixnum
 *
 * Creates a large object with oid _oid_. Returns the large object Oid.
 * On failure, it raises PGError exception.
 */
static VALUE
pgconn_locreate(VALUE self, VALUE in_lo_oid)
{
        Oid ret, lo_oid;
        PGconn *conn = get_pgconn(self);
        lo_oid = NUM2INT(in_lo_oid);

        ret = lo_create(conn, in_lo_oid);
        if (ret == InvalidOid)
                rb_raise(rb_ePGError, "lo_create failed");

        return INT2FIX(ret);
}