fix limit on atoms to ints

2013-10-08 13:04:30 +01:00
parent c757e51cb0
commit 70d864b13d
7 changed files with 710 additions and 697 deletions
--- a/C/init.c
+++ b/C/init.c
@@ -1016,7 +1016,9 @@ InitSWIAtoms(void)
 {
  extern atom_t ATOM_;

-  int i=0, j=0;
+  int j=0;
+  MaxAtomTranslations = 2*N_SWI_ATOMS ;
+  SWI_Atoms = (Atom *)malloc(sizeof(Atom)*MaxAtomTranslations);
 #include "iswiatoms.h"
  Yap_InitSWIHash();
  ATOM_ = PL_new_atom("");