From c93d2ab8d9f71d183c1f0d54e22f5ef0be49852c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Sat, 27 Feb 1999 01:31:39 +0100
Subject: [PATCH] Fixed bug in LOW_SUBTRACT_PCHARP().
Rev: src/stralloc.h:1.30
---
src/stralloc.h | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/src/stralloc.h b/src/stralloc.h
index 916875ec92..db570ed01b 100644
--- a/src/stralloc.h
+++ b/src/stralloc.h
@@ -5,7 +5,7 @@
\*/
/*
- * $Id: stralloc.h,v 1.29 1999/02/10 21:46:55 hubbe Exp $
+ * $Id: stralloc.h,v 1.30 1999/02/27 00:31:39 grubba Exp $
*/
#ifndef STRALLOC_H
#define STRALLOC_H
@@ -76,7 +76,7 @@ typedef struct p_wchar_p
#define INC_PCHARP(X,Y) (((X).ptr)+=(Y) << (X).shift)
#define LOW_COMPARE_PCHARP(X,CMP,Y) (((char *)((X).ptr)) CMP ((char *)((Y).ptr)))
-#define LOW_SUBTRACT_PCHARP(X,Y) LOW_COMPARE_PCHARP((X),-,(Y))
+#define LOW_SUBTRACT_PCHARP(X,Y) (LOW_COMPARE_PCHARP((X),-,(Y))>>(X).shift)
#ifdef PIKE_DEBUG
#define SUBTRACT_PCHARP(X,Y) ((X).shift!=(Y).shift?(fatal("Subtracting different size charp!\n")),0:LOW_SUBTRACT_PCHARP((X),(Y)))
--
GitLab