1998-11-17
1998-11-17 23:16:39 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
-
32e2afd3357f066e1a23cab34434c8b6ea6d6820
(13 lines)
(+11/-2)
[
Show
| Annotate
]
Branch: 7.9
more debug added
Rev: src/las.c:1.70
4:
||| See the files COPYING and DISCLAIMER for more information.
\*/
#include "global.h"
- RCSID("$Id: las.c,v 1.69 1998/11/17 22:57:50 hubbe Exp $");
+ RCSID("$Id: las.c,v 1.70 1998/11/17 23:16:39 hubbe Exp $");
#include "language.h"
#include "interpret.h"
82: Inside #if defined(DEBUG)
if(n->token==USHRT_MAX)
fatal("Free node in tree.\n");
+ if(d_flag<2) return;
+
if(!(depth & 1023))
{
node *q;
333:
node *mknode(short token,node *a,node *b)
{
node *res;
+ #ifdef DEBUG
+ if(a && a==b)
+ fatal("mknode: a and be are the same!\n");
+ #endif
+
+
check_tree(a,0);
check_tree(b,0);
res = mkemptynode();
1056:
static void low_print_tree(node *foo,int needlval)
{
if(!foo) return;
- if(l_flag>4)
+ if(l_flag>9)
{
printf("/*%x*/",foo->tree_info);
}