Support for long integers
diff --git a/Modules/cgensupport.c b/Modules/cgensupport.c
index 8d20f02..9a33eb9 100644
--- a/Modules/cgensupport.c
+++ b/Modules/cgensupport.c
@@ -24,21 +24,8 @@
/* Functions used by cgen output */
-#include <stdio.h>
-
-#include "PROTO.h"
-#include "object.h"
-#include "intobject.h"
-#include "floatobject.h"
-#include "stringobject.h"
-#include "tupleobject.h"
-#include "listobject.h"
-#include "methodobject.h"
-#include "moduleobject.h"
-#include "modsupport.h"
-#include "import.h"
+#include "allobjects.h"
#include "cgensupport.h"
-#include "errors.h"
/* Functions to construct return values */
@@ -130,6 +117,10 @@
*p_arg = GETINTVALUE((intobject *)v);
return 1;
}
+ else if (is_longobject(v)) {
+ *p_arg = dgetlongvalue(v);
+ return 1;
+ }
return err_badarg();
}
@@ -149,6 +140,10 @@
*p_arg = GETINTVALUE((intobject *)v);
return 1;
}
+ else if (is_longobject(v)) {
+ *p_arg = dgetlongvalue(v);
+ return 1;
+ }
return err_badarg();
}