User:NevilleDNZ/ALGOL 68: Difference between revisions
Content deleted Content added
NevilleDNZ (talk | contribs) m * <b style=text-transform:lowercase;>TEST Test test</b> |
NevilleDNZ (talk | contribs) |
||
| Line 1: | Line 1: | ||
===par: Parallel processing=== |
===par: Parallel processing=== |
||
''ALGOL 68'' supports programming of parallel processing. Using the keyword '''par''', a ''collateral clause'' is converted to a ''parallel clause'', where the synchronisation of actions is controlled using [[Semaphore (programming)|semaphore]]s. In A68G the parallel actions are mapped to threads when available on the hosting [[operating system]]. In A68S a different paradigm of parallel processing was implemented (see below). |
''ALGOL 68'' supports programming of parallel processing. Using the keyword '''par''', a ''collateral clause'' is converted to a ''parallel clause'', where the synchronisation of actions is controlled using [[Semaphore (programming)|semaphore]]s. In A68G the parallel actions are mapped to threads when available on the hosting [[operating system]]. In A68S a different paradigm of parallel processing was implemented (see below). |
||
<html> |
|||
<style> |
|||
b { |
|||
font-weight: bold; |
|||
text-transform:lowercase; |
|||
} |
|||
</style> |
|||
</html> |
|||
<style> |
|||
b { |
|||
font-weight: bold; |
|||
text-transform:lowercase; |
|||
} |
|||
</style> |
|||
* <b style=text-transform:lowercase;>TEST Test test</b> |
* <b style=text-transform:lowercase;>TEST Test test</b> |
||
Revision as of 02:15, 14 November 2021
par: Parallel processing
ALGOL 68 supports programming of parallel processing. Using the keyword par, a collateral clause is converted to a parallel clause, where the synchronisation of actions is controlled using semaphores. In A68G the parallel actions are mapped to threads when available on the hosting operating system. In A68S a different paradigm of parallel processing was implemented (see below).
- TEST Test test
- TEST Test test
PROC
eat = VOID: ( muffins-:=1; print(("Yum!",new line))),
speak = VOID: ( words-:=1; print(("Yak...",new line)));
INT muffins := 4, words := 8;
SEMA mouth = LEVEL 1;
PAR BEGIN
WHILE muffins > 0 DO
DOWN mouth;
eat;
UP mouth
OD,
WHILE words > 0 DO
DOWN mouth;
speak;
UP mouth
OD
END