Allow negating conditional directives

Related to #983

src/chord_sheet/tag.ts

@@ -413,6 +413,8 @@ class Tag extends AstComponent {
 
   selector: string | null = null;
 
+  isNegated = false;
+
   /**
    * The tag attributes. For example, section related tags can have a label:
    * `{start_of_verse: label="Verse 1"}`

src/chord_sheet_serializer.ts

@@ -219,9 +219,11 @@ class ChordSheetSerializer {
       chordDefinition,
       attributes,
       selector,
+      isNegated,
     } = astComponent;
     const tag = new Tag(name, value, { line, column, offset }, attributes);
     tag.selector = selector || null;
+    tag.isNegated = isNegated || false;
 
     if (chordDefinition) {
       tag.chordDefinition = new ChordDefinition(

src/parser/chord_pro/grammar.pegjs

@@ -166,7 +166,8 @@ ChordDefinition
         value: text,
         chordDefinition,
         location: location().start,
-        selector,
+        selector: selector?.value,
+        isNegated: selector?.isNegated,
       };
     }
 
@@ -176,8 +177,16 @@ Tag
     }
 
 TagSelector
-  = "-" value:TagSelectorValue {
-      return value;
+  = "-" value:TagSelectorValue negator:TagSelectorNegator? {
+      return {
+        value,
+        isNegated: !!negator,
+      };
+    }
+
+TagSelectorNegator
+  = "!" {
+      return true;
     }
 
 TagSelectorValue

src/parser/chord_pro/helpers.ts

@@ -32,7 +32,7 @@ export function buildSection(startTag: SerializedTag, endTag: SerializedTag, con
 export function buildTag(
   name: string,
   value: Partial<{ value: string | null, attributes: Record<string, string>}> | null,
-  selector: string | null,
+  selector: { value: string | null, isNegated: boolean } | null,
   location: FileRange,
 ): SerializedTag {
   return {
@@ -41,7 +41,8 @@ export function buildTag(
     location: location.start,
     value: value?.value || '',
     attributes: value?.attributes || {},
-    selector,
+    selector: selector?.value,
+    isNegated: selector?.isNegated,
   };
 }
 

src/serialized_types.ts

@@ -40,6 +40,7 @@ export type SerializedTag = SerializedTraceInfo & {
   chordDefinition?: SerializedChordDefinition,
   attributes?: Record<string, string>,
   selector?: string | null,
+  isNegated?: boolean,
 };
 
 export interface SerializedComment {

test/parser/chord_pro_parser.test.ts

@@ -346,6 +346,17 @@ This part is [G]key
     expect(tag).toBeTag('title', 'Guitar song', 'guitar');
   });
 
+  it('allows negated conditional directives', () => {
+    const chordSheet = '{title-guitar!: Guitar song}';
+    const song = new ChordProParser().parse(chordSheet);
+
+    const tag = song.lines[0].items[0] as Tag;
+
+    expect(tag).toBeTag('title', 'Guitar song', 'guitar');
+
+    expect(tag.isNegated).toBe(true);
+  });
+
   it('parses annotation', () => {
     const chordSheet = '[*Full band!]Let it be';
     const song = new ChordProParser().parse(chordSheet);