Tokenize a string: Difference between revisions

Content added Content deleted
(Improved Ada example)
mNo edit summary
Line 143: Line 143:


=={{header|Ada}}==
=={{header|Ada}}==
<lang ada>with Ada.Text_IO, Ada.Containers.Indefinite_Vectors, Ada.Strings.Fixed, Ada.Strings.Maps;
<lang ada>
with Ada.Text_IO, Ada.Containers.Indefinite_Vectors, Ada.Strings.Fixed, Ada.Strings.Maps;
use Ada.Text_IO, Ada.Containers, Ada.Strings, Ada.Strings.Fixed, Ada.Strings.Maps;
use Ada.Text_IO, Ada.Containers, Ada.Strings, Ada.Strings.Fixed, Ada.Strings.Maps;


Line 164: Line 163:
Put (S & ".");
Put (S & ".");
end loop;
end loop;
end Tokenize;
end Tokenize;</lang>
</lang>


=={{header|ALGOL 68}}==
=={{header|ALGOL 68}}==