Devuelve una ristra construida concatenando el parámetro indicado por Right tantas veces como indique el parámetro Left. Existen versiones de Find_Token para cada uno de los tres tipos de ristras (tamaño fijo, tamaño limitado y tamaño dinámico); para utilizarlas hay que incluir las librerías que correspondan según el tipo de ristra (Ada.Strings.Fixed, Ada.Strings.Bounded, Ada.Strings.Unbounded).
En lo que sigue, el tipo Ristra representa uno de los tres tipos de ristras, según corresponda.
function "*" (Left : in Natural; Right: in Character) return Ristra;
function "*" (Left : in Natural; Right: in String) return Ristra;
function "*" (Left : in Natural; Right: in Ristra) return Ristra; -- El mismo tipo que Right
with Ada.Strings.Unbounded; use Ada.Strings.Unbounded; ... Din : Unbounded_String; Din := 5 * 'A'; -- Din = "AAAAA" Din := 2 * "pe"; -- Din = "pepe"