Changeset 1987


Ignore:
Timestamp:
Jun 15, 2006, 3:16:35 AM (15 years ago)
Author:
orlov
Message:
  • New MPInt class -- selfmade realisation of multiprecision integers.
Location:
to-imperative/trunk/runtime
Files:
2 added
6 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/runtime/Makefile

    r1778 r1987  
    2121  rf_short_int \
    2222  rf_integer \
     23  rf_mpint \
    2324  rf_object \
    2425  rf_static_object \
  • to-imperative/trunk/runtime/rf_closure.hh

    r1778 r1987  
    66#include "rf_symbol.hh"
    77#include "rf_func.hh"
     8#include "rf_expr.hh"
    89
    910namespace rftype
  • to-imperative/trunk/runtime/rf_core.cc

    r1778 r1987  
    193193TypeRegister rftype::Word::reg(&Word::funcs, type_word) ;
    194194
     195#ifndef RFRT_WITHOUT_MPINT
    195196#ifndef RFRT_WITHOUT_GMP
    196197pxx::ChunkAllocator<Integer::MpzContainer>* Integer::mpz_allocator = null ;
    197198TypeRegister rftype::Integer::reg(&Integer::funcs, type_int) ;
    198 #endif // !defined RFRT_WITHOUT_GMP
     199#else
     200TypeRegister RF_SYMBOL(IntMP)::reg(&RF_SYMBOL(IntMP)::funcs, type_int) ;
     201#endif
     202#endif
     203
    199204
    200205ObjectRegister rftype::Vector::reg(type_vector) ;
  • to-imperative/trunk/runtime/rf_core.hh

    r1845 r1987  
    3737#include "rf_short_int.ih"
    3838#include "rf_integer.ih"
     39#include "rf_mpint.hh"
    3940#include "rf_word.ih"
    4041#include "rf_vector.ih"
  • to-imperative/trunk/runtime/rf_integer.hh

    r1908 r1987  
    1010#include <wchar.h>
    1111
    12 #ifdef RFRT_WITHOUT_GMP
     12#ifdef RFRT_WITHOUT_MPINT
    1313
    1414#include "rf_short_int.hh"
     
    2121}
    2222
    23 #else // !defined RFRT_WITHOUT_GMP
     23#elif defined RFRT_WITHOUT_GMP
     24
     25#include "rf_mpint.hh"
     26
     27namespace rftype
     28{
     29
     30typedef RF_SYMBOL(MPInt) Integer;
     31
     32}
     33
     34#else // !defined RFRT_WITHOUT_GMP && !defined RFRT_WITHOUT_MPINT
    2435
    2536#include <gmp.h>
     
    137148}
    138149
    139 #endif // !defined RFRT_WITHOUT_GMP
     150#endif // !defined RFRT_WITHOUT_GMP && !defined RFRT_WITHOUT_MPINT
    140151
    141152#endif // __rf_integer_hh__
  • to-imperative/trunk/runtime/rf_symbol.hh

    r1986 r1987  
    168168
    169169  static inline unsigned get_type() ;
     170
     171  /// FIXME: transitional code!
     172  //  After moving all term types to Symbol<> term_class_t should be completely
     173  //  removed.
     174  //
     175  /// Term class for template instantiations
     176  static const term_class_t term_class = short_term;
    170177};
    171178
Note: See TracChangeset for help on using the changeset viewer.