Added mscgen lexer

2 files changed, 122 insertions, 0 deletions

diff --git a/tests/examplefiles/example.msc b/tests/examplefiles/example.msc
new file mode 100644
index 00000000..d51b32a6
--- /dev/null
+++ b/tests/examplefiles/example.msc
@@ -0,0 +1,43 @@
+msc {
+  hscale=5;
+
+  //test comment
+
+  a,b,c,d;
+
+/* another
+comment
+goes here */ /* too */ // now
+
+  ... [label="test1", id="1"];
+  --- [label="test2", id="2"];
+  ||| [label="test3", id="2"];
+  a ABOX b;
+  a--b [label="test4", id="2"];
+  a == b [label="test5", id="2"];
+  a .. b [label="test6", id="2"];
+  a::b [label="test7", id="2"];
+  a<<=>> b [label="test8", id="2"],
+  b <->c [label="test9", id="2"],
+  b RBOX c;
+  a BOX d;
+  a<=> b [label="test10", id="2"];
+  a <<>> b [label="test11", id="2"];
+  a<:>b [label="test12", id="2"];
+  a->b [label="test13", id="2"];
+  a =>> b [label="test14", id="2"],
+  b >> c [label="test15", id="2"],
+  a=>   b [label="test16", id="2"];
+  a :>b [label="test17", id="2"];
+  a-x b [label="test18", id="2"];
+  a -Xb [label="test19", id="2"];
+  a<- b [label="test20", id="2"];
+  a <<=b [label="test21", id="2"];
+  a<< b [label="test22", id="2"];
+  a <= b [label="test23", id="2"];
+  a<: b [label="test24", id="2"];
+  a -xb [label="test25", id="2"];
+  a-X b [ label="test26",id="2" ];
+  a->* [label="test27" , id="2"];
+  *<-b [label="test28",id="28"];
+}
diff --git a/tests/examplefiles/example2.msc b/tests/examplefiles/example2.msc
new file mode 100644
index 00000000..61e2ef83
--- /dev/null
+++ b/tests/examplefiles/example2.msc
@@ -0,0 +1,79 @@
+#!/usr/bin/mscgen -Tpng
+#
+# testinput2.msc : Sample msc input file with URLs
+#
+# This file is PUBLIC DOMAIN and may be freely reproduced,  distributed,
+# transmitted, used, modified, built upon, or otherwise exploited by
+# anyone for any purpose, commercial or non-commercial, and in any way,
+# including by methods that have not yet been invented or conceived.
+#
+# This file is provided "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER
+# EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+#
+
+# Note: This is from mscgen-0.20
+
+msc {
+
+A,B;
+
+--- [label="Start", ID="1"];
+
+A->B [label="signal"];
+A<-B [label="signal"];
+
+
+A=>B [label="method"];
+A<=B [label="method"];
+
+A>>B [label="return"];
+A<<B [label="return"];
+
+A=>>B [label="call-back"];
+A<<=B [label="call-back", URL="www.google.com"];
+
+A x- B [label="loss"];
+A -x B [label="loss"];
+
+--- [label="Left arcs", ID="2", IDURL="www.google.co.uk"];
+
+A->A [label="signal"];
+A<-A [label="signal"];
+
+
+A=>A [label="method"];
+A<=A [label="method"];
+
+A>>A [label="return"];
+A<<A [label="return"];
+
+A=>>A [label="call-back"];
+A<<=A [label="call-back", URL="www.google.com", ID="3"];
+
+A x- A [label="loss"];
+A -x A [label="loss"];
+
+--- [label="Right arcs"];
+
+B->B [label="signal"];
+B<-B [label="signal"];
+
+
+B=>B [label="method"];
+B<=B [label="method"];
+
+B>>B [label="return"];
+B<<B [label="return"];
+
+B=>>B [label="call-back", ID="4"];
+B<<=B [label="call-back", URL="www.google.com"];
+
+B x- B [label="loss"];
+B -x B [label="loss"];
+
+--- [label="End of arcs", URL="www.google.com"];
+
+
+... [label="Some time passes", URL="www.google.com"];
+}