Browse files

Cleanup Bignum defines

  • Loading branch information...
1 parent a527018 commit a24909979734ee8be983832c67740ea46b9f509e @dbussink dbussink committed Feb 26, 2014
Showing with 5 additions and 8 deletions.
  1. +5 −8 vm/builtin/bignum.cpp
View
13 vm/builtin/bignum.cpp
@@ -13,18 +13,15 @@
#include "object_utils.hpp"
#include "ontology.hpp"
-#define BASIC_CLASS(blah) G(blah)
-#define NEW_STRUCT(obj, str, kls, kind) \
- obj = (typeof(obj))Bignum::create(state); \
- str = (kind *)(obj->mp_val())
-#define DATA_STRUCT(obj, type) ((type)(obj->mp_val()))
+#define NEW_STRUCT(obj, str) \
+ obj = Bignum::create(state); \
+ str = (obj->mp_val())
#define NMP mp_int *n; Bignum* n_obj; \
- NEW_STRUCT(n_obj, n, BASIC_CLASS(bignum), mp_int);
+ NEW_STRUCT(n_obj, n);
#define MMP mp_int *m; Bignum* m_obj; \
- NEW_STRUCT(m_obj, m, BASIC_CLASS(bignum), mp_int);
-
+ NEW_STRUCT(m_obj, m);
#define BDIGIT_DBL long long
#define DIGIT_RADIX (1UL << DIGIT_BIT)

0 comments on commit a249099

Please sign in to comment.