Generate warning message if .endr is used without preceeding .rept/.irc/.irp

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 01e58d90e2fb3d7bac9736e3653c33d96874d5d2..eddda37ae33112e4c129f5ccfde78796a3c91822 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,5 +1,10 @@
 2001-10-12  Nick Clifton  <nickc@cambridge.redhat.com>
 
+       * read.c (s_bad_endr): New function.  Issues a warning message
+       about a bad use of the .rept pseudo op.
+       (po_table[]): Add .endr.
+       * read.h: Prototype s_bad_endr.
+
        * CONTRIBUTORS: Update contact email address.
 
 2001-10-11  Kazu Hirata  <kazu@hxi.com>

diff --git a/gas/read.c b/gas/read.c
index 52de12d64a3cf354ec1e55b9e8399a58550af5d5..5fc9511314d0cf6ab3bc47809dbc965694a98c0b 100644 (file)
--- a/gas/read.c
+++ b/gas/read.c
@@ -315,6 +315,7 @@ static const pseudo_typeS potable[] = {
   {"endc", s_endif, 0},
   {"endfunc", s_func, 1},
   {"endif", s_endif, 0},
+  {"endr", s_bad_endr, 0},
 /* endef  */
   {"equ", s_set, 0},
   {"equiv", s_set, 1},
@@ -2693,6 +2694,16 @@ s_purgem (ignore)
 
 /* Handle the .rept pseudo-op.  */
 
+void
+s_bad_endr (ignore)
+     int ignore ATTRIBUTE_UNUSED;
+{
+  as_warn (_(".endr encountered without preceeding .rept, .irc, or .irp"));
+  demand_empty_rest_of_line ();
+}
+
+/* Handle the .rept pseudo-op.  */
+
 void
 s_rept (ignore)
      int ignore ATTRIBUTE_UNUSED;

diff --git a/gas/read.h b/gas/read.h
index a56781cf0929e7b2bf8a9812207b60721e572c80..60b4bed66882915bd9340e3f68b4fc66e2881365 100644 (file)
--- a/gas/read.h
+++ b/gas/read.h
@@ -139,6 +139,7 @@ extern void s_align_bytes PARAMS ((int arg));
 extern void s_align_ptwo PARAMS ((int));
 extern void s_app_file PARAMS ((int));
 extern void s_app_line PARAMS ((int));
+extern void s_bad_endr PARAMS ((int));
 extern void s_comm PARAMS ((int));
 extern void s_data PARAMS ((int));
 extern void s_desc PARAMS ((int));