Quantcast

Add debug printing for resResult in hat-c.c

classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|  
Report Content as Inappropriate
star

Add debug printing for resResult in hat-c.c

nlavine
I found it somewhat disconcerting when I looked at the debugging output
from hat-c.c that it showed many entResults and no resResults. This may be
an issue of personal style, but this patch was useful for me. It adds a
print in resResult to match the one in entResult.

Noah Lavine

--- hat-c.c 2006-11-15 05:45:17.000000000 -0500
+++ hat-c.c 2008-06-15 18:18:14.247202914 -0400

@@ -1805,6 +1805,7 @@
   LastExp = node;
   node &= hiddenMask;
   result &= hiddenMask;
+  HIDE(fprintf(stderr,"\tresResult 0x%x 0x%x 0x%x 0x%x\n", node, result,
use, ntohl(node)+1+sizeof(FileOffset)+(use?sizeof(FileOffset):0));)
   hat_reduce(ntohl(node),1+sizeof(FileOffset)+(use?sizeof(FileOffset):0),
      result);
 }

_______________________________________________
Hat mailing list
[hidden email]
http://www.haskell.org/mailman/listinfo/hat
Loading...