rpms/ghdl/devel ghdl-svn89-fix.patch,NONE,1.1 ghdl.spec,1.27,1.28

[Thomas M. Sailer (sailer)]

Author: sailer

Update of /cvs/extras/rpms/ghdl/devel
In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv26329

Modified Files:
	ghdl.spec 
Added Files:
	ghdl-svn89-fix.patch 
Log Message:
- back out a hunk that causes build failures
- un-exclude ppc


ghdl-svn89-fix.patch:

--- NEW FILE ghdl-svn89-fix.patch ---
Index: sem_stmts.adb
===================================================================
--- vhdl/sem_stmts.adb	(revision 73)
+++ vhdl/sem_stmts.adb	(revision 89)
@@ -461,14 +462,18 @@
    begin
       Ok := True;
       -- Find the signal.
-      Target := Get_Target (Stmt);
-      Target := Sem_Expression (Target, Sig_Type);
-      if Target /= Null_Iir then
-         Set_Target (Stmt, Target);
-         Check_Target (Stmt, Target);
-         Sem_Types.Set_Type_Has_Signal (Get_Type (Target));
+      if Sig_Type = Null_Iir then
+         Ok := False;
       else
-         Ok := False;
+         Target := Get_Target (Stmt);
+         Target := Sem_Expression (Target, Sig_Type);
+         if Target /= Null_Iir then
+            Set_Target (Stmt, Target);
+            Check_Target (Stmt, Target);
+            Sem_Types.Set_Type_Has_Signal (Get_Type (Target));
+         else
+            Ok := False;
+         end if;
       end if;
 
       Expr := Get_Reject_Time_Expression (Stmt);


Index: ghdl.spec
===================================================================
RCS file: /cvs/extras/rpms/ghdl/devel/ghdl.spec,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -r1.27 -r1.28
--- ghdl.spec	21 Nov 2006 08:06:06 -0000	1.27
+++ ghdl.spec	5 Jan 2007 14:08:12 -0000	1.28
@@ -5,7 +5,7 @@
 Summary: A VHDL simulator, using the GCC technology
 Name: ghdl
 Version: 0.25
-Release: 0.%{ghdlsvnver}svn.0%{?dist}
+Release: 0.%{ghdlsvnver}svn.1%{?dist}
 License: GPL
 Group: Development/Languages
 URL: http://ghdl.free.fr/
@@ -16,12 +16,11 @@
 Source0: ftp://gcc.gnu.org/pub/gcc/releases/gcc-%{gccver}/gcc-core-%{gccver}.tar.bz2
 Source100: http://ghdl.free.fr/ghdl-%{ghdlver}.tar.bz2
 Patch100: ghdl-svn%{ghdlsvnver}.patch
+Patch101: ghdl-svn89-fix.patch
 BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
 Requires(post): /sbin/install-info
 Requires(preun): /sbin/install-info
 Requires: gcc
-# gcc-gnat missing on ppc: Bug 174720
-ExcludeArch: ppc
 # (Build)Requires from fc gcc41 package
 %define multilib_64_archs sparc64 ppc64 s390x x86_64
 %ifarch s390x
@@ -108,6 +107,7 @@
 %setup -q -n gcc-%{gccver} -T -b 0 -a 100
 pushd ghdl-%{ghdlver}
 %patch100 -p1
+%patch101 -p0 -R -b .fix
 %{__mv} vhdl ../gcc/
 popd
 
@@ -288,6 +288,10 @@
 
 
 %changelog
+* Fri Jan  5 2007 Thomas Sailer <t.sailer at alumni.ethz.ch> - 0.25-0.89svn.1
+- back out hunks that cause build failures
+- un-exclude ppc
+
 * Mon Nov 20 2006 Thomas Sailer <t.sailer at alumni.ethz.ch> - 0.25-0.89svn.0
 - update to svn89