12 lines
216 B
Ada
12 lines
216 B
Ada
with H3.Compilers;
|
|
with ada.text_io;
|
|
|
|
procedure hello3 is
|
|
package C is new H3.Compilers(Standard.Wide_Character);
|
|
|
|
Compiler: C.Compiler;
|
|
begin
|
|
Compiler.Feed ("#include 'abc.txt'");
|
|
Compiler.End_Feed;
|
|
end hello3;
|