[pkgsrc/trunk]: pkgsrc/lang/gpc Added a patch for gcc4.

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

details:   https://anonhg.NetBSD.org/pkgsrc/rev/260a4451e3b2
branches:  trunk
changeset: 538708:260a4451e3b2
user:      rillig <rillig%pkgsrc.org@localhost>
date:      Sun Feb 17 10:07:59 2008 +0000

description:
Added a patch for gcc4.

diffstat:

 lang/gpc/distinfo         |   3 ++-
 lang/gpc/patches/patch-ak |  33 +++++++++++++++++++++++++++++++++
 2 files changed, 35 insertions(+), 1 deletions(-)

diffs (51 lines):

diff -r 2ec2ed71b499 -r 260a4451e3b2 lang/gpc/distinfo
--- a/lang/gpc/distinfo Sun Feb 17 08:59:19 2008 +0000
+++ b/lang/gpc/distinfo Sun Feb 17 10:07:59 2008 +0000
@@ -1,4 +1,4 @@
-$NetBSD: distinfo,v 1.4 2006/10/22 20:27:22 rillig Exp $
+$NetBSD: distinfo,v 1.5 2008/02/17 10:07:59 rillig Exp $
 
 SHA1 (gpc-2.1.tar.gz) = fd4c1b6ab70483d8e38c78c3052868c9fde81f13
 RMD160 (gpc-2.1.tar.gz) = 67e998a1dfc50debae3617a08c270ab31642b78e
@@ -19,3 +19,4 @@
 SHA1 (patch-ah) = bb4d84561d20d2379a71a442b8711b2c54cf4bf2
 SHA1 (patch-ai) = e6b56c677faed4ccc4d2b4f71101227329d32cc7
 SHA1 (patch-aj) = 90dbf012c664b93317c5c28249d39b2fdd34497e
+SHA1 (patch-ak) = b02fc35f47b5d3cef7fd00605d14fd991c1ca75b
diff -r 2ec2ed71b499 -r 260a4451e3b2 lang/gpc/patches/patch-ak
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/lang/gpc/patches/patch-ak Sun Feb 17 10:07:59 2008 +0000
@@ -0,0 +1,33 @@
+$NetBSD: patch-ak,v 1.1 2008/02/17 10:07:59 rillig Exp $
+
+bitfields cannot be updated via an lvalue cast assigment.
+
+--- gcc/p/module.c.orig        2002-04-26 20:25:38.000000000 +0000
++++ gcc/p/module.c     2007-12-01 12:37:20.000000000 +0000
+@@ -2548,7 +2548,7 @@ itab_check_gpi_checksum (interface_name,
+   itab->gpi_checksum = gpi_checksum;
+   /* @@ misuse of TREE_LIST and TREE_TYPE(1) */
+   t = build_tree_list (itab->module_name, itab->interface_name);
+-  TREE_CODE (t) = INTERFACE_NAME_NODE;
++  TREE_SET_CODE (t, INTERFACE_NAME_NODE);
+   TREE_TYPE (t) = (tree) itab;
+   itab->interface_name_node = t;
+   return 1;
+@@ -2636,7 +2636,7 @@ load_node ()
+           free (id);
+           /* @@ misuse of TREE_LIST */
+           t = build_tree_list (m, i);
+-          TREE_CODE (t) = INTERFACE_NAME_NODE;
++          TREE_SET_CODE (t, INTERFACE_NAME_NODE);
+           assert (mark_node_loaded (t, uid) == t);
+           LOAD_ANY (gpi_checksum);
+           get_interface_table (i, m, 1);
+@@ -3718,7 +3718,7 @@ gpi_open (interface_name, name, source, 
+                         {
+                           tree new_import = build_tree_list (NULL_TREE, interface);
+                           /* @@ misuse of TREE_LIST and TREE_TYPE(2) */
+-                          TREE_CODE (new_import) = INTERFACE_NAME_NODE;
++                          TREE_SET_CODE (new_import, INTERFACE_NAME_NODE);
+                           TREE_TYPE (new_import) = (tree) checksum;
+                           import_list = chainon (import_list, new_import);
+                         }