pike.git / src / bignum.c

version» Context lines:

pike.git/src/bignum.c:1:   /*   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: bignum.c,v 1.42 2008/01/26 22:34:17 mast Exp $ + || $Id: bignum.c,v 1.43 2008/05/01 20:50:02 mast Exp $   */      #include "global.h"      #ifdef AUTO_BIGNUM      #include "interpret.h"   #include "program.h"   #include "object.h"   #include "svalue.h"
pike.git/src/bignum.c:128: Inside #if defined(INT64)
  {    if(i == DO_NOT_WARN((INT_TYPE)i))    {    push_int(DO_NOT_WARN((INT_TYPE)i));    }    else    Pike_fatal ("Failed to convert large integer (Gmp.bignum not loaded).\n");   }      PMOD_EXPORT void (*push_int64) (INT64) = bootstrap_push_int64; + PMOD_EXPORT void (*push_uint64) (unsigned INT64) = NULL;   PMOD_EXPORT int (*int64_from_bignum) (INT64 *, struct object *) = NULL; -  + PMOD_EXPORT int (*uint64_from_bignum) (unsigned INT64 *, struct object *)=NULL;   PMOD_EXPORT void (*reduce_stack_top_bignum) (void) = NULL;      PMOD_EXPORT void hook_in_int64_funcs (    void (*push_int64_val)(INT64), -  +  void (*push_uint64_val) (unsigned INT64),    int (*int64_from_bignum_val) (INT64 *, struct object *), -  +  int (*uint64_from_bignum_val) (unsigned INT64 *, struct object *),    void (*reduce_stack_top_bignum_val) (void))   {    /* Assigning the pointers above directly from the Gmp module doesn't    * work in some cases, e.g. NT. */    push_int64 = push_int64_val ? push_int64_val : bootstrap_push_int64; -  +  push_uint64 = push_uint64_val;    int64_from_bignum = int64_from_bignum_val; -  +  uint64_from_bignum = uint64_from_bignum_val;    reduce_stack_top_bignum = reduce_stack_top_bignum_val;   }   #endif      #endif /* AUTO_BIGNUM */