* gasp.c (do_align): Permit a fill value for .align.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 4efd35e1e653e5db2f4fe6889fb35fcea79faaea..1fe904e0582a03f2eec1b0cd20eb448c3aa54810 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,7 @@
+Mon Jun 10 11:45:51 1996  Ian Lance Taylor  <ian@cygnus.com>
+
+       * gasp.c (do_align): Permit a fill value for .align.
+
 Wed Jun  5 17:09:26 1996  Ian Lance Taylor  <ian@cygnus.com>
 
        * read.c (next_char_of_string): Warn if a newline is seen in the

diff --git a/gas/gasp.c b/gas/gasp.c
index 673f4406b8e0202746a0da84d29e0b87d30d95d9..ff779b055d6f245de157667888dc1e21ac373e03 100644 (file)
--- a/gas/gasp.c
+++ b/gas/gasp.c
@@ -1413,15 +1413,29 @@ do_align (idx, in)
      int idx;
      sb *in;
 {
-  int al;
+  int al, have_fill, fill;
+
   idx = exp_get_abs ("align needs absolute expression.\n", idx, in, &al);
+  idx = sb_skip_white (idx, in);
+  have_fill = 0;
+  fill = 0;
+  if (! eol (idx, in))
+    {
+      idx = sb_skip_comma (idx, in);
+      idx = exp_get_abs (".align needs absolute fill value.\n", idx, in,
+                        &fill);
+      have_fill = 1;
+    }
 
   if (al != 1
       && al != 2
       && al != 4)
     WARNING ((stderr, "alignment must be one of 1, 2 or 4.\n"));
 
-  fprintf (outfile, ".align    %d\n", al);
+  fprintf (outfile, ".align    %d", al);
+  if (have_fill)
+    fprintf (outfile, ",%d", fill);
+  fprintf (outfile, "\n");
 }
 
 /* .res[.b|.w|.l] <size> */