[pkgsrc/trunk]: pkgsrc/lang/cu-prolog Fixed invalid lvalue.

[rillig <rillig%pkgsrc.org@localhost>]

details:   https://anonhg.NetBSD.org/pkgsrc/rev/527dc8650c45
branches:  trunk
changeset: 534178:527dc8650c45
user:      rillig <rillig%pkgsrc.org@localhost>
date:      Sat Oct 13 12:36:14 2007 +0000

description:
Fixed invalid lvalue.

diffstat:

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

diffs (47 lines):

diff -r 1f7e5cf891c5 -r 527dc8650c45 lang/cu-prolog/distinfo
--- a/lang/cu-prolog/distinfo   Sat Oct 13 12:19:42 2007 +0000
+++ b/lang/cu-prolog/distinfo   Sat Oct 13 12:36:14 2007 +0000
@@ -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 @@
 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 -r 1f7e5cf891c5 -r 527dc8650c45 lang/cu-prolog/patches/patch-ab
--- a/lang/cu-prolog/patches/patch-ab   Sat Oct 13 12:19:42 2007 +0000
+++ b/lang/cu-prolog/patches/patch-ab   Sat Oct 13 12:36:14 2007 +0000
@@ -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 @@
  #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))