pike.git / src / modules / _Stdio / buffer.cmod

version» Context lines:

pike.git/src/modules/_Stdio/buffer.cmod:656:    }       static struct object *io_read_bignum( Buffer *io, size_t len )    {    struct object *o;    MP_INT *i;    unsigned char *p;    LONGEST res;       if( !io_avail(io,len) ) return NULL; -  o = fast_clone_object(get_auto_bignum_program()); +  o = fast_clone_object(bignum_program);    i = (void*)o->storage;    mpz_import( i, len, 1, 1, 0, 0, io_read_pointer(io) );    io_consume(io,len);    return o;    }       static void io_add_bignum( Buffer *io, struct object *o, int width )    ATTRIBUTE((noclone,noinline));       static void io_add_bignum( Buffer *io, struct object *o, int width )
pike.git/src/modules/_Stdio/buffer.cmod:1155:    // We should probably optimize this. :)    tmp = io_read_string( io, nbytes );    if( tmp->str[0]&0x80 )    {    push_int(-1);    push_int( nbytes * 8 );    o_lsh();    }    ref_push_string( tmp );    push_int( 256 ); -  push_object( clone_object( get_auto_bignum_program(), 2 ) ); +  push_object( clone_object( bignum_program, 2 ) );    if( tmp->str[0]&0x80 )    o_xor();    free_string( tmp );    }       PIKEFUN int(0..) _size_object( )    {    RETURN THIS->malloced ? THIS->allocated : THIS->stash.len;    }