first cut at call counter.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@580 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2002-09-03 14:28:09 +00:00
parent 89a188d5d7
commit 94e9529128
20 changed files with 459 additions and 16 deletions
--- a/m4/Yatom.h.m4
+++ b/m4/Yatom.h.m4
@@ -162,6 +162,7 @@ Inline(IsValProperty, PropFlags, int, flags, (flags == ValProperty) )
 	    CodeOfPred holds the address of the	correspondent C-function.
 */
 typedef enum {
+  CountPredFlag =    0x4000000L,	/* count calls to pred */
  HiddenPredFlag =   0x2000000L,	/* ! should ! across */
  CArgsPredFlag =    0x1000000L,	/* ! should ! across */
  CutTransparentPredFlag =   0x800000L,	/* ! should ! across */