close (PGlarge)

    /*
     * call-seq:
     *    lrg.close()
     *
     * Closes a large object. Closed when they are garbage-collected.
     */
    static VALUE
    pglarge_close(obj)
        VALUE obj;
    {
        PGlarge *pglarge = get_pglarge(obj);

        if((lo_close(pglarge->pgconn, pglarge->lo_fd)) < 0) {
            rb_raise(rb_ePGError, "can't closed large object");
        }
        DATA_PTR(obj) = 0;

        return Qnil;
    }