From 945f9c319c114c284a9fcc644dfa6e89ea0a20b8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Tue, 3 Oct 2000 20:18:29 +0200
Subject: [PATCH] Bugfix in mknode().
Rev: src/las.c:1.221
---
src/las.c | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/src/las.c b/src/las.c
index 28fa8b18dd..86e7e20ed9 100644
--- a/src/las.c
+++ b/src/las.c
@@ -5,7 +5,7 @@
\*/
/**/
#include "global.h"
-RCSID("$Id: las.c,v 1.220 2000/10/02 14:16:01 grubba Exp $");
+RCSID("$Id: las.c,v 1.221 2000/10/03 18:18:29 grubba Exp $");
#include "language.h"
#include "interpret.h"
@@ -973,7 +973,7 @@ node *debug_mknode(short token, node *a, node *b)
}
/* We try to optimize most things, but argument lists are hard... */
- if(token != F_ARG_LIST && (a || b))
+ if((token != F_ARG_LIST) && (a || b))
res->node_info |= OPT_TRY_OPTIMIZE;
res->tree_info |= res->node_info;
@@ -984,7 +984,8 @@ node *debug_mknode(short token, node *a, node *b)
#endif
check_tree(res,0);
- if(!Pike_compiler->num_parse_error && Pike_compiler->compiler_pass==2)
+ if(!Pike_compiler->num_parse_error && Pike_compiler->compiler_pass==2 &&
+ (res->node_info & OPT_TRY_OPTIMIZE))
{
optimize(res);
check_tree(res,0);
--
GitLab