Ejemplo l

program Ejemplol;
(* Aquí va la declaración de tipos, constantes y variables globales *)
(* A continuación la declaración de procesos que componen el programa *)

process Uno;
begin
   repeat
      writeln(1);
   forever
end;

process Dos;
begin
   repeat
     writeln(2);
   forever
end;

begin
   writeln('Esto se ejecuta de forma secuencial');
   writeln('previa a la ejecución concurrente de los procesos');
   cobegin
     (* Aquí se activan los procesos y se ejecutan de forma concurrente *)
     Uno;
     Dos;
   coend;
   writeln('Esto se ejecuta de forma secuencial');
   writeln('después de la ejecución concurrente de los procesos');
end.


Última actualización: 26 de febrero de 2004
abia@dlsi.ua.es