From 9495d8ae52cdd32882458d0905cab5f1b820a55c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Wed, 15 Dec 1999 02:40:34 +0100
Subject: [PATCH] Fixed typo in o_xor() on types.
Rev: src/operators.c:1.78
---
src/operators.c | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/src/operators.c b/src/operators.c
index b14c0e10de..ee2465a27b 100644
--- a/src/operators.c
+++ b/src/operators.c
@@ -6,7 +6,7 @@
/**/
#include "global.h"
#include <math.h>
-RCSID("$Id: operators.c,v 1.77 1999/12/15 00:52:31 grubba Exp $");
+RCSID("$Id: operators.c,v 1.78 1999/12/15 01:40:34 grubba Exp $");
#include "interpret.h"
#include "svalue.h"
#include "multiset.h"
@@ -1294,7 +1294,7 @@ void o_xor(void)
SIMPLE_BAD_ARG_ERROR("`^", 2, "type");
}
type_stack_mark();
- push_type_int(sp[-1].u.program->id);
+ push_type_int(p->id);
push_type(0);
push_type(T_OBJECT);
pop_stack();
@@ -1310,7 +1310,7 @@ void o_xor(void)
SIMPLE_BAD_ARG_ERROR("`^", 1, "type");
}
type_stack_mark();
- push_type_int(sp[-1].u.program->id);
+ push_type_int(p->id);
push_type(0);
push_type(T_OBJECT);
pop_stack();
--
GitLab