Tokenize a string: Difference between revisions
Content deleted Content added
No edit summary |
Improved Ada example |
||
Line 144:
=={{header|Ada}}==
<lang ada>
with Ada.Text_IO, Ada.Containers.Indefinite_Vectors, Ada.Strings.Fixed, Ada.Strings.Maps;
use
procedure
package
use String_Vectors;
Finish : Natural := 0;
Output : Vector := Empty_Vector;
begin
end loop;
for
Put (S & ".");
end loop;
end Tokenize;
</lang>
|