Add match(m, ann_name) in addition to match(m1, m2, ann_name).

libwccl/parser/grammar.g

@@ -1950,16 +1950,21 @@ match_mark_action
 }
 	: "mark" LPAREN 
 			match_from = match_fit[tagset, vars] COMMA
-			match_to   = match_fit[tagset, vars] COMMA
+			(match_to  = match_fit[tagset, vars] COMMA) ?
 			annotation_name : STRING
 		RPAREN {
-			m_act.reset(
-				new MarkMatch(
-					match_from, 
-					match_to, 
-					((antlr::Token*)annotation_name)->getText()
-				)
-			);
+			if (!match_to) {
+				m_act.reset(
+					new MarkMatch(
+						match_from,
+						((antlr::Token*)annotation_name)->getText()));
+			} else {
+				m_act.reset(
+					new MarkMatch(
+						match_from,
+						match_to,
+						((antlr::Token*)annotation_name)->getText()));
+			}
 		}
 ;