Allow "INLINEABLE" as a synonym
authorsimonpj@microsoft.com <unknown>
Wed, 15 Sep 2010 15:42:49 +0000 (15:42 +0000)
committersimonpj@microsoft.com <unknown>
Wed, 15 Sep 2010 15:42:49 +0000 (15:42 +0000)
compiler/parser/Lexer.x

index 0fa3256..b418280 100644 (file)
@@ -2218,6 +2218,8 @@ ignoredPrags = Map.fromList (map ignored pragmas)
 oneWordPrags = Map.fromList([("rules", rulePrag),
                            ("inline", token (ITinline_prag Inline FunLike)),
                            ("inlinable", token (ITinline_prag Inlinable FunLike)),
 oneWordPrags = Map.fromList([("rules", rulePrag),
                            ("inline", token (ITinline_prag Inline FunLike)),
                            ("inlinable", token (ITinline_prag Inlinable FunLike)),
+                           ("inlineable", token (ITinline_prag Inlinable FunLike)),
+                                         -- Spelling variant
                            ("notinline", token (ITinline_prag NoInline FunLike)),
                            ("specialize", token ITspec_prag),
                            ("source", token ITsource_prag),
                            ("notinline", token (ITinline_prag NoInline FunLike)),
                            ("specialize", token ITspec_prag),
                            ("source", token ITsource_prag),