of a tree, use that as the pack value.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@22997
138bc75d-0d04-0410-961f-
82ee72b054a4
+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.
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: