[commit: ghc] master: cmm lex: drop unused 'align' token (f3e6271)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/f3e62714e356521efe49a011f874d3a66e543d76/ghc

>---------------------------------------------------------------

commit f3e62714e356521efe49a011f874d3a66e543d76
Author: Sergei Trofimovich <siarheit at google.com>
Date:   Tue Jan 20 23:04:31 2015 +0000

    cmm lex: drop unused 'align' token
    
    Max removed 'align' token from parser productions long ago:
    > commit ec39750268da134c906b8bb4b7d61763d4ea5c2e
    > Author: Max Bolingbroke <batterseapower at hotmail.com>
    > Date:   Tue Jul 5 09:31:08 2011 +0100
    >
    >     Remove the unused CmmAlign and CmmDataLabel from CmmStatic
    
    This patch drops 'align' from lexer as well.
    
    Signed-off-by: Sergei Trofimovich <siarheit at google.com>


>---------------------------------------------------------------

f3e62714e356521efe49a011f874d3a66e543d76
 compiler/cmm/CmmLex.x   | 2 --
 compiler/cmm/CmmParse.y | 1 -
 2 files changed, 3 deletions(-)

diff --git a/compiler/cmm/CmmLex.x b/compiler/cmm/CmmLex.x
index d5a8067..9e688dd 100644
--- a/compiler/cmm/CmmLex.x
+++ b/compiler/cmm/CmmLex.x
@@ -144,7 +144,6 @@ data CmmToken
   | CmmT_else
   | CmmT_export
   | CmmT_section
-  | CmmT_align
   | CmmT_goto
   | CmmT_if
   | CmmT_call
@@ -228,7 +227,6 @@ reservedWordsFM = listToUFM $
         ( "else",               CmmT_else ),
         ( "export",             CmmT_export ),
         ( "section",            CmmT_section ),
-        ( "align",              CmmT_align ),
         ( "goto",               CmmT_goto ),
         ( "if",                 CmmT_if ),
         ( "call",               CmmT_call ),
diff --git a/compiler/cmm/CmmParse.y b/compiler/cmm/CmmParse.y
index fd9489b..916c161 100644
--- a/compiler/cmm/CmmParse.y
+++ b/compiler/cmm/CmmParse.y
@@ -309,7 +309,6 @@ import Data.Maybe
         'else'          { L _ (CmmT_else) }
         'export'        { L _ (CmmT_export) }
         'section'       { L _ (CmmT_section) }
-        'align'         { L _ (CmmT_align) }
         'goto'          { L _ (CmmT_goto) }
         'if'            { L _ (CmmT_if) }
         'call'          { L _ (CmmT_call) }