blob: 4af6c1ce693b57813ec4966dd06b793e497c474e [file] [log] [blame]
package Loop_Optimization5_Pkg is
type String_Access is access all String;
function Init return String;
function Locate (S : String) return String_Access;
end Loop_Optimization5_Pkg;