From 5428d4ee6d7afbd9d587658903a7c686eb97f9c3 Mon Sep 17 00:00:00 2001
From: Paul Stansifer <paul.stansifer@gmail.com>
Date: Thu, 4 Aug 2011 11:58:09 -0700
Subject: [PATCH] Check for nonconsistent macro names.

---
 src/comp/syntax/ext/simplext.rs | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/src/comp/syntax/ext/simplext.rs b/src/comp/syntax/ext/simplext.rs
index 77366f81dc7..29a9c0b5345 100644
--- a/src/comp/syntax/ext/simplext.rs
+++ b/src/comp/syntax/ext/simplext.rs
@@ -675,7 +675,17 @@ fn add_new_extension(cx: &ext_ctxt, sp: span, arg: @expr,
                 alt mac.node {
                   mac_invoc(pth, invoc_arg, body) {
                     alt path_to_ident(pth) {
-                      some(id) { macro_name = some(id); }
+                      some(id) { 
+                        alt macro_name {
+                          none. { macro_name = some(id); }
+                          some(other_id) {
+                            if id != other_id {
+                                cx.span_fatal(pth.span, "macro name must be "
+                                              + "consistent");
+                            }
+                          }
+                        }
+                      }
                       none. {
                         cx.span_fatal(pth.span,
                                       "macro name must not be a path");