Two identical strings: Difference between revisions
Content added Content deleted
No edit summary |
m (→{{header|ALGOL W}}: Add syntax highlighting) |
||
Line 456: | Line 456: | ||
=={{header|ALGOL W}}== |
=={{header|ALGOL W}}== |
||
{{Trans|MAD}} |
{{Trans|MAD}} |
||
<lang |
<lang oberon2>BEGIN |
||
INTEGER PROCEDURE BITSP ( INTEGER VALUE BT ) ; |
INTEGER PROCEDURE BITSP ( INTEGER VALUE BT ) ; |
||
BEGIN |
BEGIN |