Add named block support

lib/pegjs/html/tag-string.pegjs

@@ -4,4 +4,4 @@ start = tagString
 
 tagString
   = c:$tagChar+
-tagChar = [_a-zA-Z0-9-] / nonSeparatorColon
+tagChar = [_a-zA-Z0-9-] / nonSeparatorColon / '@'

tests/integration/glimmer-component-test.js

@@ -93,3 +93,17 @@ test('recursive nesting part 2', function(){
                  '    p Hello');
   compilesTo(emblem, '<my-comp-1><my-comp-2><p>Hello</p></my-comp-2></my-comp-1>');
 });
+
+test('named block support', function() {
+  var emblem = w(
+    '% x-modal',
+    '  % @header as |@title|',
+    '    |Header #{title}',
+    '  % @body',
+    '    |Body',
+    '  % @footer',
+    '    |Footer'
+  )
+
+  compilesTo(emblem, '<x-modal><@header as |@title|>Header {{title}}</@header><@body>Body</@body><@footer>Footer</@footer></x-modal>');
+});

tests/integration/mustaches-test.js

@@ -529,3 +529,27 @@ test('mustache with else if and complex statements', function() {
   compilesTo(emblem,
     '{{#if foo}}<p>Hi!</p>{{else if (eq 1 (and-or a=b showHidden=(eq 1 2)))}}<p>Wow what was that?</p>{{/if}}');
 });
+
+test('named block support', function() {
+  var emblem = w(
+    '= x-modal',
+    '  % @header as |@title|',
+    '    |Header #{title}',
+    '  % @body',
+    '    |Body',
+    '  % @footer',
+    '    |Footer'
+  )
+
+  compilesTo(emblem, '{{#x-modal}}<@header as |@title|>Header {{title}}</@header><@body>Body</@body><@footer>Footer</@footer>{{/x-modal}}');
+});
+
+test('named block with block param', function() {
+  var emblem = w(
+    '= x-layout as |@widget|',
+    '  = @widget as |a b c|',
+    '    |Hi.'
+  )
+
+  compilesTo(emblem, '{{#x-layout as |@widget|}}{{#@widget as |a b c|}}Hi.{{/@widget}}{{/x-layout}}');
+});