lo_truncate (PGconn)

    /*
     * call-seq:
     *    conn.lo_truncate( lo_desc, len ) -> nil
     *
     * Truncates the large object _lo_desc_ to size _len_.
     */
    static VALUE
    pgconn_lotruncate(VALUE self, VALUE in_lo_desc, VALUE in_len)
    {
            PGconn *conn = get_pgconn(self);
            int lo_desc = NUM2INT(in_lo_desc);
            size_t len = NUM2INT(in_len);

            if(lo_truncate(conn,lo_desc,len) < 0)
                    rb_raise(rb_ePGError,"lo_truncate failed");

            return Qnil;
    }