c-pragma.c (handle_pragma_token): If passed a token instead of a tree, use that as...

        * c-pragma.c (handle_pragma_token): If passed a token instead
        of a tree, use that as the pack value.

From-SVN: r22997

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index e3aed7d2842ab808076ce1ed3543d4f9cc1bab6e..9422e67286268e18ccaf22988230ffc062556d7a 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+Sun Oct 11 23:04:30 1998  Robert Lipe  <robertl@dgii.com>
+
+        * c-pragma.c (handle_pragma_token): If passed a token instead
+        of a tree, use that as the pack value.
+
 Sun Oct 11 14:21:14 1998  Mark Mitchell  <mark@markmitchell.com>
 
        * flow.c (find_basic_blocks_1): Fix prototype.

diff --git a/gcc/c-pragma.c b/gcc/c-pragma.c
index a28679e6e06edd752134015a24c084ad03d177e4..5856d058b30869edbe00c7a36980c6d504a76821 100644 (file)
--- a/gcc/c-pragma.c
+++ b/gcc/c-pragma.c
@@ -384,7 +384,11 @@ handle_pragma_token (string, token)
       break;
 
     case ps_left:
-      align = atoi (string);
+
+      if (TREE_CODE(token) == INTEGER_CST) 
+       align = TREE_INT_CST_LOW(token);
+      else
+       align = atoi (string);
       switch (align)
        {
        case 1: