make protocol families extensible

sync/gen_messages.ysl2

@@ -48,7 +48,9 @@ tstylesheet {
         `` for "fsm" | IMPORTS «@name» FROM «yml:ucase(@name)»;
 
         «@name» ::= CHOICE {
-            `` for "fsm" |> «yml:lcase(@name)» [APPLICATION «@id»] «@name»`if "position()!=last()" > , `
+            «yml:lcase(fsm[1]/@name)» [APPLICATION «fsm[1]/@id»] «fsm[1]/@name»`if "count(fsm)>1" > ,`
+            `` if "count(fsm)>1" |> ...,
+            `` for "fsm[position()>1]" |> «yml:lcase(@name)» [APPLICATION «@id»] «@name»`if "position()!=last()" > ,`
         }
 
         END