2021-10-30 01:57:19 +00:00
|
|
|
with H3.Compilers;
|
2021-10-30 05:32:16 +00:00
|
|
|
with ada.text_io;
|
2021-10-30 01:57:19 +00:00
|
|
|
|
|
|
|
|
procedure hello3 is
|
|
|
|
|
package C is new H3.Compilers(Standard.Wide_Character);
|
|
|
|
|
|
|
|
|
|
Compiler: C.Compiler;
|
|
|
|
|
begin
|
|
|
|
|
Compiler.Feed ("<<=hello world");
|
|
|
|
|
Compiler.End_Feed;
|
|
|
|
|
end hello3;
|
