re PR target/15331 (Assembler error building gnatlib on IRIX 6.5 with GNU as 2.14.91)

	PR target/15331
	* 5gmastop.adb (Roff): Choose between '4' and '0', not '4' and ' '.

From-SVN: r81737

diff --git a/gcc/ada/5gmastop.adb b/gcc/ada/5gmastop.adb
index 74b1818f7528ad4493b5d73fa20a3c8aba5d75b8..6c85ce54f1ab52002deca5e318a32bd5fea1f584 100644 (file)
--- a/gcc/ada/5gmastop.adb
+++ b/gcc/ada/5gmastop.adb
@@ -121,7 +121,7 @@ package body System.Machine_State_Operations is
    --  load/store instructions used to save/restore machine instructions.
 
    Roff : constant Character := Character'Val (o32n * Character'Pos ('4') +
-                                               n32n * Character'Pos (' '));
+                                               n32n * Character'Pos ('0'));
    --  Offset from first byte of a __uint64 register save location where
    --  the register value is stored.  For n32/64 we store the entire 64
    --  bit register into the uint64.  For o32, only 32 bits are stored

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 82042ccaa8cba8de9233089a4c702e5d302d1e20..0abc8773322d7b91579f31aa45b4b1093fd186ad 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,8 @@
+2004-05-12  Richard Sandiford  <rsandifo@redhat.com>
+
+       PR target/15331
+       * 5gmastop.adb (Roff): Choose between '4' and '0', not '4' and ' '.
+
 2004-05-11  Roger Sayle  <roger@eyesopen.com>
 
        * utils.c (max_size): Use MIN_EXPR to find the minimum value of a