projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 2005-02-23 11:03:42 by simonmar]
[ghc-hetmet.git]
/
ghc
/
utils
/
hp2ps
/
Main.h
diff --git
a/ghc/utils/hp2ps/Main.h
b/ghc/utils/hp2ps/Main.h
index
b0d4bf4
..
30e7a7e
100644
(file)
--- a/
ghc/utils/hp2ps/Main.h
+++ b/
ghc/utils/hp2ps/Main.h
@@
-1,6
+1,9
@@
#ifndef MAIN_H
#define MAIN_H
#ifndef MAIN_H
#define MAIN_H
+#include "../includes/ghcconfig.h"
+#include <stdio.h>
+
#ifdef __STDC__
#define PROTO(x) x
#else
#ifdef __STDC__
#define PROTO(x) x
#else
@@
-27,9
+30,17
@@
void _ghcAssert PROTO((char *, unsigned int));
*/
typedef double floatish;
typedef double doublish; /* higher precision, if anything; little used */
*/
typedef double floatish;
typedef double doublish; /* higher precision, if anything; little used */
-typedef long intish;
typedef int boolish;
typedef int boolish;
+/* Use "long long" if we have it: the numbers in profiles can easily
+ * overflow 32 bits after a few seconds execution.
+ */
+#ifdef HAVE_LONG_LONG
+typedef long long int intish;
+#else
+typedef long int intish;
+#endif
+
extern intish nsamples;
extern intish nmarks;
extern intish nidents;
extern intish nsamples;
extern intish nmarks;
extern intish nidents;