projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 2003-08-01 14:58:47 by panne]
[ghc-hetmet.git]
/
ghc
/
utils
/
prof
/
cgprof
/
cgprof.c
diff --git
a/ghc/utils/prof/cgprof/cgprof.c
b/ghc/utils/prof/cgprof/cgprof.c
index
98c8ed0
..
414476e
100644
(file)
--- a/
ghc/utils/prof/cgprof/cgprof.c
+++ b/
ghc/utils/prof/cgprof/cgprof.c
@@
-1,5
+1,5
@@
/* ------------------------------------------------------------------------
/* ------------------------------------------------------------------------
- * $Id: cgprof.c,v 1.3 2003/08/01 14:50:48 panne Exp $
+ * $Id: cgprof.c,v 1.4 2003/08/01 14:58:47 panne Exp $
*
* Copyright (C) 1995-2000 University of Oxford
*
*
* Copyright (C) 1995-2000 University of Oxford
*
@@
-64,7
+64,6
@@
void enlargeRawProfile() {
* -------------------------------------------------------------------------- */
void add_costs(object_cost *left, object_cost right) {
* -------------------------------------------------------------------------- */
void add_costs(object_cost *left, object_cost right) {
- int i;
left->syncs += right.syncs;
left->comp_max += right.comp_max;
left->syncs += right.syncs;
left->comp_max += right.comp_max;
@@
-634,7
+633,6
@@
void FormStack2(ccs_matrix *m, cc_matrix *n, int i, char s[])
void PrintStack(ccs_matrix *m, cc_matrix *n, int i)
{
void PrintStack(ccs_matrix *m, cc_matrix *n, int i)
{
- char stack[MAX_PROFILE_LINE_LENGTH];
int j = i;
if ((*m)[j].cc != 0)
{
int j = i;
if ((*m)[j].cc != 0)
{
@@
-775,9
+773,7
@@
void produce_HEAP_PROFILE(FILE *HEAP_PROFILE, TheHeap *th, heap_object_matrix *h
/* void readRawProfile(FILE *fptr,int *nonodes) { */
void readRawProfile(FILE *fp,int *nonodes, int MaxNoNodes) {
/* void readRawProfile(FILE *fptr,int *nonodes) { */
void readRawProfile(FILE *fp,int *nonodes, int MaxNoNodes) {
- char line[MAX_PROFILE_LINE_LENGTH];
char stack[MAX_PROFILE_LINE_LENGTH];
char stack[MAX_PROFILE_LINE_LENGTH];
- char rest[MAX_PROFILE_LINE_LENGTH];
int i,nolines,sstepline,syncs;
char *ptr,*drag;
int i,nolines,sstepline,syncs;
char *ptr,*drag;
@@
-791,16
+787,12
@@
void readRawProfile(FILE *fp,int *nonodes, int MaxNoNodes) {
/* set to zero for now. Might use these later for heap costs. */
/* set to zero for now. Might use these later for heap costs. */
- int *result; /* Something to do with daVinci? */
-
/* GHC specific variables */
/* GHC specific variables */
- int a,b,c,d,x,y,z,count, next, throw;
+ int a,b,c,d,x,z,count, next;
int newloop;
int newloop;
- char *ignore;
char e[MAX_STRING_SIZE];
char f[MAX_STRING_SIZE];
char e[MAX_STRING_SIZE];
char f[MAX_STRING_SIZE];
- char g[MAX_STRING_SIZE];
char lline[MAX_PROFILE_LINE_LENGTH];
/* identifiers generated by the XML handler */
char lline[MAX_PROFILE_LINE_LENGTH];
/* identifiers generated by the XML handler */
@@
-813,7
+805,6
@@
void readRawProfile(FILE *fp,int *nonodes, int MaxNoNodes) {
char *typeconstr=">>type_constr";
char *ending=">>";
char *typeconstr=">>type_constr";
char *ending=">>";
- char *blank="blank";
/* FILE *fp; */
cc_matrix *cc_m;
/* FILE *fp; */
cc_matrix *cc_m;