User:NevilleDNZ/ALGOL 68: Difference between revisions
Content deleted Content added
NevilleDNZ (talk | contribs) |
NevilleDNZ (talk | contribs) m try alternatives... |
||
| Line 2: | Line 2: | ||
''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). |
||
<css> b { font-weight: bold; text-transform:lowercase;}</css> |
|||
* <b>TEST Test test</b> |
* <b>TEST Test test</b> |
||
<style> b { font-weight: bold; text-transform:lowercase;}</style> |
|||
* <b>TEST Test test</b> |
|||
{{#css: b { font-weight: bold; text-transform:lowercase; } }} |
|||
* <b>TEST Test test</b> |
|||
* <b style=text-transform:lowercase;>TEST Test test - desired.</b> |
|||
'''PROC''' |
'''PROC''' |
||
| Line 24: | Line 32: | ||
'''OD''' |
'''OD''' |
||
'''END''' |
'''END''' |
||
{{Thermometer |val=123 |max=456}} |
|||
{{Thermometer |val=80}} |
|||
Revision as of 04: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).
<css> b { font-weight: bold; text-transform:lowercase;}</css>
- TEST Test test
<style> b { font-weight: bold; text-transform:lowercase;}</style>
- TEST Test test
{{#css: b { font-weight: bold; text-transform:lowercase; } }}
- TEST Test test
- TEST Test test - desired.
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