Interface for qBeta module object

Origin: demo

SCPex: obj  LIB.SimpleConcurrentProcesses.System

   -- a recent change to checker/semanticChecker/virtuals/.. implies that

   -- the checker fails with the original position of the dceclartions of

   -- S1,S2,i and par (in Formater)

   %requires LIB.SimpleConcurrentProcesses

   Text: 

      %globals console

      %unique 

      S1: ref StringLib.String

      S2: ref StringLib.String

      i: var integer

      add: 

         in S: ref StringLib.String

      format: 

      print: 

   Writer: obj Process("Writer")

      stop:: 

   Formatter: obj Process("Formatter")

      par: ref Text

      phrase: entry

         in phr: ref StringLib.String

      endPar: entry

      stop:: 

   Printer: obj Process("Printer")

      par: entry

         in P: ref Text

      stop::