From bdf5eb4d11eeb151a280c29d3db601c3d925dda4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Tue, 7 Mar 2000 13:22:08 -0800
Subject: [PATCH] nothing much changed..
Rev: src/docode.c:1.65
Rev: src/docode.h:1.8
---
src/docode.c | 6 +++---
src/docode.h | 3 ++-
2 files changed, 5 insertions(+), 4 deletions(-)
diff --git a/src/docode.c b/src/docode.c
index 041f63197f..8c17f5be73 100644
--- a/src/docode.c
+++ b/src/docode.c
@@ -5,7 +5,7 @@
\*/
/**/
#include "global.h"
-RCSID("$Id: docode.c,v 1.64 2000/01/04 01:32:04 grubba Exp $");
+RCSID("$Id: docode.c,v 1.65 2000/03/07 21:22:08 hubbe Exp $");
#include "las.h"
#include "program.h"
#include "language.h"
@@ -71,7 +71,7 @@ void do_pop(int x)
}
}
-#define DO_CODE_BLOCK(X) do_pop(do_docode((X),DO_NOT_COPY | DO_POP));
+#define DO_CODE_BLOCK(X) do_pop(do_docode((X),DO_NOT_COPY | DO_POP | DO_DEFER_POP))
int do_docode(node *n,INT16 flags)
{
@@ -801,8 +801,8 @@ static int do_docode2(node *n,int flags)
return 1;
}
- case F_COMMA_EXPR:
case F_ARG_LIST:
+ case F_COMMA_EXPR:
tmp1=do_docode(CAR(n),flags & ~WANT_LVALUE);
tmp1+=do_docode(CDR(n),flags);
return tmp1;
diff --git a/src/docode.h b/src/docode.h
index f249782b39..f2e2beb8bc 100644
--- a/src/docode.h
+++ b/src/docode.h
@@ -5,7 +5,7 @@
\*/
/*
- * $Id: docode.h,v 1.7 1998/05/25 10:38:45 hubbe Exp $
+ * $Id: docode.h,v 1.8 2000/03/07 21:22:08 hubbe Exp $
*/
#ifndef DOCODE_H
#define DOCODE_H
@@ -15,6 +15,7 @@
#define DO_POP 4
#define DO_INDIRECT 8
#define DO_LVALUE_IF_POSSIBLE 16
+#define DO_DEFER_POP 32
#define WANT_LVALUE (DO_LVALUE | DO_INDIRECT)
--
GitLab