From 8fb6f4d148fce8c41c5417d1ede8fc38d99a7396 Mon Sep 17 00:00:00 2001
From: Chris Young <chris@unsatisfactorysoftware.co.uk>
Date: Fri, 30 Jan 2015 23:28:35 +0000
Subject: Fix GetSucc (credit: Buzz)

---
 amiga/os3support.c | 7 +++++++
 amiga/os3support.h | 2 +-
 2 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/amiga/os3support.c b/amiga/os3support.c
index 34117937d..f29763633 100644
--- a/amiga/os3support.c
+++ b/amiga/os3support.c
@@ -192,6 +192,13 @@ struct Node *GetHead(struct List *list)
 	return res;
 }
 
+struct Node *GetSucc(struct Node *node)
+{
+	if (node->ln_Succ->ln_Succ == NULL) return NULL;
+	return node->ln_Succ;
+}
+
+
 /* Intuition */
 uint32 GetAttrs(Object *obj, Tag tag1, ...)
 {
diff --git a/amiga/os3support.h b/amiga/os3support.h
index 319d3b319..4752e9109 100644
--- a/amiga/os3support.h
+++ b/amiga/os3support.h
@@ -144,7 +144,6 @@
 #define AllocVecTagList(SZ,TAG) AllocVec(SZ,MEMF_ANY) /* AllocVecTagList with no tags */
 #define FindIName FindName
 #define GetPred(N) N ? (N)->ln_Pred : NULL
-#define GetSucc(N) N ? (N)->ln_Succ : NULL
 
 /* Gfx */
 #define SetRPAttrs(...) (void)0 /*\todo Probably need to emulate this */
@@ -240,6 +239,7 @@ void FreeSysObject(ULONG type, APTR obj);
 
 /* Exec */
 struct Node *GetHead(struct List *list);
+struct Node *GetSucc(struct Node *node);
 
 /* Intuition */
 uint32 GetAttrs(Object *obj, Tag tag1, ...);
-- 
cgit v1.2.3