From 584603b9d0571651ae5bd11b50901f86b1a4dbbf Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Thu, 19 Jun 1997 13:59:44 -0700
Subject: [PATCH] bugfix
Rev: src/docode.c:1.18
---
src/docode.c | 9 +++++----
1 file changed, 5 insertions(+), 4 deletions(-)
diff --git a/src/docode.c b/src/docode.c
index e84657b08c..20e418eaca 100644
--- a/src/docode.c
+++ b/src/docode.c
@@ -4,7 +4,7 @@
||| See the files COPYING and DISCLAIMER for more information.
\*/
#include "global.h"
-RCSID("$Id: docode.c,v 1.17 1997/05/19 23:31:00 hubbe Exp $");
+RCSID("$Id: docode.c,v 1.18 1997/06/19 20:59:44 hubbe Exp $");
#include "las.h"
#include "program.h"
#include "language.h"
@@ -279,7 +279,8 @@ static int do_docode2(node *n,int flags)
default:
yyerror("Illegal lvalue.");
emit(F_NUMBER,0);
- return 1;
+ emit(F_NUMBER,0);
+ return 2;
case F_LVALUE_LIST:
case F_LOCAL:
@@ -509,7 +510,7 @@ static int do_docode2(node *n,int flags)
tmp1=do_docode(CAR(n),DO_LVALUE);
#ifdef DEBUG
if(tmp1 != 2)
- fatal("HELP! FATAL INTERNAL COMPILER ERROR\n");
+ fatal("HELP! FATAL INTERNAL COMPILER ERROR (again)\n");
#endif
if(flags & DO_POP)
@@ -526,7 +527,7 @@ static int do_docode2(node *n,int flags)
tmp1=do_docode(CAR(n),DO_LVALUE);
#ifdef DEBUG
if(tmp1 != 2)
- fatal("HELP! FATAL INTERNAL COMPILER ERROR\n");
+ fatal("HELP! FATAL INTERNAL COMPILER ERROR (yet again)\n");
#endif
if(flags & DO_POP)
{
--
GitLab