From 0120179b83287f84619f6202b672a6ba1c06f67f Mon Sep 17 00:00:00 2001
From: rillig <rillig>
Date: Sat, 13 Oct 2007 12:36:14 +0000
Subject: Fixed invalid lvalue.

---
 lang/cu-prolog/distinfo         |  4 ++--
 lang/cu-prolog/patches/patch-ab | 13 ++++++++-----
 2 files changed, 10 insertions(+), 7 deletions(-)

(limited to 'lang')

diff --git a/lang/cu-prolog/distinfo b/lang/cu-prolog/distinfo
index f0da3c769cb..485e146c8f3 100644
--- a/lang/cu-prolog/distinfo
+++ b/lang/cu-prolog/distinfo
@@ -1,4 +1,4 @@
-$NetBSD: distinfo,v 1.5 2006/02/24 18:37:20 joerg Exp $
+$NetBSD: distinfo,v 1.6 2007/10/13 12:36:14 rillig Exp $
 
 SHA1 (cu-prolog-3.94/cupsrc.tar.gz) = bc292c39bf58d142e8810e0c7e7aa25a5e44ad16
 RMD160 (cu-prolog-3.94/cupsrc.tar.gz) = 201c44c668602d1bdb1dfba5db767937fb8c5301
@@ -7,7 +7,7 @@ SHA1 (cu-prolog-3.94/cupdoc.tar.gz) = 1d63be56d044fc51fc034c248e2d0cbca35756f3
 RMD160 (cu-prolog-3.94/cupdoc.tar.gz) = 58dce5374dffe7a68504c6976982fd2613ec3e0c
 Size (cu-prolog-3.94/cupdoc.tar.gz) = 136474 bytes
 SHA1 (patch-aa) = 5a62457aa989665b52f8413ae649b4b2eb4a7e0e
-SHA1 (patch-ab) = 307077c44051118e8858e7c96dc687ccd71dc37a
+SHA1 (patch-ab) = 91187bfa019c2c37d58c540dd49d3c4762cf91ca
 SHA1 (patch-ac) = e30a669d5f455ad1063a3e53244c429d5b981625
 SHA1 (patch-ad) = 3099002c96faf988499f5f7cde79dd8416aa360d
 SHA1 (patch-ae) = aff538343572cf4e786177aa27d1c934255646b8
diff --git a/lang/cu-prolog/patches/patch-ab b/lang/cu-prolog/patches/patch-ab
index c702944b82f..c5aab97b5ad 100644
--- a/lang/cu-prolog/patches/patch-ab
+++ b/lang/cu-prolog/patches/patch-ab
@@ -1,7 +1,7 @@
-$NetBSD: patch-ab,v 1.4 2006/02/24 18:37:20 joerg Exp $
+$NetBSD: patch-ab,v 1.5 2007/10/13 12:36:14 rillig Exp $
 
---- include.h.orig	1995-01-27 07:38:48.000000000 +0000
-+++ include.h
+--- include.h.orig	1995-01-27 08:38:48.000000000 +0100
++++ include.h	2007-10-13 14:34:37.000000000 +0200
 @@ -21,6 +21,7 @@
  
  #include <stdio.h>
@@ -22,9 +22,12 @@ $NetBSD: patch-ab,v 1.4 2006/02/24 18:37:20 joerg Exp $
  #define KANJI 1		/* 1: allow EUC Kanji for str functions */
  
  /* Tee print macro */
-@@ -135,8 +140,19 @@ struct term {			/* atomic formula (liter
+@@ -133,10 +138,21 @@ struct term {			/* atomic formula (liter
+ #define str_value(Term)   ((Term)->tag.s_value)
+ #define filep_value(Term) ((Term)->tag.f_value)
  #define head_of_list(Term) (((struct clause *)Term)->c_form)
- #define tail_of_list(Term) ((struct term *)((struct clause *)Term)->c_link)
+-#define tail_of_list(Term) ((struct term *)((struct clause *)Term)->c_link)
++#define tail_of_list(Term) (*((struct term **)&(((struct clause *)Term)->c_link)))
  
 +#if defined(__linux__)
 +#define is_readable(FP) (!(FP->_flags & _IO_NO_READS))
-- 
cgit v1.2.3